Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: LA7SBC

Package: Automated Lab Instruments

Routine: LA7SBC


Information

LA7SBC ;DALISC/JMC - HP-PCL Compatible Barcode 128 Utility ; 12/3/1997

Source Information

Source file <LA7SBC.m>

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Automated Lab Instruments 1 LA7SMP0  
IHS Changes To Lab 1 BLRAG09E  

Entry Points

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

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt:
  • Line Location: BC128+9
Function Call: WRITE
  • Prompt: $C(27),"&f0S"
  • Line Location: BC128+20
Function Call: WRITE
  • Prompt: C_H_$E("BA",O)
  • Line Location: BC128+23
Function Call: WRITE
  • Prompt: C_LA73_$E("ab",O)_"0P"
  • Line Location: BC128+29
Function Call: WRITE
  • Prompt: P_(LA73+LA75)_$E("XY",O)
  • Line Location: BC128+30
Function Call: WRITE
  • Prompt: $C(27),"&f1S"
  • Line Location: BC128+33

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("RM" BC128+16

Label References

Name Line Occurrences
$$DATA BC128+17
$$T DATA+3, DATA+5
CD DATA+6, DATA+8, DATA+9

Local Variables

Legend:

>> 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

Marked Items

Name Field # of Occurrence
$T(@$ASCII^1;2(3) BC128+25
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All