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

Package: CIA Utilities

Routine: CIAUBCDA


Information

CIAUBCDA ;MSC/IND/PLS - Converts barcode CODABAR to HPCL-compatible format ;04-May-2006 08:19;DKM

Source Information

Source file <CIAUBCDA.m>

Entry Points

Name Comments DBIA/ICR reference
BC(TXT,ORN,HGT,HOR,VER,WID,SSC) ;
1 ;;1;1111331
0 ;;0;1111133
3 ;;3;3311111
2 ;;2;1113113
5 ;;5;3111131
4 ;;4;1131131
7 ;;7;1311311
6 ;;6;1311113
9 ;;9;3113111
8 ;;8;1331111
CHK(X) ;CALCULATE CHECK DIGIT AND RETURN STRING TO PRINT
11 ;;$;1133111
10 ;;-;1113311
13 ;;/;3131113
12 ;;:;3111313
15 ;;+;1131313
14 ;;.;3131311
17 ;;BbNn;1313113
16 ;;AaTt;1133131
19 ;;DdEe;1113331
18 ;;Cc*;1113133

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(27),"&f0S"
  • Line Location: BC+9
Function Call: WRITE
  • Prompt: C_HGT_$E("BA",ORN)
  • Line Location: BC+12
Function Call: WRITE
  • Prompt: C_Z3_$E("ab",ORN)_"0P"
  • Line Location: BC+18
Function Call: WRITE
  • Prompt: P_(Z3+Z5)_$E("XY",ORN)
  • Line Location: BC+19
Function Call: WRITE
  • Prompt: $C(27),"&f1S"
  • Line Location: BC+22

Global Variables Directly Accessed

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

Label References

Name Line Occurrences
$$CHK BC+7
16 BC+14
17 BC+14
18 BC+14
19 BC+14

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
C BC+1~, BC+8*, BC+12, BC+18
CH BC+1~, BC+4*, BC+5, CHK+7, CHK+8
CHK BC+1~, BC+3*, BC+7, CHK+2~, CHK+3*, CHK+5*, CHK+7*, CHK+8*, CHK+9
DD BC+1~, BC+5*, BC+6
HGT BC~, BC+8*, BC+12
HOR BC~, BC+10
ORN BC~, BC+3*, BC+8*, BC+12, BC+18, BC+19, BC+21
P BC+1~, BC+8*, BC+19, BC+21
SSC BC~
TXT BC~, BC+5, BC+6*, BC+7*, BC+13, BC+14
VER BC~, BC+11
WID BC~, BC+8*, BC+16, BC+20, BC+21
X BC+1~, BC+2*, CHK~, CHK+1, CHK+3, CHK+4, CHK+7*
XX CHK+2~, CHK+4*, CHK+5
Y CHK+2~, CHK+3*, CHK+9
Z BC+1~, BC+13*, BC+14
Z1 BC+1~, BC+14*, BC+15, BC+16, CHK+2~, CHK+5*
Z2 BC+1~, BC+15*, BC+16, BC+18
Z3 BC+1~, BC+16*, BC+17, BC+18, BC+19
Z4 BC+1~, BC+14*, BC+16*, BC+20*
Z5 BC+1~, BC+14*, BC+18*, BC+19*, BC+20, BC+21
ZDD BC+1~, BC+5*

Marked Items

Name Field # of Occurrence
$T(16 BC+14
$T(17 BC+14
$T(18 BC+14
$T(19 BC+14
$T(@(6) BC+14
Info |  Source |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All