LA7SBC ;DALISC/JMC - HP-PCL Compatible Barcode 128 Utility ; 12/3/1997
Source file <LA7SBC.m>
Package | Total | Caller Graph |
---|---|---|
Automated Lab Instruments | 1 | LA7SMP0 |
IHS Changes To Lab | 1 | BLRAG09E |
Name | Comments | DBIA/ICR reference |
---|---|---|
4 | ;;11314
|
|
8 | ;;21141
|
|
119 | ;;42111
|
|
120 | ;;42121
|
|
121 | ;;21214
|
|
122 | ;;21412
|
|
123 | ;;41212
|
|
124 | ;;11114
|
|
125 | ;;11134
|
|
126 | ;;13114
|
|
127 | ;;11411
|
|
118 | ;;41121
|
|
59 | ;;31221
|
|
58 | ;;32122
|
|
55 | ;;31213
|
|
54 | ;;22311
|
|
57 | ;;32112
|
|
56 | ;;31122
|
|
51 | ;;22113
|
|
50 | ;;22321
|
|
53 | ;;21321
|
|
52 | ;;22123
|
|
115 | ;;11421
|
|
114 | ;;12124
|
|
88 | ;;33112
|
|
89 | ;;31211
|
|
111 | ;;13411
|
|
110 | ;;24111
|
|
113 | ;;12114
|
|
112 | ;;11124
|
|
82 | ;;23113
|
|
83 | ;;21311
|
|
80 | ;;31312
|
|
81 | ;;21133
|
|
86 | ;;31112
|
|
87 | ;;31132
|
|
84 | ;;21331
|
|
85 | ;;21313
|
|
3 | ;;41131
|
|
BC128(D,O,H,XX,YY,W) | ;
; Inputs: ; D = Data string to print in bar code ; O = Orientation of bar code ; 0=portrait (default) ; 1=landscape ; H = Height of bar code in dots (1/300 inch) ; XX = Horizontal position on page in dots ; YY = Vertical position on page in dots ; W = Width of bar in dots (3=default) ; Purpose: ; Accepts a barcode 128 string and writes an HPCL-compatible ; string that will display the barcode on an HP laser printer. ; A barcode font cartridge is not required. ; The current cursor position is stored upon entry and restored before exiting. |
|
7 | ;;41113
|
|
DATA(X) | ;
|
|
108 | ;;22111
|
|
109 | ;;41311
|
|
102 | ;;11241
|
|
103 | ;;12211
|
|
100 | ;;14122
|
|
101 | ;;11221
|
|
106 | ;;14221
|
|
107 | ;;24121
|
|
104 | ;;12241
|
|
105 | ;;14211
|
|
39 | ;;12231
|
|
38 | ;;12221
|
|
33 | ;;22212
|
|
31 | ;;21222
|
|
37 | ;;13122
|
|
36 | ;;12132
|
|
35 | ;;12122
|
|
34 | ;;22222
|
|
60 | ;;32211
|
|
61 | ;;32221
|
|
62 | ;;21212
|
|
63 | ;;21232
|
|
64 | ;;23212
|
|
65 | ;;11132
|
|
66 | ;;13112
|
|
67 | ;;13132
|
|
68 | ;;11231
|
|
69 | ;;13211
|
|
2 | ;;41111
|
|
116 | ;;12411
|
|
6 | ;;31114
|
|
T(X) | ||
99 | ;;14112
|
|
98 | ;;12142
|
|
91 | ;;33211
|
|
90 | ;;31231
|
|
93 | ;;22141
|
|
92 | ;;31411
|
|
95 | ;;11122
|
|
94 | ;;43111
|
|
97 | ;;12112
|
|
96 | ;;11142
|
|
11 | ;;2331112
|
|
10 | ;;21123
|
|
117 | ;;12421
|
|
CD(X) | ||
48 | ;;12312
|
|
49 | ;;12322
|
|
46 | ;;12223
|
|
47 | ;;11322
|
|
44 | ;;11223
|
|
45 | ;;12213
|
|
42 | ;;22131
|
|
43 | ;;23121
|
|
40 | ;;13221
|
|
41 | ;;22121
|
|
1 | ;;11431
|
|
5 | ;;11413
|
|
9 | ;;21121
|
|
77 | ;;11312
|
|
76 | ;;13213
|
|
75 | ;;11233
|
|
74 | ;;11213
|
|
73 | ;;23131
|
|
72 | ;;23111
|
|
71 | ;;21131
|
|
70 | ;;13231
|
|
79 | ;;13312
|
|
78 | ;;11332
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("RM" | BC128+16 |
Name | Line Occurrences |
---|---|
$$DATA | BC128+17 |
$$T | DATA+3, DATA+5 |
CD | DATA+6, DATA+8, DATA+9 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | BC128+15~, BC128+24* |
C | BC128+15~, BC128+18*, BC128+23, BC128+29 |
CD | DATA+2~, DATA+3*, DATA+10*, DATA+11, CD* |
D | BC128~, BC128+17*, BC128+24 |
H | BC128~, BC128+19*, BC128+23 |
LA71 | BC128+15~, BC128+25*, BC128+26, BC128+27, DATA+2~, DATA+7*, DATA+8 |
LA72 | BC128+15~, BC128+26*, BC128+27, BC128+29, DATA+2~, DATA+7*, DATA+9 |
LA73 | BC128+15~, BC128+27*, BC128+28, BC128+29, BC128+30 |
LA74 | BC128+15~, BC128+25*, BC128+27*, BC128+31*, BC128+32 |
LA75 | BC128+15~, BC128+25*, BC128+29*, BC128+30*, BC128+31 |
O | BC128~, BC128+19*, BC128+23, BC128+29, BC128+30, BC128+32 |
P | BC128+15~, BC128+18*, BC128+30, BC128+32 |
T | DATA+2~, DATA+3*, DATA+6*, DATA+7, DATA+8, T |
T1 | DATA+2~, DATA+5*, DATA+6 |
W | BC128~, BC128+19*, BC128+27, BC128+31 |
X | BC128+15~, BC128+16*, DATA~, DATA+1, DATA+3, DATA+4, DATA+5, DATA+7*, T~, CD~ |
XX | BC128~, BC128+21 |
Y | DATA+2~, DATA+3*, DATA+11, CD* |
YY | BC128~, BC128+22 |
Name | Field # of Occurrence |
---|---|
$T(@$ASCII^1;2(3) | BC128+25 |