Routine: ALPBFRM1

Package	Total	Call Graph
Barcode Medication Administration	2	($$FDATE,$$OTYP,$$PAD,FDATES)^ALPBUTL $$LACT^ALPBUTL3
Kernel	2	($$DT,$$FMADD,$$FMTE)^XLFDT $$REPEAT^XLFSTR

Package	Total	Caller Graph
Barcode Medication Administration	4	ALPBPALL ALPBPCLN ALPBPPAT ALPBPWRD

Name	Field # of Occurrence
$$FDATE^ALPBUTL	REMOV+132, REMOV+141, REMOV+157
$$OTYP^ALPBUTL	REMOV+106, ADMTIM+16
$$PAD^ALPBUTL	REMOV+18, REMOV+19, REMOV+22, REMOV+23, REMOV+24, REMOV+33, REMOV+68, REMOV+85, REMOV+121, REMOV+122 , REMOV+133, REMOV+134, REMOV+142, REMOV+143, ADMTIM+8, ADMTIM+11, ADMTIM+12, ADMTIM+14, ENDGRID+5
FDATES^ALPBUTL	F132+29
$$LACT^ALPBUTL3	REMOV+153
$$DT^XLFDT	F132+28
$$FMADD^XLFDT	ASTER+7
$$FMTE^XLFDT	REMOV+32, REMOV+33
$$REPEAT^XLFSTR	REMOV+27, REMOV+155, ENDGRID+20

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AD	F132+15~, REMOV+173, ADMTIM+9, ADMTIM+11, ADMTIM+12, ASTER+2
AINDX	F132+15~, REMOV+3*, REMOV+10, REMOV+11
ALPBADM	F132+14~, F132+32, REMOV+4, REMOV+7, REMOV+10, REMOV+12, REMOV+169, ADMTIM
ALPBADM(	REMOV+6, REMOV+10, REMOV+11*, ADMTIM+2
ALPBADM(1	REMOV+14*
ALPBADM(2	REMOV+14*
ALPBADMT	ADMTIM+2, ADMTIM+3, ADMTIM+7, ADMTIM+13, ADMTIM+16, ADMTIM+17, ADMTIM+18, ASTER+10!
ALPBDAY	ADMTIM+18*, ASTER+3, ASTER+4, ASTER+6, ASTER+7, ASTER+10!
ALPBDAYS	F132+14~, F132+29
ALPBDAYS(	ADMTIM+18
ALPBDAYS(0	REMOV+24
>> ALPBDNM	REMOV+151*, REMOV+157
ALPBDOA	F132+15~, REMOV+1*, ASTER+7
ALPBDRUG	F132+14~, REMOV+43, REMOV+48, REMOV+51!, REMOV+59, REMOV+61, REMOV+62, REMOV+63, REMOV+64!, REMOV+76* , REMOV+78, REMOV+79, REMOV+80, REMOV+81!
ALPBFLG	F132+14~, ENDGRID+3, ENDGRID+4, ENDGRID+6
ALPBIBOX	F132+14~, REMOV+167*, ADMTIM+19, ENDGRID!
ALPBLINE	ENDGRID+14*, ENDGRID+16, ENDGRID+17!
ALPBMDT	REMOV+127, REMOV+128, REMOV+130, REMOV+145!
ALPBMLC	F132+14~, REMOV+127, REMOV+128, REMOV+130, REMOV+131, REMOV+136, REMOV+140*, REMOV+145!
ALPBNBOX	F132+14~, REMOV+168*, ASTER+3, ASTER+4, ASTER+6, ASTER+8, ENDGRID!
ALPBNOAS	F132+15~, ADMTIM+16*, ADMTIM+17, ASTER+3
ALPBPBOX	F132+14~, ADMTIM+19, ASTER+3, ASTER+4, ASTER+6, ASTER+8*, ASTER+9, ASTER+10!
ALPBPRN	F132+14~, ADMTIM+1, ENDGRID+3, ENDGRID+4, ENDGRID+5
ALPBPRNG	F132+14~, REMOV+91, REMOV+92, ADMTIM+16, ENDGRID+2
ALPBRM	F132+15~, REMOV*, REMOV+9, REMOV+11, REMOV+13, REMOV+14
ALPBSTOP	F132+14~, REMOV+172, ADMTIM+17, ASTER+4, ASTER+8
ALPBTEXT	F132+14~, ENDGRID+11!*, ENDGRID+17!
ALPBTEXT(	ENDGRID+13, ENDGRID+14
ALPBTIME	F132+14~
ALPBTSTART	F132+14~, REMOV+171, ADMTIM+17, ASTER+3, ASTER+8
ALPBX	F132+14~, F132+31, F132+32, REMOV+2, REMOV+3, REMOV+5, REMOV+6, REMOV+13, REMOV+41, REMOV+42* , REMOV+43, REMOV+52, REMOV+57, REMOV+58, REMOV+59, REMOV+61, REMOV+65, REMOV+69!, REMOV+74, REMOV+75 , REMOV+76, REMOV+78, REMOV+82, REMOV+86!, REMOV+129, REMOV+130, REMOV+132, REMOV+133, REMOV+134, REMOV+138 , REMOV+139, REMOV+141, REMOV+142, REMOV+143, REMOV+144!, REMOV+149, REMOV+150, REMOV+151, REMOV+159!, ENDGRID+12* , ENDGRID+13*, ENDGRID+14, ENDGRID+17!
ALPDRUG	REMOV+151*, REMOV+152, REMOV+153, REMOV+159!
ALPLACT	REMOV+153*, REMOV+154, REMOV+157, REMOV+158, REMOV+159!
ALPPAT	F132~, REMOV+148, REMOV+153
BOLDOFF	F132+14~, F132+18*, REMOV+43, REMOV+62, REMOV+79
BOLDON	F132+14~, F132+18*, REMOV+43, REMOV+62, REMOV+79
DATA	F132~, F132+12
DATA(	REMOV, REMOV+1
DATA("HAZTODISP"	REMOV+47
DATA("HAZTOHAND"	REMOV+46
DATA(0	REMOV+29, REMOV+109
DATA(1	REMOV+32, REMOV+33, REMOV+171, REMOV+172, ADMTIM+17
DATA(10	REMOV+115, REMOV+118, REMOV+123, REMOV+128, REMOV+130, REMOV+132, REMOV+133, REMOV+134, REMOV+138, REMOV+139 , REMOV+141, REMOV+142, REMOV+143
DATA(2	REMOV+98, REMOV+100, REMOV+101, REMOV+103
DATA(3	REMOV+106, ADMTIM+16
DATA(4	F132+31, REMOV+89, REMOV+92
DATA(5	ENDGRID+10, ENDGRID+11
DATA(7	REMOV+38, REMOV+42, REMOV+43, REMOV+52, REMOV+150, REMOV+151
DATA(8	REMOV+54, REMOV+58, REMOV+59, REMOV+61, REMOV+65
DATA(9	REMOV+71, REMOV+75, REMOV+76, REMOV+78, REMOV+82
DATE	F132+14~, F132+28*, F132+29
DAYS	F132~, F132+26, F132+27, F132+29, REMOV+25, ADMTIM+15
HZ	REMOV+45~, REMOV+46, REMOV+47*, REMOV+49
I	F132+15~, REMOV+5, REMOV+6, REMOV+10, REMOV+11, REMOV+161, ADMTIM*, ADMTIM+1, ADMTIM+2, ADMTIM+4 , ADMTIM+5, ADMTIM+8, ADMTIM+11, ADMTIM+12, ADMTIM+13, ADMTIM+14, ASTER+9
J	F132+15~, ADMTIM+15*, ADMTIM+18
LINE	F132+14~, REMOV+36, REMOV+39, REMOV+40, REMOV+48, REMOV+49, REMOV+50, REMOV+52, REMOV+55, REMOV+56 , REMOV+63, REMOV+66, REMOV+67, REMOV+68, REMOV+72, REMOV+73, REMOV+80, REMOV+83, REMOV+84, REMOV+85 , REMOV+88, REMOV+89, REMOV+97, REMOV+98, REMOV+99, REMOV+100, REMOV+102, REMOV+103, REMOV+105, REMOV+106 , REMOV+108, REMOV+109, REMOV+112, REMOV+113, REMOV+116, REMOV+117, REMOV+119, REMOV+120, REMOV+121, REMOV+122 , REMOV+124, REMOV+125, REMOV+131, REMOV+132, REMOV+133, REMOV+134, REMOV+140, REMOV+141, REMOV+142, REMOV+143 , REMOV+155, REMOV+156, REMOV+157, REMOV+158, REMOV+161, REMOV+162, REMOV+163, ADMTIM+6, ENDGRID+6, ENDGRID+15* , ENDGRID+16, ENDGRID+19*, ENDGRID+20, ENDGRID+21
MLCNT	F132~, REMOV+128, REMOV+130, REMOV+136
REMTIM	F132+15~, ASTER+7*, ASTER+8
RESULTS	F132~
RESULTS(	REMOV+40, REMOV+48, REMOV+49, REMOV+50, REMOV+56, REMOV+63, REMOV+67, REMOV+68, REMOV+73, REMOV+80 , REMOV+84, REMOV+85, REMOV+89, REMOV+98, REMOV+100, REMOV+103, REMOV+106, REMOV+109, REMOV+113, REMOV+117 , REMOV+120, REMOV+121, REMOV+122, REMOV+125, REMOV+132, REMOV+133, REMOV+134, REMOV+141, REMOV+142, REMOV+143 , REMOV+155, REMOV+157, REMOV+158, REMOV+163, ADMTIM+4, ADMTIM+5, ADMTIM+8, ADMTIM+11, ADMTIM+12, ADMTIM+13* , ADMTIM+14, ASTER+9, ENDGRID+4, ENDGRID+5, ENDGRID+16, ENDGRID+20
RESULTS(0	ENDGRID+21*
RESULTS(1	REMOV+17, REMOV+18, REMOV+19*
RESULTS(2	REMOV+21, REMOV+22, REMOV+23, REMOV+24, REMOV+25*
RESULTS(3	REMOV+27*
RESULTS(4	REMOV+29*
RESULTS(5	REMOV+32, REMOV+33
SPC	REMOV+45~
TAB	REMOV+45~
U	REMOV, REMOV+1, REMOV+29
X	F132+14~

Customize PDF page

Package: Barcode Medication Administration

Routine: ALPBFRM1

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 4

Entry Points

External References

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
F132(DATA,DAYS,MLCNT,RESULTS,ALPPAT)	; format data into a 132-column ; output array... ; DATA = an array containing a specific order node for a selected ; patient in file 53.7 ; DAYS = a number that represents the number of initial boxes ; (1 box = 1 day) to add to lines 4-10 (max=7 -- note that ; this is usually a 3-day MAR, but a 7-day MAR could be ; returned from this format utility) ; MLCNT = Number of Med-log entries to print with orders ; RESULTS = an array passed by reference into which the formatted ; entry is set up returns a formatted array in RESULTS ; (note: total line count is returned at RESULTS(0))
REMOV
ADMTIM
ASTER
ENDGRID