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 |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: PSORXED1

Package: Outpatient Pharmacy

Routine: PSORXED1


Information

PSORXED1 ;BHAM ISC/SAB - Edit prescription utility #2 ;29-May-2012 15:12;PLS

Source Information

Source file <PSORXED1.m>

Call Graph

Call Graph Total: 11

Package Total Call Graph
Outpatient Pharmacy 6 $$LSTRFL^PSOBPSU1  SUS^PSOCMOPB  EN1^PSONEW2  $$TRIC^PSOREJP1  $$FIND^PSOREJUT  (ASKL,FILL,SETRP)^PSORXED  
VA Fileman 5 NOW^%DTC  FILE^DICN  ^DIE  ^DIK  $$GET1^DIQ  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Outpatient Pharmacy 1 PSORXED  

Entry Points

Name Comments DBIA/ICR reference
DIEX
DIE
APCOM ;
ELSE
SUS ;update suspense file
EX
SUP
SKPTRIC ;

External References

Name Field # of Occurrence
NOW^%DTC SUP+6
FILE^DICN SUP+3
^DIE DIE+19
^DIK SUP+1
$$GET1^DIQ APCOM+18
$$LSTRFL^PSOBPSU1 PSORXED1+19
SUS^PSOCMOPB SUP
EN1^PSONEW2 APCOM+21
$$TRIC^PSOREJP1 PSORXED1+20
$$FIND^PSOREJUT PSORXED1+19
ASKL^PSORXED SKPTRIC+5
FILL^PSORXED SKPTRIC+3
SETRP^PSORXED SKPTRIC+6, SKPTRIC+9, SKPTRIC+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"RX# "_$P(RX0,"^")_" has been Suspended until "_$E(SD,4,5)_"-"_$E(SD,6,7)_"-"_$E(SD,2,3)_".",!
  • Line Location: SUP+7
Function Call: WRITE
  • Prompt: !,"Now Editing Rx # ",$P(PSORXED("RX0"),"^")
  • Line Location: DIE+0
