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 |  Local Variables  | All
Print Page as PDF
Routine: PSJMDWS

Package: Inpatient Medications

Routine: PSJMDWS


Information

PSJMDWS ;BIR/MV-MAIN DRIVER FOR MED DUE WORKSHEET ;18 JUN 96 / 2:58 PM

Source Information

Source file <PSJMDWS.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Inpatient Medications 7 ENKV^PSGSETU  ^PSJAC  ($$ENDATE,$$MEDTYPE,$$PRN,$$STDATE)^PSJMDIR  $$GWP^PSJMDIR1  (,MEDTYPE,WARD)^PSJMEDS  ^PSJMPRT  ($$SELDEV,EXIT,EXITDEV,SETPRTQ,SETSORTQ)^PSJMUTL  
Registration 1 DEM^VADPT  
VA FileMan 1 C^%DTC  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Inpatient Medications 2 PSJ LM MDWS  PSJ MDWS  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
EN
SORTQ ;*** Entry when queue to do the sorting.
PRTQ ;*** Entry when queue to the printer.
EXIT ;
ASK ;***Prompt for selection creteria. Quit when PSJSTOP=1
ENLM ;Enrty Point for PSJ LM MDWS protocol

External References

Name Field # of Occurrence
C^%DTC ASK+3, ENLM+6
ENKV^PSGSETU EXIT+3
^PSJAC SORTQ+5
$$ENDATE^PSJMDIR ASK+4, ENLM+7
$$MEDTYPE^PSJMDIR ASK+6, ENLM+8
$$PRN^PSJMDIR ASK+2, ENLM+5
$$STDATE^PSJMDIR ASK+3, ENLM+6
$$GWP^PSJMDIR1 ASK+5
^PSJMEDS SORTQ+2, SORTQ+4
MEDTYPE^PSJMEDS SORTQ+5
WARD^PSJMEDS SORTQ+3
^PSJMPRT PRTQ+1
$$SELDEV^PSJMUTL ASK+7, ENLM+9
EXIT^PSJMUTL EXIT+2
EXITDEV^PSJMUTL EXIT+2
SETPRTQ^PSJMUTL SORTQ+10
SETSORTQ^PSJMUTL EN+4
DEM^VADPT ENLM+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP($J PSJMDWS+4!, EXIT+1!, ENLM+2!

Label References

Name Line Occurrences
ASK PSJMDWS+5
EN ENLM+10
EXIT PSJMDWS+5, ENSORTQ+6
SORTQ EN+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADMIN SORTQ+1~
CD SORTQ+1~
>> DFN ENLM+3*
DRG SORTQ+1~
DRGI SORTQ+1~
DRGN SORTQ+1~
DRGT SORTQ+1~
IO("Q" EN
MID SORTQ+1~
MN SORTQ+1~
ND SORTQ+1~
ND1 SORTQ+1~
OD SORTQ+1~
ON SORTQ+1~
PFLG EXIT+4!
PLSD SORTQ+1~
PPN SORTQ+5*, EXIT+4!, ENLM+4*
PSGEXPDT EXIT+4!
PSGIO SORTQ+6, EXIT+4!
PSGLFD EXIT+4!
PSGLOD EXIT+4!
PSGLSD EXIT+4!
PSGMAR EXIT+4!
PSGMARWD EXIT+4!
PSGMFOR EXIT+4!
PSGMTYPE EXIT+4!, ASK+6*, ENLM+8*
PSGOES EXIT+4!
PSGON EXIT+4!
PSGP SORTQ+5*, EXIT+4!, ENLM+3, ENLM+4
PSGP(0 ENLM+3*, ENLM+4
PSGPAT EXIT+4!
PSGPAT( SORTQ+5, ENLM+4*
PSGPG EXIT+4!
PSGPLC EXIT+4!
PSGPLF EXIT+4!, ASK+4*, ENLM+7*
PSGPLO EXIT+4!
PSGPLS EXIT+5!, ASK+3*, ENLM+6*
PSGRBADM EXIT+5!
PSGRBPPN EXIT+5!
PSGRETF EXIT+5!
PSGS0XT EXIT+5!
PSGS0Y EXIT+5!
PSGSS SORTQ+2, SORTQ+3, SORTQ+4, SORTQ+5, EXIT+5!, ENLM+4*
PSGTM EXIT+5!
PSGTMALL EXIT+5!
PSGTMP EXIT+5!, ASK+3*, ASK+4, ENLM+6*, ENLM+7
PSGTMP1 EXIT+5!, ASK+3*, ASK+4, ENLM+6*, ENLM+7
PSGWD EXIT+5!, ASK+6, ENLM+8
PSGWG SORTQ+4*, EXIT+5!
PSGWGNM EXIT+5!
PSGWN EXIT+6!
PSGWN1 EXIT+6!
PSIVUP SORTQ+1~
PSJACNWP SORTQ+5*, EXIT+6!
PSJADT EXIT+6!
PSJADT1 EXIT+6!
PSJADTME EXIT+6!
PSJADTO EXIT+6!
PSJASTR EXIT+7!
PSJATME EXIT+7!
PSJATME1 EXIT+6!
PSJATMEO EXIT+6!, EXIT+7!
PSJDOS EXIT+7!
PSJHL1 EXIT+7!
PSJHL2 EXIT+7!
PSJHL3 EXIT+7!
PSJHL62 EXIT+7!
PSJHOLD EXIT+7!
PSJLN EXIT+7!
>> PSJMDWS ENLM+4*
PSJMPRN EXIT+7!, ASK+2*, ENLM+5*
PSJMR EXIT+7!
PSJNEED EXIT+7!
PSJONCAL EXIT+7!
PSJONETM EXIT+7!
PSJORIFN SORTQ+1~
PSJPLC EXIT+8!
PSJPRB EXIT+8!
PSJPRT EXIT+8!
PSJPWDN EXIT+8!
PSJPWDO EXIT+8!
PSJSCHE EXIT+8!
PSJSI EXIT+8!
PSJSTOP PSJMDWS+4*, PSJMDWS+5, EXIT+8!, ENLM+2*
PSJTOTLN EXIT+8!
PST SORTQ+1~
QST SORTQ+1~
RBNO SORTQ+1~
ST SORTQ+1~
T SORTQ+1~
TM SORTQ+1~
TMNO SORTQ+1~
TS SORTQ+1~
UD0 SORTQ+1~
UD2 SORTQ+1~
VADM ENLM+2~, ENLM+3!
VADM(1 ENLM+3
>> X ASK+3, ENLM+6
>> X1 ASK+3*, ENLM+6*
>> X2 ASK+3*, ENLM+6*
XDESC EN+1~, EN+2*, EN+4, SORTQ+7~, SORTQ+8*, SORTQ+10
XSAVE EN+1~, EN+3*, EN+4, SORTQ+7~, SORTQ+9*, SORTQ+10
XTRTN EN+1~, EN+4*, SORTQ+7~, SORTQ+10*
XTYPE SORTQ+1~
>> Y ASK+2, ASK+3, ASK+4, ASK+6, ENLM+5, ENLM+6, ENLM+7, ENLM+8
ZSTOP EXIT+8!
ZTQUEUED EXIT+8!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables  | All