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: PSDDSOR2

Package: Controlled Substances

Routine: PSDDSOR2


Information

PSDDSOR2 ;BIR/MHA-Digitally Signed OP Released Rx Report; 05/09/03

Source Information

Source file <PSDDSOR2.m>

Call Graph

Call Graph Total: 13

Package Total Call Graph
VA Fileman 6 ^%DT  NOW^%DTC  ^DIC  DT^DICRW  D^DIQ  ^DIR  
Kernel 4 ^%ZIS  ^%ZISC  ^%ZTLOAD  $$DEA^XUSER  
Controlled Substances 2 PRT^PSDDSOR1  ^PSDSET  
Registration 1 ADD^VADPT  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Controlled Substances 2 PSD DIG. SIGNED RELEASED RX  PSDDSOR1  

Entry Points

Name Comments DBIA/ICR reference
PR
PRD
EN ;
END ;
D ;ask drug(s)
HD1
BEG
DEV
GD ;
HD

External References

Name Field # of Occurrence
^%DT BEG+9, BEG+12
NOW^%DTC EN+12
^%ZIS DEV, DEV+1
^%ZISC END+1
^%ZTLOAD DEV+6
^DIC BEG+7, D+4
DT^DICRW BEG+2
D^DIQ EN+13
^DIR HD1
PRT^PSDDSOR1 PR+2
^PSDSET BEG
ADD^VADPT GD+5
$$DEA^XUSER GD+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: BEG+7
Function Call: WRITE
  • Prompt: !
  • Line Location: BEG+9
Function Call: WRITE
  • Prompt: !
  • Line Location: BEG+12
Function Call: WRITE
  • Prompt: !!,?5,"You may select a single drug, several drugs,",!,?5,"or enter ^ALL to select all drugs.",!!
  • Line Location: D+1
Function Call: WRITE
  • Prompt: !!,"There have been no transactions for this drug.",!!
  • Line Location: D+5
Function Call: WRITE
  • Prompt: !,"Please try later!"
  • Line Location: DEV+1
Function Call: WRITE
  • Prompt: !!,"********** NO DATA TO PRINT **********",!!
  • Line Location: EN+14
Function Call: WRITE
  • Prompt: !
  • Line Location: END+1
Function Call: WRITE
  • Prompt: @IOF,!?2,"Digitally Signed OP Released Rx Report for Vault "_PSDLN,?70,"Page: ",PG
  • Line Location: HD+1
Function Call: WRITE
  • Prompt: !,?8,"Date Range: "_BDT_" - "_EDT,?53,"Printed on: "_TDT,!
  • Line Location: HD+2
Routine Call
  • DIC
  • Line Location:
    • BEG+7
    • D+4
Routine Call
  • DIR
  • Line Location:
    • HD1
