Routine: DGPWBD

Information

DGPWBD ;ALB/CAW - Device Specifications for Patient Wristband ;2/14/95

Source file <DGPWBD.m>

Package	Total	Caller Graph
Registration	1	DGPWB

Name	Comments	DBIA/ICR reference
BL	; Barcode Blazer
ADD	; Add different barcode set up here

Name	Line Occurrences
Function Call: WRITE	Prompt: LINE,LINE1,! Line Location: BL+4
Function Call: WRITE	Prompt: LINE,LINE2,! Line Location: BL+5
Function Call: WRITE	Prompt: LINE,LINE3,! Line Location: BL+6
Function Call: WRITE	Prompt: LINE,LINE4,! Line Location: BL+7
Function Call: WRITE	Prompt: @^%ZIS(2,IOST(0),"BAR1") Line Location: BL+14
Function Call: WRITE	Prompt: VARIABLE Line Location: BL+15
Function Call: WRITE	Prompt: $E(LINE1,1,28) Line Location: ADD+14
Function Call: WRITE	Prompt: ! Line Location: ADD+16
Function Call: WRITE	Prompt: @CPSLINE Line Location: ADD+26
Function Call: WRITE	Prompt: "Printed: "_$E(DT,4,5),"/",$E(DT,6,7),"/",$E(DT,2,3) Line Location: ADD+37
Function Call: WRITE	Prompt: ! Line Location: ADD+39
Function Call: WRITE	Prompt: $S(DUZ("AG")="I":+$E(CPSPID1,7,$L(CPSPID1)),1:+CPSPID1) Line Location: ADD+48
Function Call: WRITE	Prompt: ! Line Location: ADD+50
Function Call: WRITE	Prompt: ! Line Location: ADD+53

FileNo	Call Tags
^AUPNPAT - [#9000001]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^%ZIS(2 - [#3.2]	BL+4, BL+5, BL+6, BL+7, BL+14, ADD+6

Name	Line Occurrences
ADD	BL+2

Name	Field # of Occurrence
^(	ADD+6
^(1	ADD+6

Name	Field # of Occurrence
CPSIO	ADD+2~, ADD+7*
CPSIO(	ADD+6*, ADD+11, ADD+13, ADD+15, ADD+19, ADD+21, ADD+25, ADD+27, ADD+31, ADD+33 , ADD+36, ADD+38, ADD+43, ADD+45, ADD+47, ADD+49, ADD+52
CPSLINE	ADD+2~, ADD+26*
>> CPSMOM	ADD+30
CPSPID	ADD+2~, ADD+4*, ADD+18
CPSPID1	ADD+2~, ADD+8*, ADD+20, ADD+44, ADD+48
>> DFN	BL+12, ADD+8, ADD+32
>> DMCNT	ADD+41*, ADD+42
DT	ADD+37
DUZ("AG"	ADD+8, ADD+20, ADD+48
DUZ(2	BL+12, ADD+8
I	ADD+2~, ADD+6, ADD+11, ADD+13, ADD+15, ADD+19, ADD+21, ADD+25, ADD+27, ADD+31* , ADD+33, ADD+36, ADD+38, ADD+43, ADD+45, ADD+47, ADD+49, ADD+52
IO	BL+3, ADD+9
IOST	BL+2
IOST(0	BL+4, BL+5, BL+6, BL+7, BL+14, ADD+6
>> J	ADD+42*
LINE	BL+1~, BL+4, BL+5, BL+6, BL+7
>> LINE1	BL+4, ADD+14
>> LINE2	BL+5
>> LINE3	BL+6
>> LINE4	BL+7
>> NUM	ADD+24*, ADD+25, ADD+26, ADD+27
>> VARIABLE	BL+12*, BL+15
>> X0	ADD+6*