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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: PSGOD

Package: Inpatient Medications

Routine: PSGOD


Information

PSGOD ;BIR/CML3-CREATES NEW ORDER FROM OLD ONE ;22 SEP 97 / 2:56 PM

Source Information

Source file <PSGOD.m>

Call Graph

Call Graph Total: 17

Package Total Call Graph
Inpatient Medications 13 ($$ENDD,$$ENDTC,$$ENNPN)^PSGMI  ^PSGNE3  ^PSGOE1  $$GTNEDFD^PSGOE7  ENSFE^PSGOEE0  ^PSGOETO  CHK^PSGOEV  EN^PSGPEN  
ENOS^PSGS0  GETUD^PSJLMGUD  INIT^PSJLMUDE  $$OINAME^PSJLMUTL  $$ENNOO^PSJUTL5  
Registration 2 EN^VALM  PAUSE^VALM1  
VA Fileman 2 YN^DICN  ^DIR  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Inpatient Medications 2 PSGOE1  PSJOE  

Entry Points

Name Comments DBIA/ICR reference
WH ;
CH ;
DONE ;
ORIG ;Redisplay original order

External References

Name Field # of Occurrence
YN^DICN PSGOD+7
^DIR PSGOD+36, PSGOD+47
$$ENDD^PSGMI PSGOD+28, PSGOD+29
$$ENDTC^PSGMI PSGOD+28, PSGOD+29
$$ENNPN^PSGMI PSGOD+29
^PSGNE3 PSGOD+26
^PSGOE1 PSGOD+44
$$GTNEDFD^PSGOE7 PSGOD+25
ENSFE^PSGOEE0 PSGOD+44
^PSGOETO PSGOD+42
CHK^PSGOEV PSGOD+30
EN^PSGPEN PSGOD+43
ENOS^PSGS0 PSGOD+32
GETUD^PSJLMGUD PSGOD+44, ORIG+1
INIT^PSJLMUDE ORIG+1
$$OINAME^PSJLMUTL PSGOD+28
$$ENNOO^PSJUTL5 PSGOD+39
EN^VALM PSGOD+38, PSGOD+44
PAUSE^VALM1 PSGOD+40

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Do you want to copy this order"
  • Line Location: PSGOD+7
Function Call: WRITE
  • Prompt: !!,"...copying..."
  • Line Location: PSGOD+10
Function Call: WRITE
  • Prompt: "."
  • Line Location: PSGOD+26
Function Call: WRITE
  • Prompt: "."
  • Line Location: PSGOD+30
Function Call: WRITE
  • Prompt: !!,"Order not copied."
  • Line Location: PSGOD+40
Function Call: WRITE
  • Prompt: !!,"You are finished with the new order.",!,"The following ACTION prompt is for the original order."
  • Line Location: PSGOD+46
Function Call: WRITE
  • Prompt: !!?2,"Answer 'YES' to have a new, non-verified order created for this patient,",!,"using the information from this order. (The START and STOP dates will be",!,"recalculated.) Enter 'NO' (or '^') to stop now."
  • Line Location: CH+1
Function Call: WRITE
  • Prompt: !!?2,"Answer 'YES' to take action on this new order. Enter 'NO' (or '^') to return",!,"to the original order now."
  • Line Location: WH+1
Routine Call
  • VALM
  • Line Location:
    • PSGOD+38
    • PSGOD+44