Routine Call
  • %ZIS
  • Line Location:
    • DEV
    • DEV+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSD(58.8 - [#58.8] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(5 - [#5] GD+12
^DPT - [#2] GD+7
^PS(59 - [#59] GD+11
^PSD(58.81 - [#58.81] D+5, EN+5, EN+6, EN+7, EN+8, EN+10
^PSDRUG - [#50] GD+3, GD+8
^PSRX - [#52] EN+5, EN+9, GD+1
^PSRX("AL" EN+4, EN+5
^TMP($J EN+1!, EN+14, END+2!, GD+6*, GD+7*, GD+8*, GD+9*, GD+10*, GD+12*, PRD
, PRD+1, PRD+2, PR+1
^VA(200 - [#200] GD+10

Label References

Name Line Occurrences
D D+9
DEV D+7
END BEG, BEG+7, BEG+10, BEG+12, D+8, DEV+1, DEV+2, EN+14
GD EN+11
HD EN+14, PR+2
HD1 HD
PR PRD+2
PRD EN+15

Naked Globals

Name Field # of Occurrence
^("OR1" GD+1
^("PKI" GD+1
^("STA" GD+1
^(0 EN+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % EN+12
%DT BEG+9!*
%DT("A" BEG+9*, BEG+11*
%DT(0 BEG+9*, BEG+11*
%ZIS DEV!*
AC EN+2~, EN+13*
BDT EN+2~, EN+13*, HD+2
DFN EN+2~, GD+1*, GD+2, GD+7
DIC BEG+4*, BEG+7!, D+2!*, D+7!
DIC("A" BEG+4*, D+3*
DIC("B" BEG+6*
DIC("S" BEG+5*, D+3*
DIC(0 BEG+4*, D+2*
DIR HD1!
DIR("A" HD1*
DIR(0 HD1*
>> DIRUT PRD, PRD+1, PRD+2, PR+2, HD
DR EN+2~, EN+9*, EN+10, EN+11, GD+2, GD+3, GD+8
DRG BEG+1~, D+2!, D+9, DEV+5
DRG( D+6*, EN+11
DRN EN+3~, GD+3*, GD+6, GD+7, GD+8, GD+9, GD+10, GD+12
DT BEG+9
>> DTOUT D+8
>> DUOUT D+8
DV EN+3~, GD+11*
DVD EN+3~, GD+11*, GD+12
EDT EN+2~, EN+13*, HD+2
>> G DEV+4*
I EN+3~
IO EN+14
IO("Q" DEV+2!
IOF HD+1
ION DEV
IOP DEV!, DEV+1*!
IOSL PR+2
IOST HD1
J EN+3~
ORD EN+2~, GD+1*, GD+2, GD+6
P1 EN+2~, EN+13*
P2 EN+2~, EN+13*
PG EN+2~, EN+13*, HD+1, HD+3*, HD1
PL EN+2~
PL1 EN+2~
POP DEV!, DEV+1
PR EN+3~, GD+1*, GD+2, GD+10
PSDB BEG+1~, BEG+11*, BEG+13, EN+13
PSDE BEG+1~, BEG+13*, EN+4, EN+13
PSDIO DEV*, DEV+1!, DEV+2!
PSDL BEG+1~, BEG+3*, BEG+8*, EN+8
PSDLN BEG+1~, BEG+3*, BEG+8*, D+3, HD+1
PSDRG BEG+1~, D+2*, D+7*, EN+11
PSDS BEG+1~, BEG+13*, EN+4*, EN+5, GD+6, GD+7, GD+8, GD+9, GD+10, GD+12
>> PSDSITE BEG, BEG+3, BEG+6, BEG+8*
PSDV BEG+1~, BEG+8*
RC EN+3~, EN+6*, EN+7, EN+8, EN+10
RX EN+2~, EN+5*, EN+6, EN+7, EN+9, GD+1, GD+6, GD+7, GD+8, GD+9
, GD+10, GD+12
RX0 EN+2~, EN+9*, GD+1, GD+8
RX2 EN+2~, GD+1*, GD+6, GD+11
S1 EN+2~, PRD*, PRD+1, PRD+2, PR+1
S2 EN+2~, PRD+1*, PRD+2, PR+1
S5 EN+2~, PRD+2*, PR+1
S6 EN+2~, PR*, PR+1*
ST EN+3~, GD+1*, GD+4, GD+5*, GD+6
STD EN+3~, GD+4*, GD+5
TDT EN+2~, EN+12*, HD+2
U BEG+3, BEG+6, BEG+8, EN+7, EN+8, EN+9, EN+10, GD+1, GD+3, GD+6
, GD+7, GD+8, GD+10, GD+11, GD+12
>> VAPA(1 GD+7
>> VAPA(2 GD+7
>> VAPA(3 GD+7
>> VAPA(4 GD+7
>> VAPA(5 GD+7
>> VAPA(6 GD+7
>> X D+7
>> Y BEG+7, BEG+8, BEG+10, BEG+11, BEG+12, BEG+13, D+4, D+5, D+6, D+9
, EN+13*
Y0 EN+2~, PR!
Y1 EN+2~, PR!
Y2 EN+2~, PR!
Y3 EN+2~, PR!
Y4 EN+2~, PR!
Y5 EN+2~, PR!
Y6 EN+2~, PR!, PR+2*
Z EN+3~, PR+1*
>> ZTDESC DEV+3*
ZTDTH DEV+2!
ZTIO DEV+2!
>> ZTQUEUED END+1
>> ZTREQ END+1*
>> ZTRTN DEV+3*
ZTSAVE DEV+2!
ZTSAVE( DEV+4*
ZTSAVE("DRG(" DEV+5*
ZTSK DEV!, DEV+2!, DEV+6!
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