Routine Call
  • DIE
  • Line Location:
    • DIE+19

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSRX - [#52] Classic Fileman Calls,  GET1^DIQ
^PS(52.5 - [#52.5] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(52 APCOM+5, APCOM+6, APCOM+7
^DD(52.1 PSORXED1+13, PSORXED1+16, APCOM+12, APCOM+13, APCOM+14, APCOM+16
^PS(52.5 - [#52.5] SUS+2, SUP, SUP+3*
^PSDRUG - [#50] SKPTRIC+1*
^PSRX - [#52] PSORXED1+7, PSORXED1+8, PSORXED1+12, PSORXED1+15, PSORXED1+24, PSORXED1+25, PSORXED1+26*, SKPTRIC+1, SKPTRIC+5, SKPTRIC+6
, SUS+2, SUS+4, SUS+5, SUP+1, SUP+3, SUP+4, SUP+5*, SUP+6*, DIE+7, DIE+8
, DIE+14, DIE+15, DIE+19, DIE+20, APCOM+4, APCOM+8, APCOM+10, APCOM+15, APCOM+19, APCOM+20
^VA(200 - [#200] DIE+20

Label References

Name Line Occurrences
DIE APCOM+22
DIEX APCOM+21
ELSE SKPTRIC+8
EX SKPTRIC+2, SUS+3
SKPTRIC PSORXED1+22
SUP SUS+4, SUS+5
SUS PSORXED1+8, PSORXED1+21, PSORXED1+22, SKPTRIC+4, SKPTRIC+6

Naked Globals

Name Field # of Occurrence
^(0 PSORXED1+25*, SUS+4
^(2 SUS+5
^(660.1 SKPTRIC+1
^(9999999 PSORXED1+7, APCOM+19

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EX!, SUP+6
%Y EX!
>> APSP44("EXP D ATE" , APCOM+10*, APCOM+11, APCOM+12, APCOM+15*, APCOM+16
>> APSP44("LOT # " , APCOM+10*, APCOM+11, APCOM+14
>> APSP44("MFG" APCOM+10*, APCOM+11, APCOM+13
>> APSP91 APCOM+4*, APCOM+8*
>> APSP92 APCOM+10*, APCOM+15*
>> APSPCP APCOM+18
>> APSPMAN DIE+9, DIE+10, DIE+11, DIE+12, APCOM+2, APCOM+4, APCOM+8, APCOM+10, APCOM+15
APSQCOMR PSORXED1+18!
>> APSREFD DIE+7*, DIE+8*
>> APSREFF DIE+7*, DIE+8
COM EX!, APCOM+1*, APCOM+5*, APCOM+6*, APCOM+7*, APCOM+12*, APCOM+13*, APCOM+14*, APCOM+16*
COM1 PSORXED1+12*, PSORXED1+13*, PSORXED1+16*, PSORXED1+18*, PSORXED1+21!, PSORXED1+22!, PSORXED1+26, ELSE+1!, EX!
COPIES EX!
D0 EX!
D1 PSORXED1+24*, PSORXED1+25*, PSORXED1+26, EX!
DA PSORXED1+7, PSORXED1+8, PSORXED1+12, PSORXED1+15, PSORXED1+19, PSORXED1+20, PSORXED1+24, PSORXED1+25, PSORXED1+26, SKPTRIC+1
, SKPTRIC+5, SKPTRIC+6, ELSE, SUS+2, SUS+4, SUS+5, EX!, SUP+1*, SUP+3, SUP+4*
, SUP+5, SUP+6, DIE!*, DIE+19!
DD SUP+3!
DIC EX+1!, SUP+2*, DIE!
DIC("DR" SUP+3*
DIC(0 SUP+2*
DIE EX+1!, DIE!*, DIE+19!
DIG EX+1!
DIK EX!, SUP+1*
>> DLAYGO SUP+2*
DO SUP+3!
DQ EX+1!
DR EX+1!, DIE!, DIE+3*, DIE+5*, DIE+11*, DIE+12*, DIE+13*, DIE+16*, DIE+19!
DR(2 DIE+4*, DIE+6*, DIE+9*, DIE+10*, DIE+17*
DRUG EX+1!
DT PSORXED1+26
DUZ PSORXED1+26, SUP+6
FDA EX!, SUP+4*
I PSORXED1+12*, PSORXED1+13, EX+1!, DIE+7*
II EX+1!
IOP EX!
IR EX!, SUP+4*, SUP+5*, SUP+6
J EX!
K PSORXED1+24*, PSORXED1+25, EX!
N EX+1!
PHYS EX+1!
PS EX+1!
>> PSI PSORXED1+13*
>> PSOBRIEN DIE+15*
>> PSOBXIEN DIE+14*
PSOECMES PSORXED1+19~*, PSORXED1+22, SKPTRIC+4
PSOEDITF SKPTRIC+3, SUS+1!
PSOEDITL SKPTRIC+3*, SKPTRIC+4*, SKPTRIC+5, SKPTRIC+6, SUS+1!
PSOEDITR SKPTRIC+3, SUS+1!
PSOERFL PSORXED1+19~*, PSORXED1+20
>> PSONEW("EXPIR ATION DATE" , APCOM+2*, APCOM+4*, APCOM+5, APCOM+8*, APCOM+11*, APCOM+15*
>> PSONEW("LOT # " , APCOM+2*, APCOM+4*, APCOM+7, APCOM+11*
>> PSONEW("MANUFACTURER" APCOM+2*, APCOM+4*, APCOM+6, APCOM+11*
>> PSONEW("PROVI DER NAME" , DIE+20*
>> PSOPAR DIE+3
>> PSORX("PSOL" SKPTRIC+6*, SKPTRIC+7, SKPTRIC+8, SKPTRIC+9*, SKPTRIC+10*
>> PSORXED APCOM+21
>> PSORXED("AWP" APCOM+19*, APCOM+20*
>> PSORXED("CM" APCOM+18*
>> PSORXED("DFLG" APCOM+21
>> PSORXED("IRXN" SKPTRIC+6, SKPTRIC+8, SKPTRIC+9, SKPTRIC+10, DIE, DIE+7, DIE+8, DIE+14, DIE+15, DIE+19
, DIE+20, APCOM+4, APCOM+8, APCOM+10, APCOM+15, APCOM+18, APCOM+19, APCOM+20
>> PSORXED("NDC" APCOM+19*, APCOM+20*
>> PSORXED("QFLG" APCOM+21*, APCOM+22*
>> PSORXED("RX0" DIE
>> PSORXED("RX1" PSORXED1+8, SUS+4, EX!, DIE+20, APCOM+12, APCOM+13, APCOM+14, APCOM+16
>> PSORXED("RX19999999" PSORXED1+7*, PSORXED1+15, PSORXED1+16
>> PSORXED("RX2" SUS+5, APCOM+5, APCOM+6, APCOM+7
>> PSOSIGFL SKPTRIC+5
PSOSITE SUS+4~*, SUS+5*, SUP+3
PSOTRIC PSORXED1+19~*, PSORXED1+20*, PSORXED1+21, PSORXED1+22, SKPTRIC+4, SKPTRIC+6
>> PSOX1 SKPTRIC+7*
>> PSOX2 SKPTRIC+7*, SKPTRIC+8, SKPTRIC+9, SKPTRIC+10
PSPOP EX!
>> PSRX1 PSORXED1+8*, PSORXED1+12, PSORXED1+13
QTY PSORXED1+8*, SKPTRIC+1, EX+1!
>> RFD PSORXED1+15, SKPTRIC+2, DIE+3, DIE+9, DIE+10, DIE+11, DIE+12, DIE+13, DIE+15, DIE+16
, DIE+17, DIE+19, DIE+20, APCOM+4, APCOM+8, APCOM+10, APCOM+15, APCOM+20
RFDATE EX+1!
RFDT SUS+4, EX!
>> RFED PSORXED1+8, PSORXED1+12, PSORXED1+26, SKPTRIC+1, SKPTRIC+2, SKPTRIC+3, SKPTRIC+6, ELSE, SUS+4, SUS+5
, SUP+3, SUP+6
RFL EX+1!
RFL1 EX+1!
RX0 EX!, SUP+1*, SUP+7
RX1 PSORXED1+8*, EX!
RX2 EX!
RXF EX+1!
>> RXFL( SKPTRIC+6*, ELSE*
RXN EX!, SUP+1*, SUP+2, SUP+4
>> RXRP( SKPTRIC+5
RXS SUS+2*, SUS+3, EX!, SUP, SUP+1
SD SUS+4*, SUS+5*, EX!, SUP+3, SUP+6, SUP+7
SIG EX+1!
ST EX+1!
ST0 EX+1!
U PSORXED1+15, PSORXED1+16
X EX+1!, SUP+2*, DIE+19!
Y EX+1!, SUP+3, DIE+19!
Z PSORXED1+24*, EX+1!
Z0 EX+1!
Z1 EX+1!
>> ZD SUS+2*
>> ZD( PSORXED1+7*
ZDL PSORXED1+7*, EX+1!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All