home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware Overload
/
ShartewareOverload.cdr
/
database
/
workdb.zip
/
VOUCHER.PRG
< prev
next >
Wrap
Text File
|
1988-08-08
|
3KB
|
102 lines
*!!* dBASE CONVERT - dBASE III File Conversion Aid v2.01 1/10/86
*
SET HEADING OFF
SET SAFETY OFF
* voucher.sig 08/18/83
SET DEVICE TO PRINT
SET CONSOLE OFF
* insert your own printer codes
? CHR(28)
SET CONSOLE ON
EJECT
@ 1,10 SAY 'SIG/M SOFTWARE - BOX 97 - ISELIN, NJ 08830'
@ 3,6 SAY 'ORDER NUMBER'
@ 3,19 SAY ':'
@ 3,20 SAY ORDER
@ 3,42 SAY 'COMPLETE'
@ 3,51 SAY ':'
@ 3,52 SAY COMP
@ 5,9 SAY 'LAST NAME'
@ 5,19 SAY ':'
@ 5,20 SAY LNAME
@ 5,45 SAY 'FIRST'
@ 5,51 SAY ':'
@ 5,52 SAY FNAME
@ 7,11 SAY 'ADDRESS'
@ 7,19 SAY ':'
@ 7,20 SAY ADDR1
@ 8,10 SAY '(line 2)'
@ 8,19 SAY ':'
@ 8,20 SAY ADDR2
@ 9,10 SAY '(line 3)'
@ 9,19 SAY ':'
@ 9,20 SAY ADDR3
@ 10,14 SAY 'CITY'
@ 10,19 SAY ':'
@ 10,20 SAY CITY
@ 10,48 SAY 'ST'
@ 10,51 SAY ':'
@ 10,52 SAY STATE
@ 10,67 SAY 'ZIP'
@ 10,71 SAY ':'
@ 10,72 SAY ZIP
@ 13,3 SAY 'VOLUMES'
@ 13,11 SAY ':'
@ 13,12 SAY VOL1
@ 16,4 SAY 'AMOUNT'
@ 16,11 SAY ':'
@ 16,12 SAY AMT PICTURE '$999.99'
@ 16,23 SAY 'ORDERED'
@ 16,31 SAY ':'
@ 16,51 SAY ':'
@ 16,52 SAY ENTERED
@ 16,62 SAY 'SHIPPED'
@ 16,70 SAY ':'
@ 16,71 SAY SHIPPED
@ 17,43 SAY 'CATALOG'
@ 17,51 SAY ':'
@ 17,52 SAY CATALOG
@ 18,3 SAY 'REMARKS'
@ 18,11 SAY ':'
@ 18,12 SAY REM1
@ 19,3 SAY 'REMARKS'
@ 19,11 SAY ':'
@ 19,12 SAY REM2
@ 20,1 SAY 'BACKORDER'
@ 20,11 SAY ':'
@ 20,12 SAY BO
@ 22,01 SAY 'BACKORDER SHIPPED'
@ 22,19 SAY ':'
@ 22,20 SAY BO_SHIP
@ 22,40 SAY 'BACKORDER SHIPPED'
@ 22,58 SAY ':'
@ 22,59 SAY BO2_SHIP
@ 24,10 SAY "BACKORDERED VOLUMES WILL BE SHIPPED SEPARATELY"
@ 25,1 SAY '* * * * * * * * * * * * * * * * * * *'
@ 25,40 SAY '* * * * * * * * * * * * * * * * * *'
@ 27,0 SAY 'SIG/M MAIL ORDER RATES'
@ 28,0 SAY 'Domestic(US & Canada): $5/volume + $1/order for shipping (UPS)'
@ 29,0 SAY ' Foreign: $9 = $6/volume + $3/disk for shipping (AIR MAIL)'
@ 31,0 SAY '[ ] YOUR PAYMENT WAS NOT SUFFICIENT TO COMPLETE YOUR ORDER. THE BALANCE OF'
@ 32,0 SAY ' YOUR ORDER OF $____________ WILL BE APPLIED TO YOUR NEXT ORDER IF YOU'
@ 33,0 SAY ' RETURN THIS FORM WITH YOUR ORDER.'
@ 35,0 SAY '[ ] YOU HAVE OVERPAID FOR YOUR ORDER.'
@ 36,0 SAY ' [ ] WE ARE SENDING ADDITIONAL VOLUMES SINCE IT LOOKS LIKE YOU ARE'
@ 37,0 SAY ' GETTING THE COMPLETE LIBRARY.'
@ 39,0 SAY ' [ ] YOU OVERPAID $__________. IT BE APPLIED TO YOUR NEXT'
@ 40,0 SAY ' ORDER IF YOU RETURN THIS FORM WITH YOUR ORDER.'
@ 42,0 SAY '[ ] WE ARE RETURNING YOUR BLANK DISKS. WE ONLY COPY TO'
@ 43,0 SAY ' MEMBER SUPPLIED DISKS AT USER GROUP MEETINGS.BECAUSE'
@ 44,0 SAY ' OF HIGH SHIPPING COSTS, WE CHARGED YOUR ACCOUNT $______'
@ 45,0 SAY ' FOR RETURN SHIPPING. '
@ 47,0 SAY '[ ] OTHER:'
@ 50,20 SAY 'MANY THANKS FOR YOUR ORDER - SIG/M SOFTWARE'
@ 51,40 SAY DTOC(DATE())
@ 52,0 SAY ' '
SET CONSOLE OFF
* set printer code
? CHR(30)
SET CONSOLE ON
SET DEVICE TO SCREEN