| Name | Value |
|---|---|
| NAME | TEST/LABEL 3X1 |
| FILE | VENDOR |
| SPECIALTY COMMANDS | LABEL 3X1/INTERMEC 8646 |
| TEXT | THIS IS A TEST OF THE INTERMEC 8646 PRINTER WITH LABEL 3X1 0123456789 |
| FILEMAN CODE | S PRCT="5^1" D XEC^PRCTLAB;Y1 S PRCT="5^2" D XEC^PRCTLAB;Y1 S PRCT="5^3" D XEC^PRCTLAB;C1 S PRCT="5^4" D XEC^PRCTLAB;C1 S PRCT="5^5" D XEC^PRCTLAB;C1 S PRCT="5^6" D XEC^PRCTLAB;Y1 S PRCT="5^7" D XEC^PRCTLAB;Y1 |
| MUMPS CODE | S X="" I '$D(PRCTSC) S PRCTSC=1 S PRCT="4^1" D SPC^PRCTLAB S PRCT="4^2" D SPC^PRCTLAB S X="THIS IS A TEST OF THE INTERMEC" S X="8646 PRINTER WITH LABEL 3X1" S X="0123456789" S:'$D(PRCTCP) PRCTCP=PRCTCPY S PRCTCP=PRCTCP-1 S:PRCTCP D0=D0-.0001 K:PRCTCP=0 PRCTCP S X="" S PRCT="4^3" D SPC^PRCTLAB |