Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Printing to a Zebra label printer using EPL2...
Message
De
11/03/2005 11:32:42
Joe Sandoval
Healthcare Computer Corporation
Greensboro, Caroline du Nord, États-Unis
 
 
À
06/03/2005 11:06:43
Nancy Folsom
Pixel Dust Industries
Washington, États-Unis
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Versions des environnements
Visual FoxPro:
VFP 8 SP1
OS:
Windows XP SP2
Network:
Windows XP
Database:
Visual FoxPro
Divers
Thread ID:
00992568
Message ID:
00994862
Vues:
24
Hi Nancy,

I am having trouble with this. See the test program below and, if you could, let me know if I am missing something.

Thanks,

Joe
LOCAL lcPrinterName
LOCAL lcLabel, lcPatientName,lcDrugName,lcDoctorName 

lcPrinterName = GETPRINTER()
SET PRINTER TO lcPrinterName

lcPatientName = "Lucius Cooke"
lcDrugName = "TAGAMET"
lcDoctorName = "Arun Kadambi"
lcNumberOfCopies = "1"
*!* Documentation follows in compiler IF below.
*!* Do not change any of the lines within the
*!* TextMerge block
TEXT TO lcLabel TEXTMERGE NOSHOW
R000,000
O
q406
Q914,25+0
S3
N
A0,0,0,1,1,1,N,<<'"'+lcPatientName+'"'>>
A150,20,0,1,1,1,N,<<'"'+lcDrugName +'"'>>
A155,37,0,2,1,1,N,"Liberty Pharmacy"
A210,62,0,2,1,1,N,<<'"'+lcDoctorName+'"'>>
P<<lcNumberOfCopies>>,1

ENDTEXT
???lcLabel && Write the string out to the device
<
>
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform