{"aaData": [["PRIMARY/SECONDARY LABEL", "
GENERIC INVENTORY
\n", "", "
LABEL 3X1/INTERMEC 8646
\n", "
\n|1||7|\nL:|3| R:|4| U:|5| OD:|2|\n|6||8|\n
\n
\n", "
\n
\n\n
\n", "
\nS PRCT="1^1" D XEC^PRCTLAB;Y1\n1,S PRCT="1^2" D XEC^PRCTLAB;Y1,S PRCT="1^3" D XEC^PRCTLAB;C1,S PRCT="1^4" D XEC^PRCTLAB;C1,9;Y1;L5,S PRCT="1^5" D XEC^PRCTLAB;Y1,10;Y1;L5,S PRCT="1^6" D XEC^PRCTLAB;Y1,S PRCT="1^7" D XEC^PRCTLAB;Y1,S PRCT="1^8" D XEC^PRCTLAB;Y1\n1,S PRCT="1^9" D XEC^PRCTLAB;Y1,S PRCT="1^10" D XEC^PRCTLAB;C1,S PRCT="1^11" D XEC^PRCTLAB;Y1,S PRCT="1^12" D XEC^PRCTLAB;Y1,S PRCT="1^13" D XEC^PRCTLAB;Y1\n
\n
\n", "
\nS X="" I '$D(PRCTSC) S PRCTSC=1 S PRCT="5^1" D SPC^PRCTLAB\nS X="IE"_D0_" "_D1\nH 1\nS:'$D(PRCTCP) PRCTCP=PRCTCPY S PRCTCP=PRCTCP-1 S:PRCTCP D0=D0-.0001 K:PRCTCP=0 PRCTCP S X=""\nS PRCT="5^3" D SPC^PRCTLAB\nS PRCT="5^2" D SPC^PRCTLAB\nS X=$E($$DESCR^PRCPUX1(D0,D1),1,33)\nS X="L:"\nS X=" R:"\nS X=" U:"\nS X=$$UNIT^PRCPUX1(D0,D1,"/")\nS X=" OD:"\nS X=$S($$ODITEM^PRCPUX2(D0,D1)="Y":"Y",1:"N")\n
\n
\n"], ["PRE-ODI PRIM/SECONDARY LABEL", "
GENERIC INVENTORY
\n", "", "
LABEL 3X1/INTERMEC 8646
\n", "
\n|1||7|\nL:|3| R:|4| U:|5| V:|2|\n|6||8|\n
\n
\n", "
\n
\n\n
\n", "
\nS PRCT="14^1" D XEC^PRCTLAB;Y1\n1,S PRCT="14^2" D XEC^PRCTLAB;Y1,S PRCT="14^3" D XEC^PRCTLAB;C1,S PRCT="14^4" D XEC^PRCTLAB;C1,9;Y1;L5,S PRCT="14^5" D XEC^PRCTLAB;Y1,10;Y1;L5,S PRCT="14^6" D XEC^PRCTLAB;Y1,S PRCT="14^7" D XEC^PRCTLAB;Y1\n1,S PRCT="14^8" D XEC^PRCTLAB;Y1,S PRCT="14^9" D XEC^PRCTLAB;Y1,S PRCT="14^10" D XEC^PRCTLAB;C1,S PRCT="14^11" D XEC^PRCTLAB;Y1,S PRCT="14^12" D XEC^PRCTLAB;Y1,S PRCT="14^13" D XEC^PRCTLAB;Y1\n
\n
\n", "
\nS X="" I '$D(PRCTSC) S PRCTSC=1 S PRCT="5^1" D SPC^PRCTLAB\nS X="IE"_D0_" "_D1\nH 1\nS:'$D(PRCTCP) PRCTCP=PRCTCPY S PRCTCP=PRCTCP-1 S:PRCTCP D0=D0-.0001 K:PRCTCP=0 PRCTCP S X=""\nS PRCT="5^3" D SPC^PRCTLAB\nS PRCT="5^2" D SPC^PRCTLAB\nS X=$E($$DESCR^PRCPUX1(D0,D1),1,33)\nS X="L:"\nS X=" R:"\nS X=" U:"\nS X=$$UNIT^PRCPUX1(D0,D1,"/")\nS X=" V:"\nS X=$E($$VENDOR^PRCPUX1(D0,D1),1,5)\n
\n
\n"], ["WAREHOUSE LABEL", "
GENERIC INVENTORY
\n", "", "
LABEL 3X1/INTERMEC 8646
\n", "
\n|1| U/I:|2||3|\n|4|\n|5||6|\n
\n
\n", "
\n
\n\n
\n", "
\nS PRCT="15^1" D XEC^PRCTLAB;Y1\n1,S PRCT="15^2" D XEC^PRCTLAB;Y1,S PRCT="15^3" D XEC^PRCTLAB;C1,S PRCT="15^4" D XEC^PRCTLAB;Y1,S PRCT="15^5" D XEC^PRCTLAB;Y1,S PRCT="15^6" D XEC^PRCTLAB;C1,S PRCT="15^7" D XEC^PRCTLAB;C1,S PRCT="15^8" D XEC^PRCTLAB;Y1\n1,S PRCT="15^9" D XEC^PRCTLAB;Y1,S PRCT="15^10" D XEC^PRCTLAB;Y1\n
\n
\n", "
\nS X="" I '$D(PRCTSC) S PRCTSC=1 S PRCT="5^1" D SPC^PRCTLAB\nS PRCT="5^3" D SPC^PRCTLAB\nS PRCT="5^2" D SPC^PRCTLAB\nS X=$$NSN^PRCPUX1(D1)\nS X=" U/I:"\nS X=$$UNIT^PRCPUX1(D0,D1,"/")\nS X=$E($$DESCR^PRCPUX1(D0,D1),1,34)\nS X="IE"_D0_" "_D1\nH 1\nS:'$D(PRCTCP) PRCTCP=PRCTCPY S PRCTCP=PRCTCP-1 S:PRCTCP D0=D0-.0001 K:PRCTCP=0 PRCTCP S X=""\n
\n
\n"], ["TEST/LABEL 3X1", "
VENDOR
\n", "", "
LABEL 3X1/INTERMEC 8646
\n", "
\nTHIS IS A TEST OF THE INTERMEC\n8646 PRINTER WITH LABEL 3X1\n0123456789\n
\n
\n", "", "
\nS PRCT="5^1" D XEC^PRCTLAB;Y1\nS PRCT="5^2" D XEC^PRCTLAB;Y1\nS PRCT="5^3" D XEC^PRCTLAB;C1\nS PRCT="5^4" D XEC^PRCTLAB;C1\nS PRCT="5^5" D XEC^PRCTLAB;C1\nS PRCT="5^6" D XEC^PRCTLAB;Y1\nS PRCT="5^7" D XEC^PRCTLAB;Y1\n
\n
\n", "
\nS X="" I '$D(PRCTSC) S PRCTSC=1 S PRCT="4^1" D SPC^PRCTLAB\nS PRCT="4^2" D SPC^PRCTLAB\nS X="THIS IS A TEST OF THE INTERMEC"\nS X="8646 PRINTER WITH LABEL 3X1"\nS X="0123456789"\nS:'$D(PRCTCP) PRCTCP=PRCTCPY S PRCTCP=PRCTCP-1 S:PRCTCP D0=D0-.0001 K:PRCTCP=0 PRCTCP S X=""\nS PRCT="4^3" D SPC^PRCTLAB\n
\n
\n"], ["EXPENDABLE INVENTORY", "
GENERIC INVENTORY
\n", "
-PRCPULAB
\n", "
LABEL 3X1/INTERMEC 8646
\n", "
\n|1||2|\n  \n|3|\n
\n
\n", "
\n
\n\n
\n", "
\nS PRCT="6^1" D XEC^PRCTLAB;Y1\n1,S PRCT="6^2" D XEC^PRCTLAB;Y1,S PRCT="6^3" D XEC^PRCTLAB;C1,S PRCT="6^4" D XEC^PRCTLAB;C1,S PRCT="6^5" D XEC^PRCTLAB;C1,S PRCT="6^6" D XEC^PRCTLAB;Y1,S PRCT="6^7" D XEC^PRCTLAB;Y1\n
\n
\n", "
\nS X="" I '$D(PRCTSC) S PRCTSC=1 S PRCT="5^1" D SPC^PRCTLAB\nS PRCT="5^2" D SPC^PRCTLAB\nS X=$S($D(^PRCP(445,D0,1,D1,6)):$S($P(^(6),"^")]"":$P(^(6),"^"),1:"^"),1:"^") S:X="^" X=$S($P(^PRC(441,D1,0),"^",2)]"":$P(^(0),"^",2),1:"NO DESCRIPTION") S X=$E(X,1,30)\nS X="  "\nS X="IE"_D0_" "_D1\nS:'$D(PRCTCP) PRCTCP=PRCTCPY S PRCTCP=PRCTCP-1 S:PRCTCP D0=D0-.0001 K:PRCTCP=0 PRCTCP S X=""\nS PRCT="5^3" D SPC^PRCTLAB\n
\n
\n"], ["RUN IRL PROGRAM", "", "", "
LABEL 3X1/INTERMEC 8646
\n", "
\n \nRUN IRL PROGRAM\n//\n
\n
\n", "
\n
\n\n
\n", "
\nS PRCT="8^1" D XEC^PRCTLAB;Y1\nS PRCT="8^2" D XEC^PRCTLAB;Y1\nS PRCT="8^3" D XEC^PRCTLAB;C1\nS PRCT="8^4" D XEC^PRCTLAB;C1\nS PRCT="8^5" D XEC^PRCTLAB;C1\nS PRCT="8^6" D XEC^PRCTLAB;Y1\nS PRCT="8^7" D XEC^PRCTLAB;Y1\n
\n
\n", "
\nS X="" I '$D(PRCTSC) S PRCTSC=1 S PRCT="5^1" D SPC^PRCTLAB\nS PRCT="5^2" D SPC^PRCTLAB\nS X=" "\nS X="RUN IRL PROGRAM"\nS X="//"\nS:'$D(PRCTCP) PRCTCP=PRCTCPY S PRCTCP=PRCTCP-1 S:PRCTCP D0=D0-.0001 K:PRCTCP=0 PRCTCP S X=""\nS PRCT="5^3" D SPC^PRCTLAB\n
\n
\n"]]}