Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: PSORN52

Package: Outpatient Pharmacy

Routine: PSORN52


Information

PSORN52 ;BIR/DSD - files renewal entries in prescription file ;08/09/93

Source Information

Source file <PSORN52.m>

Call Graph

Call Graph

Call Graph Total: 20

Package Total Call Graph
Outpatient Pharmacy 17 TRI^PSOBBC  ECMESND^PSOBPSU1  $$SUBMIT^PSOBPSUT  COPAY^PSOCPB  $$TECH2^PSODGDGP  (SC,SHAD)^PSOMLLD2  ($$DT,CV,HNC,MST,PGW,RAD,VEH)^PSOMLLDT  INIT^PSON52  
GACT^PSOPFSU0  $$PSOET^PSOREJP3  $$HDLG^PSOREJU1  $$FIND^PSOREJUT  (FILE,IBHLD)^PSORN52A  BBRX^PSORN52C  (FILE2,GET,SCP)^PSORN52D  (Q,SUS)^PSORXL  
ACP^PSOUTIL  
Integrated Billing 1 $$SWSTAT^IBBAPI  
Kernel 1 (T0,T1)^%ZOSV  
Pharmacy Data Management 1 PSOUL^PSSLOCK  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Outpatient Pharmacy 3 PSOORNE4  PSORENW0  PSORENW4  

Entry Points

Name Comments DBIA/ICR reference
FINISH ;
END
MESS ;
EOJ ;
FINISHX ;
START ;
INIT
FINISHP
EN(PSOX) ;EP

External References

