Marc's Place

PXRGL / XPRNT - Afdrukken van een tekstregel




Aanroep
 
xcall pxrgl (kanaal, tekst)
xcall xprnt (kanaal, tekst)

 
Common velden vóór aanroep
*N/A
Parameters te vullen bij aanroep
kanaal (d*)
Het naar de printer of spoolfile geopende kanaal.
tekst (a132)
De af te drukken tekst.
Parameters gevuld bij terugkeer
*N/A
Common velden gevuld bij terugkeer
mherc
Een foutcode of 99
XPRNT: Indien de gebruiker tijdens het afdrukken de tijd krijgt om de letters STOP in te toetsen en een <RETURN> te geven of F03 of F12 in te drukken, dan wordt mherc gevuld met 99.
Voorbeelden
 

pqreg = 'Postcode :'
xcall pxpcd (klant.postcode, pqreg(12:7))
xcall pxrgl (pqch, pqreg)


óf


pqreg = 'Postcode :'
xcall pxpcd (klant.postcode, pqreg(12:7))
xcall xprnt (pqch, pqreg)
if mherc afbreken = 1 ; STOP ingetoetst

© 1997- Marc Vos (and others) Contact Me