home *** CD-ROM | disk | FTP | other *** search
/ Media Share 9 / MEDIASHARE_09.ISO / clarion / labels3.zip / LABEL1.CLA < prev    next >
Text File  |  1989-11-30  |  615b  |  15 lines
  1. ! this include file does label 1
  2.  
  3.         labels_done# = 1                ! set flag that we've done label 1
  4.  
  5.         mem:name_1 = cus:name           ! set label 1 fields from this record
  6.         mem:address_1 = cus:address
  7.         mem:address2_1 = cus:address2
  8.         mem:citystate_1 = cus:citystate
  9.         mem:zip_1 = cus:zip
  10.         mem:attention_1 = cus:attention
  11.  
  12.         if ~eof(customer) then cycle .  ! if this isn't end of file, then
  13.                                         ! go get another record for next label
  14.                                         ! if eof, this label repeats 3 times
  15.