Routine: PSBOCI1

Information

PSBOCI1 ;BIRMINGHAM/TEJ-COVERSHEET IV OVERVIEW REPORT ;Mar 2004

Package	Total	Call Graph
Barcode Medication Administration	2	($$FMTDT,FORMDAT,WRAPPER)^PSBOCE1 BAGDTL^PSBRPC2

Package	Total	Caller Graph
Barcode Medication Administration	1	PSBOCI

Name	Comments	DBIA/ICR reference
PTFTR	;Patient Page footer
BUILDLN	; Constr recs

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: PTFTR+1
Function Call: WRITE	Prompt: !,$TR($J("",IOM)," ","=") Line Location: PTFTR+2
Function Call: WRITE	Prompt: !,PSBHDR("NAME"),?(IOM-11\2),PSBHDR("SSN"),?(IOM-$L(X)),X Line Location: PTFTR+4
Function Call: WRITE	Prompt: !,PSBRPNM," ",?(PSBPGRM-($L(PSBDTTM)+3)),PSBDTTM_" "_PSBPG Line Location: PTFTR+7

Name	Field # of Occurrence
IOM	PTFTR+2, PTFTR+4
IOSL	PTFTR+1
J	BUILDLN+1!, BUILDLN+5, BUILDLN+7, BUILDLN+8, BUILDLN+13, BUILDLN+17, BUILDLN+18*
J(	BUILDLN+1, BUILDLN+7, BUILDLN+8, BUILDLN+18
J(""	BUILDLN+5, BUILDLN+8
J(0	BUILDLN+1*
>> N	BUILDLN+5, BUILDLN+9, BUILDLN+10, BUILDLN+11, BUILDLN+12, BUILDLN+15, BUILDLN+16
>> PSBBLANK	BUILDLN+7, BUILDLN+8, BUILDLN+18
>> PSBCFLG	BUILDLN+10, BUILDLN+15
>> PSBDATA(2	BUILDLN+11, BUILDLN+12, BUILDLN+13!, BUILDLN+16*, BUILDLN+17!
>> PSBDTTM	PTFTR+7
>> PSBFLD	BUILDLN+1*
>> PSBHDR("NAME"	PTFTR+4
>> PSBHDR("ROOM"	PTFTR+3
>> PSBHDR("SSN"	PTFTR+4
>> PSBHDR("WARD"	PTFTR+3
>> PSBLGD(	BUILDLN+14
>> PSBLGD("INITIALS"	BUILDLN+14*
>> PSBOUTP(""	PTFTR+5
>> PSBPG	PTFTR+5*, PTFTR+6, PTFTR+7
>> PSBPGNUM	PTFTR+5
>> PSBPGRM	PTFTR+6*, PTFTR+7
>> PSBRPLN(	BUILDLN+7, BUILDLN+8, BUILDLN+18*
>> PSBRPLN(""	BUILDLN+1
>> PSBRPNM	PTFTR+7
>> PSBTAB7	PTFTR+6
>> PSBX2X	BUILDLN+6, BUILDLN+14
PSBXDTL	BUILDLN+5!*, BUILDLN+6
PSBXDTL(	BUILDLN+9
PSBXDTL(0	BUILDLN+9
PSBXDTL(1	BUILDLN+7
>> PSBXFLG	BUILDLN+3
U	BUILDLN+7, BUILDLN+10, BUILDLN+11, BUILDLN+12, BUILDLN+15, BUILDLN+16
>> X	PTFTR+3*, PTFTR+4
>> XI	BUILDLN+6
>> Y	BUILDLN+5, BUILDLN+9