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

Package: Inpatient Medications

Routine: PSGOESF


Information

PSGOESF ;BIR/MLM-SPEED FINISH ORDERS ENTERED THROUGH OE/RR ; 4/27/09 2:39pm

Source Information

Source file <PSGOESF.m>

Call Graph

Call Graph Total: 13

Package Total Call Graph
Inpatient Medications 9 ($$ENMRN,$$ENPDN)^PSGMI  ENWALL^PSGNE3  DATE^PSGOER0  HMSG^PSGOERS  EN^PSGOEV  SET^PSGON  ^PSGPER1  (ENDDC,IVSOL)^PSGSICHK  
($$DRUGNAME,$$HIDDEN)^PSJLMUTL  
VA Fileman 2 ^DIE  ^DIR  
Pharmacy Data Management 1 ($$LS,UNL)^PSSLOCK  
Registration 1 (FULL,PAUSE)^VALM1  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Inpatient Medications 2 PSGOE0  PSGOEF  

Entry Points

Name Comments DBIA/ICR reference
EN ;
HELP
UPDATE
DONE ; Kill and exit.
ENCHK ;
OC531 ;* Order checks for Speed finish and regular finish

External References

Name Field # of Occurrence
^DIE ENCHK+20
^DIR EN+16, DONE+1
$$ENMRN^PSGMI ENCHK+17
$$ENPDN^PSGMI ENCHK+17
ENWALL^PSGNE3 ENCHK+9
DATE^PSGOER0 ENCHK+7
HMSG^PSGOERS ENCHK+3
EN^PSGOEV ENCHK+24
SET^PSGON ENCHK+2
^PSGPER1 DONE+2
ENDDC^PSGSICHK OC531+3
IVSOL^PSGSICHK OC531+5
$$DRUGNAME^PSJLMUTL ENCHK+11, ENCHK+16, ENCHK+21
$$HIDDEN^PSJLMUTL EN+1
$$LS^PSSLOCK ENCHK+11
UNL^PSSLOCK ENCHK+25
FULL^VALM1 EN+4
PAUSE^VALM1 EN+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"There are no orders which can be Speed Finished at this time.",!,"Only PENDING RENEWALS can be Speed Finished."
  • Line Location: EN+13
Function Call: WRITE
  • Prompt: $C(7),!!,"??"
  • Line Location: EN+18
Function Call: WRITE
  • Prompt: !
  • Line Location: ENCHK+7
Function Call: WRITE
  • Prompt: $C(7),!,"...order",$E("s",$L(PSGODDD(1),",")>2)," NOT finished..."
  • Line Location: ENCHK+8
Function Call: WRITE
  • Prompt: !," ",PSGOERS2,". ",$P($$DRUGNAME^PSJLMUTL(PSGP,PSGORD),"^")," ",$P($G(^PS(53.1,+PSGORD,.2)),"^",2),!,"...No action taken on this order...",!
  • Line Location: ENCHK+11
Function Call: WRITE
  • Prompt: !!," ",PSGOERS2,". ",$P($$DRUGNAME^PSJLMUTL(PSGP,PSGORD),"^")," ",$P($G(^PS(53.1,+PSGORD,.2)),"^",2),!,"...No action taken on this order...",!
  • Line Location: ENCHK+16
Function Call: WRITE
  • Prompt: !!," Select the orders to be speed finished. Only orders listed under the PENDING",!,"RENEWALS heading are selectable. The start and stop date/times specified will"
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !,"be used for all orders selected to be finished using this function.",!
  • Line Location: HELP+2
Routine Call
  • DIE
  • Line Location:
    • ENCHK+20
