Routine: GMTSPSO

Package	Total	Call Graph
Health Summary	3	MAIN^GMTSPSO7 ($$HF,$$NDBI,$$ROK,REGDT4)^GMTSU CKP^GMTSUP
Outpatient Pharmacy	2	PROF^PSO52API (,ACS)^PSOHCSUM
Kernel	1	$$VERSION^XPDUTL
Pharmacy Data Management	1	PSS^PSS59P7
Uncategorized	1	HS^A7RPSOHS

Entry Points

Name	Comments	DBIA/ICR reference
PARSE	; Parses Medication Instructions
WRT	; Writes OP Pharmacy Segment Record
MAIN	; OP Rx HS Comp ; Check for version 7 (or greater) MAIN^GMTSPSO7
HEAD	; Prints Header

Name	Field # of Occurrence
HS^A7RPSOHS	MAIN+9, MAIN+14, MAIN+15
MAIN^GMTSPSO7	MAIN+2
$$HF^GMTSU	WRT+1
$$NDBI^GMTSU	MAIN+9, MAIN+14, MAIN+15
$$ROK^GMTSU	MAIN+9, MAIN+14, MAIN+15
REGDT4^GMTSU	WRT+5
CKP^GMTSUP	MAIN+11, WRT+8, WRT+11, WRT+12, WRT+13, HEAD+3, HEAD+5, HEAD+6
PROF^PSO52API	MAIN+8
^PSOHCSUM	MAIN+15
ACS^PSOHCSUM	MAIN+14, MAIN+15
PSS^PSS59P7	HEAD+2
$$VERSION^XPDUTL	MAIN+2

Name	Line Occurrences
Function Call: WRITE	Prompt: "Patient Has Archived OP Prescriptions",! Line Location: MAIN+11
Function Call: WRITE	Prompt: "Patient Has Archived OP Prescriptions",! Line Location: MAIN+13
Function Call: WRITE	Prompt: $P($P(GMR,U,3),";",2) Line Location: WRT+9
Function Call: WRITE	Prompt: !,?18,$P(GMR,U,6),?31,$S($P($P(GMR,U,5),";")="S":"ACTIVE/SUSP",1:$P($P(GMR,U,5),";",2)),?45,$P(GMR,U,7),?54,ID,?65,LFD,?76,"("_$P(GMR,U,8)_")",! Line Location: WRT+10
Function Call: WRITE	Prompt: ?2,"SIG: ",MI,! Line Location: WRT+11
Function Call: WRITE	Prompt: ?2,"SIG: " Condition for execution: GMI=1 Line Location: WRT+12
Function Call: WRITE	Prompt: ?7,MI(GMI),! Line Location: WRT+12
Function Call: WRITE	Prompt: ?4,"Provider: ",$E(GMD,1,22) Line Location: WRT+13
Function Call: WRITE	Prompt: ?37,"Cost/Fill: $",$J(CF,6,2) Condition for execution: CF Line Location: WRT+13
Function Call: WRITE	Prompt: ?57,"Exp/Can Dt: "_ECD Line Location: WRT+14
Function Call: WRITE	Prompt: ! Line Location: WRT+15
Function Call: WRITE	Prompt: "Outpatient prescriptions are cancelled 72 hours after admission",! Line Location: HEAD+3
Function Call: WRITE	Prompt: "Outpatient prescriptions are cancelled 72 hours after admission",! Line Location: HEAD+4
Function Call: WRITE	Prompt: !,"Drug....................................",?65,"Last",! Line Location: HEAD+5
Function Call: WRITE	Prompt: ?18,"Rx #",?31,"Stat",?45,"Qty",?54,"Issued",?65,"Filled",?76,"Rem" Line Location: HEAD+7

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	HEAD+3
^TMP("PSOO"	MAIN+7!, MAIN+14, MAIN+15, MAIN+18, MAIN+20!, WRT+6
^TMP($J	MAIN+7!, MAIN+10, MAIN+11, HEAD+2!, HEAD+3

Name	Field # of Occurrence
^(	MAIN+18, HEAD+3

Name	Field # of Occurrence
CF	WRT+1~, WRT+2*, WRT+13
>> DFN	MAIN+8, MAIN+9, MAIN+10, MAIN+11, MAIN+14, MAIN+15, HEAD+3
ECD	MAIN+4~, WRT+2*, WRT+14
GMD	WRT+1~, WRT+7*, WRT+13
GMI	WRT+1~, WRT+12, PARSE+1~, PARSE+4
GMR	MAIN+4~, MAIN+18*, WRT+2, WRT+7, WRT+9, WRT+10, WRT+14
>> GMRANGE	WRT+4
GMTOP	MAIN+4~, MAIN+17, WRT+9, WRT+11, WRT+12, WRT+15, HEAD+1
>> GMTS1	WRT+4
>> GMTS2	MAIN+5
>> GMTSLO	MAIN+16, MAIN+19, HEAD+8
>> GMTSNPG	WRT+9, WRT+11, WRT+12, WRT+13
>> GMTSQIT	MAIN+11, WRT+8, WRT+11, WRT+12, WRT+13, HEAD+3, HEAD+5, HEAD+6
GMV	WRT+1~, WRT+5*
GMX	MAIN+4~, MAIN+17, WRT+9, WRT+11, HEAD+3
GUI	WRT+1~*, HEAD+8
ID	WRT+1~, WRT+2*, WRT+4, WRT+10
IOSL	HEAD+8
IX	MAIN+4~, MAIN+17, MAIN+18, WRT+6
LFD	WRT+1~, WRT+2*, WRT+10
MI	WRT+1~, WRT+6*, WRT+11, PARSE+2, PARSE+3, PARSE+4
MI(	WRT+12, PARSE+4*
NL	WRT+1~, WRT+6, WRT+11, WRT+12, PARSE+2, PARSE+3, PARSE+4
NW	PARSE+1~, PARSE+3*
PSOACT	MAIN+4~, MAIN+6*
PSOBEGIN	MAIN+4~, MAIN+5*, MAIN+6!
U	WRT+2, WRT+7, WRT+9, WRT+10, WRT+14
WPL	PARSE+1~, PARSE+3*, PARSE+4
X	WRT+1~, WRT+5*!

Name	Field # of Occurrence
$T(ACS^PSOHCSUM	MAIN+14, MAIN+15