Routine: PSOCMOPC

Package	Total	Call Graph
Outpatient Pharmacy	2	$$FILTRAN^PSOCMOP ^PSOCMOPA
VA Fileman	2	NOW^%DTC ^DIE

Package	Total	Caller Graph
Outpatient Pharmacy	1	PSOOREDT

Entry Points

Name	Comments	DBIA/ICR reference
QUIT
UNSUS	; If Rx is suspended and is not CMOP, ensure is not suspended as CMOP
EN(XDA)
ACT	; If no act node, make one .... determine last entry
KMAIL
CHECK

FileNo	Call Tags
^PS(52.5 - [#52.5]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^PS(52.5 - [#52.5]	EN+10!, UNSUS+3*, CHECK+2, CHECK+3
^PS(55 - [#55]	CHECK+6
^PSDRUG - [#50]	CHECK+11
^PSDRUG("AQ"	CHECK+10
^PSRX - [#52]	EN+6, EN+10, EN+12, EN+14, EN+16, UNSUS+3, UNSUS+5, UNSUS+7, UNSUS+9*, ACT+1 , ACT+2, ACT+3, CHECK+6, CHECK+10, CHECK+14, CHECK+16, CHECK+18, CHECK+20

Name	Field # of Occurrence
^(0	ACT+1*, CHECK+3

Name	Field # of Occurrence
%	EN+16, EN+17!, UNSUS+9
A	EN~, EN+14, UNSUS+7, QUIT!, ACT+3*
A1	EN~, EN+14, UNSUS+7, QUIT!, ACT+3*
CMOP	EN~, EN+9, UNSUS+1, QUIT!, CHECK, CHECK+23
CMOP("52.5"	EN+5, EN+10, EN+11, UNSUS+2
CMOP("L"	EN+16, UNSUS+9, CHECK+20!, CHECK+22
CMOP("S"	EN+9, UNSUS+1
DA	EN~, EN+2, EN+11, UNSUS+2, UNSUS+3, UNSUS+10
DIE	EN+11!, UNSUS+2!
DR	EN+11, UNSUS+2!
DT	CHECK+7
DUZ	EN+16, UNSUS+9
>> ORN	EN+6
PSOA	EN~, QUIT!, ACT+2*, ACT+4!
PSOB	EN~, EN+16, UNSUS+9, QUIT!, ACT+2*
PSOCK	EN~, QUIT!, CHECK+10*, CHECK+11
PSOCMDT	CHECK+6*, CHECK+7, KMAIL!
PSOCMMAI	CHECK+6*, CHECK+7, KMAIL!
PSOCMPAT	CHECK+6*, KMAIL!
PSOCMSUS	CHECK+2*, CHECK+3!, CHECK+4!
>> PSOFROM	CHECK+12
>> PSOLST(	EN+6
>> PSOMW	CHECK+20*
>> PSXSYS	CHECK
T	EN~, EN+12, EN+13, EN+17!, UNSUS+5, UNSUS+6, QUIT!
T1	EN~, EN+13, EN+16, EN+17!, UNSUS+6, UNSUS+9, QUIT!
XDA	EN~, EN+2, EN+10, EN+12, EN+14, EN+16, UNSUS+3, UNSUS+5, UNSUS+7, UNSUS+9 , UNSUS+10, QUIT!, ACT+1, ACT+2, ACT+3, CHECK+2, CHECK+6, CHECK+10, CHECK+14, CHECK+16 , CHECK+18, CHECK+20, CHECK+22