Routine Call
  • DIR
  • Line Location:
    • EN+16
    • DONE+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(53.1 - [#53.1] ENCHK+3, ENCHK+5, ENCHK+6, ENCHK+11, ENCHK+16, ENCHK+17, ENCHK+18, ENCHK+19*, ENCHK+22, UPDATE+2
, UPDATE+3, UPDATE+4, OC531+3, OC531+5
^PS(53.45 - [#53.45] UPDATE+1!, UPDATE+3*, UPDATE+5*, UPDATE+6*
^PS(55 - [#55] ENCHK+7, ENCHK+20
^TMP("PSJ" EN+5, EN+6, EN+7, EN+8
^TMP("PSJON" ENCHK+3, ENCHK+5, ENCHK+10
^TMP($J OC531+4!

Label References

Name Line Occurrences
DONE EN+16, ENCHK+4
EN EN+18, ENCHK+3
OC531 ENCHK+15
UPDATE ENCHK+23

Naked Globals

Name Field # of Occurrence
^( ENCHK+3
^(2 ENCHK+19*, ENCHK+20*
^(6 ENCHK+18

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CODE EN+3~, EN+5*, EN+6, EN+7, EN+8, EN+9, EN+11
>> D ENCHK+3*
DA ENCHK+5*, ENCHK+20!*
DA(1 ENCHK+5*, ENCHK+20*
DIE ENCHK+20!*
DIR EN+15~, EN+16!, DONE+1!
DIR("?" EN+15*
DIR("??" EN+15*
DIR("A" EN+15*
DIR(0 EN+15*, DONE+1*
>> DIRUT EN+16
DR ENCHK+20!*
DRG EN+3~, EN+7*, EN+8
>> F ENCHK+3*
INTERVEN OC531+1~, OC531+2*
L1 EN+15~*, EN+17*
L2 EN+15~*
LOOP UPDATE+1~, UPDATE+2*, UPDATE+3, UPDATE+4, UPDATE+5, UPDATE+6
NF DONE+3!
ON EN+3~, EN+8*
PENDCT EN+3~, EN+4*, EN+11*, EN+12
>> PSGDDI OC531+5*
PSGDO ENCHK+17*, DONE+3!
>> PSGFD ENCHK+9, ENCHK+19
PSGFOK ENCHK+4, ENCHK+8!
PSGFOK(1 ENCHK+8
>> PSGLMT EN+4*
>> PSGMRN ENCHK+17*
>> PSGNEDFD ENCHK+9
PSGODDD ENCHK+2!*, ENCHK+3, ENCHK+10, DONE+3!
PSGODDD( ENCHK+3, ENCHK+10
PSGODDD(1 ENCHK+2*, ENCHK+5, ENCHK+8
>> PSGOEE ENCHK+7*
>> PSGOEFF ENCHK+10*, ENCHK+16
PSGOERS ENCHK+3*, ENCHK+10*, DONE+3!
>> PSGOERS1 ENCHK+3*, ENCHK+10*
PSGOERS2 ENCHK+3*, ENCHK+10*, ENCHK+11, ENCHK+16, ENCHK+21, DONE+3!
>> PSGOFD ENCHK+5*
PSGONF EN+3~, EN+4*, EN+8*, EN+9, EN+14*, EN+15, EN+17
PSGONF2 EN+3~, EN+4*, EN+9*, EN+12*, EN+13, EN+14
PSGORD ENCHK+5*, ENCHK+6*, ENCHK+7, ENCHK+10*, ENCHK+11, ENCHK+16, ENCHK+17, ENCHK+18, ENCHK+19, ENCHK+21
, ENCHK+22, ENCHK+24, ENCHK+25, DONE+3!, UPDATE+2, UPDATE+3, UPDATE+4, OC531+3, OC531+5
PSGORQF ENCHK+16, OC531+3!, OC531+4!
>> PSGOSD ENCHK+3*
>> PSGP ENCHK+5, ENCHK+7, ENCHK+9, ENCHK+11, ENCHK+16, ENCHK+20, ENCHK+21, ENCHK+25, OC531+3
PSGPDRGN ENCHK+17*, DONE+3!
>> PSGPXN DONE+2
PSGRLAST EN+9*, EN+12*, EN+14, DONE+3!
PSGSCH ENCHK+18*, DONE+3!
>> PSGSD ENCHK+9, ENCHK+19, ENCHK+20
PSGSFD EN+3~, ENCHK+5*, ENCHK+7
PSGSI ENCHK+18*, DONE+3!
>> PSGST ENCHK+17*
>> PSGWLL ENCHK+7*
>> PSJDD OC531+5*
PSJDDI OC531+1~
PSJIREQ OC531+1~, OC531+2*
PSJJDRUG UPDATE+4*, UPDATE+5, UPDATE+6!
>> PSJOCNT EN+4
PSJPDRG OC531+1~, OC531+5!
PSJRXREQ OC531+1~, OC531+2*
PSJSPEED ENCHK+1*, DONE+3!
>> PSJSYSP UPDATE+1, UPDATE+3, UPDATE+5, UPDATE+6
>> PSJSYSP0 ENCHK+4
>> PSJSYSW0 ENCHK+7, ENCHK+9
>> Q ENCHK+2*
ST EN+3~, EN+6*, EN+7, EN+8
U EN+15, EN+17, ENCHK+5, ENCHK+6, ENCHK+17, ENCHK+18, ENCHK+19, ENCHK+20
>> VALMBCK EN+1*
X EN+16!, EN+17, ENCHK+2, ENCHK+4*, ENCHK+17*, ENCHK+19*, ENCHK+20, OC531+2*
>> X1 ENCHK+2*
Y EN+17*, EN+18, ENCHK+2, ENCHK+3*, DONE+3!, OC531+2*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All