Routine: PSGCAPP0

Package	Total	Call Graph
Inpatient Medications	2	(ADR,ALG)^PSJHEAD ATS^PSJMUTL
Adverse Reaction Tracking	1	^GMRADPT
VA Fileman	1	^DIR

Package	Total	Caller Graph
Inpatient Medications	1	PSGCAPP

Entry Points

Name	Comments	DBIA/ICR reference
ALG	; NOT USED ANYMORE, ALG^PSJHEAD
NONE	;
H1	; first header for patient
ADR	; NOT USED ANYMORE, ADR^PSJHEAD
ENRCT	;

External References

Name	Field # of Occurrence
^DIR	H1+1
^GMRADPT	ENRCT+1
ADR^PSJHEAD	H1+17
ALG^PSJHEAD	H1+17
ATS^PSJMUTL	H1+15

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !?26,"UNIT DOSE ACTION PROFILE #2",?62,PSGPDT,!?+PSGVAMC,$P(PSGVAMC,U,2),!?23,"(Continuation of VA FORM 10-1158)",?72,"Page: 1",!,LINE Line Location: H1+5
Function Call: WRITE	Prompt: @IOF Condition for execution: $Y Line Location: H1+6
Function Call: WRITE	Prompt: !?26,"UNIT DOSE ACTION PROFILE #2",?62,PSGPDT,!?+PSGVAMC,$P(PSGVAMC,U,2),!?23,"(Continuation of FORM)",?72,"Page: 1",!,LINE Line Location: H1+6
Function Call: WRITE	Prompt: !," A new order must be written for any new medication or to make any changes",!," in dosage or directions on an existing order.",!,LINE Line Location: H1+7
Function Call: WRITE	Prompt: ?23,"Last " Condition for execution: PSJPDD Line Location: H1+8
Function Call: WRITE	Prompt: "Room-Bed: ",RB,?53,"Ht(cm): ",HT," ",HTD Line Location: H1+8
Function Call: WRITE	Prompt: !?4,"DOB: "_PDOB_" ("_PAGE_")",?53,"Wt(kg): "_WT," ",WTD Line Location: H1+9
Function Call: WRITE	Prompt: !?4,"Sex: "_PSEX,?51,"Admitted: "_AD Line Location: H1+10
Function Call: WRITE	Prompt: !?5,"Dx: "_PI Line Location: H1+12
Function Call: WRITE	Prompt: ?43,"Last Transferred: "_TD Condition for execution: TD Line Location: H1+12
Function Call: WRITE	Prompt: !?1,"Allergies: " Line Location: H1+17
Function Call: WRITE	Prompt: !,LINE,!,"No. Action",?16,"Drug",?46,"ST Start Stop Status/Info",!,ALN Line Location: H1+19
Function Call: WRITE	Prompt: !?7,"ADR: " Line Location: NONE+1
Function Call: WRITE	Prompt: "____________________________________" Condition for execution: $E(IOST)="P" Line Location: NONE+1
Function Call: WRITE	Prompt: "No Allergy Assessment" Line Location: NONE+2
Function Call: WRITE	Prompt: !?7,"ADR: " Line Location: NONE+2
Function Call: WRITE	Prompt: "____________________________________" Condition for execution: $E(IOST)="P" Line Location: NONE+2
Function Call: WRITE	Prompt: !?12 Condition for execution: KKA>1 Line Location: ALG+2
Function Call: WRITE	Prompt: PSGALG(KKA) Line Location: ALG+2
Function Call: WRITE	Prompt: !?7,"ADR: " Line Location: ADR+2
Function Call: WRITE	Prompt: !?12 Condition for execution: KKA>1 Line Location: ADR+3
Function Call: WRITE	Prompt: PSGADR(KKA) Line Location: ADR+3
Function Call: WRITE	Prompt: "," Condition for execution: X>1 Line Location: ENRCT+3
Function Call: WRITE	Prompt: ! Condition for execution: $X+$L(RCT)>77 Line Location: ENRCT+3
Function Call: WRITE	Prompt: " ",RCT Line Location: ENRCT+3
Function Call: WRITE	Prompt: "," Condition for execution: X>1 Line Location: ENRCT+4
Function Call: WRITE	Prompt: ! Condition for execution: $X+$L(RCT)>77 Line Location: ENRCT+4
Function Call: WRITE	Prompt: " ",RCT Line Location: ENRCT+4
Function Call: WRITE	Prompt: !,LINE,!," No.",?11,"Drug",?46,"ST Start Stop Status/Info",!,ALN Line Location: ENRCT+5
Routine Call	DIR Line Location: H1+1

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> AD	H1+2*, H1+10
>> ALFLG	H1+15, H1+17, ALG+1, ADR+1
>> ALN	H1+19, ENRCT+5
>> DF	H1+2*
DFN	ENRCT+1~*
DIR	H1+1!
DIR(0	H1+1*
>> DTOUT	H1+1
>> DUOUT	H1+1
GMRA	ENRCT+1~*
GMRAL	ENRCT+1~
GMRAL(	ENRCT+2
>> HT	H1+2*, H1+8
>> HTD	H1+2*, H1+8
IOF	H1+6
IOST	H1+1, H1+18, NONE+2
>> KKA	ALG+2, ADR+3
>> LINE	H1+6, H1+7, H1+19, ENRCT+5
>> N	H1+2*
>> PAGE	H1+3*, H1+9
>> PDOB	H1+2, H1+3, H1+9
>> PG	H1+3*
>> PI	H1+2*, H1+12
>> PID	H1+2*, H1+8
>> PN	H1+2, H1+14
>> PPAGE	H1+14*, ALG+1
>> PPN	H1+2*, H1+8
>> PS1	H1+8
>> PSEX	H1+2*, H1+10
>> PSGADR	H1+17, ALG+1
>> PSGADR(	ADR+3
>> PSGALG	H1+17, ALG+1
>> PSGALG(	ALG+2
>> PSGAPS	H1+8
>> PSGP	H1+2, H1+14, ENRCT+1
>> PSGPDT	H1+6
>> PSGPTMP	H1+14*
>> PSGVADR	H1+17
>> PSGVALG	H1+17
>> PSGVAMC	H1+6
>> PSJDLW	H1+1*
>> PSJPDD	H1+8
>> RB	H1+2*, H1+8
RCT	ENRCT+1~, ENRCT+4*
RCT(	ENRCT+2*, ENRCT+4
>> TD	H1+2*, H1+12
U	H1+6, H1+14, ENRCT+2
>> WD	H1+8
>> WT	H1+2*, H1+9
>> WTD	H1+2*, H1+9
X	ENRCT+1~, ENRCT+2, ENRCT+4

Customize PDF page

Package: Inpatient Medications

Routine: PSGCAPP0

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Label References

Local Variables

Legend: