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

Package: Inpatient Medications

Routine: PSJVOSR


Information

PSJVOSR ;BIR/DRF-PRINT ACTIVE ORDER SCHEDULE VALIDATION ;13 APR 09 / 5:26 PM

Source Information

Source file <PSJVOSR.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
VA FileMan 4 DD^%DT  NOW^%DTC  $$GET1^DIQ  ^DIR  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
Inpatient Medications 2 $$ENDTC^PSGMI  ENCHK^PSGS0  

Entry Points

Name Comments DBIA/ICR reference
SELDEV ;Ask for device type for report to output to
START ;Loop through open orders.
EXIT ;Kill and exit.
DISPLAY ;Display Name, last 4 of SS, order number, start date, stop date, schedule, schedule type, admin times, error.
PAUSE ;Hold screen.
TEST ;Check for errors.
HEAD ;Header.

External References

Name Field # of Occurrence
DD^%DT DISPLAY+3, DISPLAY+4
NOW^%DTC START+1
^%ZIS SELDEV+3, SELDEV+10
^%ZISC EXIT+7
^%ZTLOAD SELDEV+10
$$GET1^DIQ DISPLAY+1, DISPLAY+2
^DIR PAUSE+1
$$ENDTC^PSGMI START+1
ENCHK^PSGS0 TEST+25

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: SELDEV+2
Function Call: WRITE
  • Prompt: !,"** No device selected **"
  • Line Location: SELDEV+3
Function Call: WRITE
  • Prompt: !,NAME,?20,SSN,?33,STD,?52,SPD,?71,PSGSCH,?91,$S(+PSGS0XT:"C",1:PSGS0XT),?96,PSGAT,!,ERR
  • Line Location: DISPLAY+6
Function Call: WRITE
  • Prompt: PSJDATE,?47,"Inpatient Medications Schedule Issues",?120,"PAGE: ",PSJPAG,!!
  • Line Location: HEAD+2
Function Call: WRITE
  • Prompt: !,"PATIENT",?20,"SSN",?33,"START DATE",?52,"STOP DATE",?71,"SCHEDULE",?91,"TYPE",?96,"ADMIN TIMES"
  • Line Location: HEAD+2
Function Call: WRITE
  • Prompt: !,UL132
  • Line Location: HEAD+3
Routine Call
  • DIR
  • Line Location:
    • PAUSE+1
Routine Call
  • %ZIS
  • Line Location:
    • SELDEV+3
    • SELDEV+10

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(55 - [#55] START+5, START+6, START+7, START+10, START+11, START+12, TEST+3, TEST+6

Label References

Name Line Occurrences
DISPLAY TEST+12, TEST+24, TEST+26
EXIT SELDEV+3, SELDEV+5
HEAD START+3, DISPLAY+5
TEST START+8, START+13

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% START+1, START+5, START+10, EXIT+1!
%H EXIT+1!
%I EXIT+1!
%ZIS SELDEV+1!, SELDEV+2*, SELDEV+9*, EXIT+1!
%ZIS("A" SELDEV+2*
%ZIS("B" SELDEV+2*
D0 START+6*, START+7, START+11*, START+12, EXIT+2!, DISPLAY+1, DISPLAY+2, TEST+3, TEST+6
D1 START+7*, START+12*, EXIT+2!, TEST+3, TEST+6
D12 TEST+1~, TEST+3*, TEST+4, TEST+6*, TEST+7
DIR PAUSE+1!
DIR(0 PAUSE+1*
DONE EXIT+2!, PAUSE+1*
>> DTOUT PAUSE+1
>> DUOUT PAUSE+1
ERR EXIT+2!, DISPLAY+6, TEST+11*, TEST+15*, TEST+16*, TEST+17*, TEST+21*, TEST+22*, TEST+23*, TEST+24
, TEST+26*
IO START+2
IO("Q" SELDEV+1!, SELDEV+4, SELDEV+5, SELDEV+8!
IOF EXIT+5, HEAD+1
ION SELDEV+9
IOP SELDEV+1!, SELDEV+9*, EXIT+7*
IOSL DISPLAY+5
IOST START+1, EXIT+5
MAX TEST+1~, TEST+19*, TEST+20, TEST+22, TEST+23
NAME EXIT+2!, DISPLAY+1*, DISPLAY+6
PG START+1*, EXIT+2!
POP SELDEV+1!, SELDEV+3
PSGAT EXIT+2!, DISPLAY+6, TEST+4*, TEST+7*
PSGIO SELDEV+9*, EXIT+2!
PSGS0XT EXIT+2!, DISPLAY+6, TEST+4*, TEST+7*, TEST+8*, TEST+9, TEST+13, TEST+14, TEST+17, TEST+18
, TEST+19
PSGSCH EXIT+2!, DISPLAY+6, TEST+4*, TEST+7*, TEST+8
PSGSSP EXIT+2!, DISPLAY+4, TEST+4*, TEST+7*
PSGSST EXIT+2!, DISPLAY+3, TEST+4*, TEST+7*
PSGST EXIT+2!, TEST+14*
PSIVAC START+1*, EXIT+3!
PSJDATE START+1*, EXIT+3!, HEAD+2
PSJPAG START+1*, EXIT+3!, HEAD+1*, HEAD+2
PSJPTR START+1*, EXIT+3!
PSJTYP START+4*, START+9*, EXIT+3!, TEST+2, TEST+5
SPD EXIT+3!, DISPLAY+4*, DISPLAY+6
SSN EXIT+3!, DISPLAY+2*, DISPLAY+6
STD EXIT+3!, DISPLAY+3*, DISPLAY+6
STPDT START+5*, START+6, START+7, START+10*, START+11, START+12, EXIT+3!
UL132 START+1*, EXIT+3!, HEAD+3
X EXIT+3!, TEST+4*, TEST+7*, TEST+10, TEST+16, TEST+17, TEST+21, TEST+22, TEST+23, TEST+26
XDESC SELDEV+6*, SELDEV+9, EXIT+3!
Y EXIT+3!, DISPLAY+3*, DISPLAY+4*
ZTDESC SELDEV+9*, EXIT+1!
ZTDTH SELDEV+8!, SELDEV+9*, EXIT+1!
ZTIO SELDEV+9*, EXIT+1!
ZTQUEUED EXIT+4!, EXIT+6
ZTREQ EXIT+4!, EXIT+6*
ZTRTN SELDEV+7*, EXIT+1!
ZTSAVE SELDEV+8!, EXIT+1!
ZTSAVE("PSJSORT" SELDEV+9*
ZTSK SELDEV+8!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All