Routine Call
  • DIR
  • Line Location:
    • PSGOD+36
    • PSGOD+47

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(53.45 - [#53.45] PSGOD+19*, PSGOD+21*, PSGOD+23*, DONE+1!
^PS(55 - [#55] PSGOD+5, PSGOD+12

Label References

Name Line Occurrences
CH PSGOD+7
DONE PSGOD+8
ORIG PSGOD+40

Naked Globals

Name Field # of Occurrence
^( PSGOD+19, PSGOD+23
^(0 PSGOD+19, PSGOD+23

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% PSGOD+7*, PSGOD+8, DONE+1!
%H DONE+1!
%I DONE+1!
>> CHK PSGOD+32*, PSGOD+35*
DA DONE+1!
DIR PSGOD+36!, PSGOD+47!
DIR("A" PSGOD+36*
DIR(0 PSGOD+36*, PSGOD+47*
DUZ PSGOD+29
F PSGOD+14*, PSGOD+19, PSGOD+23, DONE+1!
N PSGOD+14*, DONE+1!
>> ND PSGOD+23*
OLDON PSGOD+10~, PSGOD+12*, PSGOD+46, ORIG+1
>> PSGAT PSGOD+29*, PSGOD+33*, PSGOD+34
>> PSGCANFL PSGOD+46*
PSGDO PSGOD+16*, PSGOD+30, DONE+2!
>> PSGDT PSGOD+29
>> PSGEBN PSGOD+29*
PSGEFN PSGOD+27!*
PSGEFN( PSGOD+27*
>> PSGFD PSGOD+37*, PSGOD+41
>> PSGFDN PSGOD+28*
PSGHSM PSGOD+15*, DONE+2!
>> PSGLIN PSGOD+29*
PSGMR PSGOD+15*, PSGOD+30, DONE+2!
PSGNEDFD PSGOD+25*, DONE+2!
PSGNEFD PSGOD+28, PSGOD+30, PSGOD+37, PSGOD+41*, DONE+2!
PSGNESD PSGOD+24*, PSGOD+28, PSGOD+30, PSGOD+37, PSGOD+41*, DONE+1!
PSGODF PSGOD+25*, DONE+1!
PSGODN PSGOD+14!, DONE+1!
PSGODN( PSGOD+14*, PSGOD+16
PSGODN(0 PSGOD+15
PSGODN(1 PSGOD+23*
PSGODN(2 PSGOD+24
PSGODN(3 PSGOD+19*, PSGOD+21
PSGODN(6 PSGOD+17
>> PSGOEAV PSGOD+29, PSGOD+42
PSGOEE PSGOD+27!, PSGOD+42!, PSGOD+43
PSGOEEF PSGOD+27!
PSGOEOS PSGOD+27!
>> PSGOEPR PSGOD+12*
>> PSGOINST PSGOD+28*
>> PSGORD PSGOD+12, PSGOD+14, PSGOD+42, PSGOD+43, PSGOD+44, PSGOD+46*
>> PSGP PSGOD+5, PSGOD+12, PSGOD+14, PSGOD+44, ORIG+1
>> PSGPDN PSGOD+28*
PSGPDRG PSGOD+11~, PSGOD+16*, PSGOD+25, PSGOD+28, PSGOD+30, DONE+2!
PSGPR PSGOD+15*, DONE+2!
PSGS0XT PSGOD+24*, PSGOD+35, DONE+1!
PSGS0Y PSGOD+24*, PSGOD+29, PSGOD+33, PSGOD+34*, PSGOD+35, DONE+1!
PSGSCH PSGOD+24*, PSGOD+25, PSGOD+30, PSGOD+31, PSGOD+32, DONE+2!
>> PSGSD PSGOD+37*, PSGOD+41
>> PSGSDN PSGOD+28*
>> PSGSI PSGOD+17*
PSGSM PSGOD+15*, DONE+2!
PSGST PSGOD+15*, PSGOD+25, PSGOD+30, DONE+2!
>> PSGSTAT PSGOD+29*
PSGTOL DONE+1!
PSGTOO DONE+1!
PSGUOW DONE+1!
PSJACEPT PSGOD+38!, PSGOD+39, PSGOD+40
>> PSJNOO PSGOD+39*, PSGOD+40
PSJNSS PSGOD+32!, PSGOD+35!
>> PSJORD PSGOD+5, PSGOD+42*, PSGOD+46*
>> PSJSYSP PSGOD+19, PSGOD+21, PSGOD+23, DONE+1
>> PSJSYSU PSGOD+43
>> Q PSGOD+19*, PSGOD+23*
QX PSGOD+32~
SDW PSGOD+32~
SWD PSGOD+32~
U PSGOD+24, PSGOD+25, PSGOD+28, PSGOD+29, PSGOD+30
>> VALMBCK PSGOD+38*, PSGOD+39*
X PSGOD+27*, PSGOD+32~*, DONE+1!
XABB PSGOD+32~
Y PSGOD+38, DONE+1!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All