Name Field # of Occurrence
T0^%ZOSV START+1
T1^%ZOSV START+22
$$SWSTAT^IBBAPI START+60
TRI^PSOBBC FINISH+19
ECMESND^PSOBPSU1 FINISH+12
$$SUBMIT^PSOBPSUT FINISH+11
COPAY^PSOCPB START+39
$$TECH2^PSODGDGP FINISH+2
SC^PSOMLLD2 START+41
SHAD^PSOMLLD2 START+47
$$DT^PSOMLLDT START+4, START+18, START+28, START+42
CV^PSOMLLDT START+43
HNC^PSOMLLDT START+49
MST^PSOMLLDT START+48
PGW^PSOMLLDT START+46
RAD^PSOMLLDT START+45
VEH^PSOMLLDT START+44
INIT^PSON52 INIT+2
GACT^PSOPFSU0 START+60
$$PSOET^PSOREJP3 FINISH+14
$$HDLG^PSOREJU1 FINISH+16
$$FIND^PSOREJUT FINISH+15
FILE^PSORN52A START+21
IBHLD^PSORN52A START+20
BBRX^PSORN52C FINISHX+3
FILE2^PSORN52D START+59
GET^PSORN52D START+12, START+37
SCP^PSORN52D START+11
Q^PSORXL FINISH+19
SUS^PSORXL FINISH+5, FINISH+7
ACP^PSOUTIL START+53
PSOUL^PSSLOCK EOJ+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(52.41 - [#52.41] START+3, START+5, START+12
^PS(53 - [#53] START+39, START+41, START+57
^PSRX - [#52] START+17, START+39, START+41, START+51*, START+57*
^PSRX("B" EOJ+1
^TMP("PSODOSF" FINISHX+4!
^XUSEC("PSORPH" FINISH+2, FINISH+3

Label References

Name Line Occurrences
END START+21
EOJ END
FINISH START+53
FINISHP FINISH+3
FINISHX FINISH+3, FINISH+5, FINISH+7, FINISH+18, FINISHP
INIT START+21
MESS START+43, START+44, START+45, START+46, START+47, START+48, START+49

Naked Globals

Name Field # of Occurrence
^(0 START+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACTION FINISH+10~, FINISH+11, FINISH+12*, FINISH+14*, FINISH+16*
>> BBFLG FINISHX+3*
>> BINGCRT FINISHX+3*
>> BINGRTE FINISHX+3*
DA FINISH+5*!, FINISH+7*!
DT INIT+1, FINISH+7
DUZ FINISH+2, FINISH+3
DUZ("AG" START+39
FILE START+12*, START+37*, EOJ+1!
IOF START+41
OLENT EOJ+1!
>> ORD START+2, START+3, START+5, START+12
PPL FINISH+19!, FINISH+21*, FINISH+22*
PSOANSQ START+23!, START+61!
PSOANSQ( START+29*, START+30*, START+31*, START+32*, START+33*, START+34*, START+35*, START+43, START+44, START+45
, START+46, START+47, START+48, START+49, START+55, START+56
PSOANSQ("SC" START+27*, START+55
PSOANSQ("SC>50" START+11*
PSOANSQD START+23!
>> PSOBARCD FINISH+5, FINISH+18
>> PSOBILL START+41
>> PSODFN START+43, START+44, START+45, START+46, START+47, START+48, START+49, FINISH+2
>> PSODRUG("DEA" MESS+1
>> PSOFDR START+2, START+12, START+37
>> PSOFLAG START+39*, START+41*
PSOFROM FINISH+19~*
PSOIBHLD START+2~*, START+3*, START+6*, START+7*, START+8*, START+16, START+17*, START+24, START+27, START+29
, START+30, START+31, START+32, START+33, START+34, START+35, START+36!, EOJ+1!
PSOIBHLX START+5~*, START+6, START+7, START+8, START+9
>> PSOIBQS( START+43, START+44, START+45, START+46, START+47, START+48, START+49
PSOLDIBQ START+15~*, START+19
PSON52 INIT+2!
>> PSONEW("ENT" EOJ+1!
>> PSONEW("NEWCOPAY" START+38*, START+43!, START+44!, START+45!, START+46!, START+47!, START+48!, START+49!, START+51, START+61!
PSONEWFF START+23!
>> PSOPAR FINISH+7
>> PSORENW("INS" EOJ+1!
>> PSORENW("NRX0" FINISHX+2
>> PSORENW("OIRXN" START+14, START+17, START+37
>> PSORENW("SINS" EOJ+1!
PSORN52 EOJ+1!
PSORN52("QFLG" START+21, INIT*
>> PSORX("MAIL/WINDOW" FINISHX+2*, FINISHX+3
>> PSORX("PSOL" FINISHP*, FINISHP+1, FINISHP+2*, FINISHP+3*
>> PSORX("SC" START+10, MESS+1
>> PSORXED("ENT" EOJ+1!
>> PSORXED("INS" EOJ+1!
>> PSORXED("SINS" EOJ+1!
>> PSOSCA START+41
PSOSCFLD START+55~*, START+56*, START+57!
PSOSCOTH START+2~*, START+9*, START+10, START+50!, MESS+1
PSOSCOTX START+2~*, START+10*, START+50!, MESS+1*
>> PSOSCP START+39, START+41, START+55, START+57, MESS+1
>> PSOSPRNW START+41
PSOTFIN FINISH+1~, FINISH+2*, FINISH+3
PSOX EN~, FINISH+2
PSOX("# OF RE FILLS" , INIT+1*
PSOX("DAYS SU PPLY" , INIT*
PSOX("FILL DA TE" , FINISH+7
PSOX("INS" EOJ+1!
PSOX("IRXN" START+26, START+29, START+30, START+31, START+32, START+33, START+34, START+35, START+39, START+41
, START+43, START+44, START+45, START+46, START+47, START+48, START+49, START+51, START+55, START+56
, START+57, START+60, FINISH+2, FINISH+5, FINISH+7, FINISH+11, FINISH+12, FINISH+14, FINISH+15, FINISH+16
, FINISH+19, FINISH+20, FINISH+21, FINISH+22, FINISHP, FINISHP+2, FINISHP+3, FINISHP+4, EOJ+1, EOJ+2
PSOX("ISSUE D ATE" , INIT+1*
PSOX("OIRXN" EOJ+2
PSOX("QS" FINISH+5, FINISH+18
PSOX("RX0" INIT, INIT+1
PSOX("SINS" EOJ+1!
PSOX1 FINISHP+1*, FINISHX+4!
PSOX2 FINISHP+1*, FINISHP+2, FINISHP+3, FINISHX+4!
RXFL FINISH+19!
RXFL( FINISH+5*, FINISH+7*, FINISH+20*, FINISHP*, FINISHP+4*
>> XRT0 START+22
>> XRTL START+1
>> XRTN START+22*

Marked Items

Name Field # of Occurrence
$T( START+22
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All