Rotina sqr para adformat: set global address line strings

Disponível somente no TrabalhosFeitos
  • Páginas : 3 (702 palavras )
  • Download(s) : 0
  • Publicado : 14 de março de 2013
Ler documento completo
Amostra do texto
!*********************************************************
! ADFORMAT: Set Global Address line strings *
!*********************************************************!***********************************************************************
! *
! $Date: 2009/06/03:07:51:11! $Release: FSCM91
! $Revision: 101
!*
!***********************************************************************
!
! Required Input:
! $NAME = From Global address subrecord
! $ADDRESS2= From Global address subrecord
! $ADDRESS3 = From Global address subrecord
! $ADDRESS4 = From Global address subrecord
! $NUM1 = From Globaladdress subrecord
! $NUM2 = From Global address subrecord
! $HOUSE_TYPE = From Global address subrecord
! $POSTAL = From Global address subrecord
!$CITY = From Global address subrecord
! $STATE = From Global address subrecord
! $COUNTY = From Global address subrecord
! $COUNTRY= From Global address subrecord
! $GEO_CODE = From Global address subrecord
! $IN_CITY_LIMIT = From Global address subrecord
!
! Usage: (for compacting addresslines)
!
! if $ADDLINE1 ''
! print $ADDLINE1 (+2,1)
! end-if
! if $ADDLINE2 ''
! print $ADDLINE2 (+1,1)
! end-if
! if $ADDLINE3 ''
! print $ADDLINE3(+1,1)
! end-if
! if $ADDLINE31 ''
! print $ADDLINE31 (+1,1)
! end-if
! if $ADDLINE4 ''
! print $ADDLINE4 (+1,1)
! end-if
! if $ADDLINE5 ''
!...
tracking img