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

Package: Inpatient Medications

Routine: PSIVORE2


Information

PSIVORE2 ;BIR/RGY,PR,MLM-ACT, NEW ORDER (CONT. OF PSIVORE1) ;16 Mar 99 / 2:16 PM

Source Information

Source file <PSIVORE2.m>

Call Graph

Call Graph Total: 13

Package Total Call Graph
Inpatient Medications 9 EDIT^PSIVEDT  ^PSIVHYPL  ^PSIVLABL  ^PSIVLTR  (53,OTYP)^PSIVORC1  NEWENT^PSIVORFE  GTOT^PSIVUTL  EN1^PSJHL2  
$$OIDF^PSJLMUT1  
VA Fileman 3 (C,NOW)^%DTC  ^DIK  ^DIR  
Kernel 1 $$FMADD^XLFDT  

Caller Graph

Caller Graph Total: 12

Package Total Caller Graph
Inpatient Medications 12 PSIVCHK1  PSIVLABL  PSIVLABR  PSIVOD  PSIVOPT1  PSIVOPT2  PSIVORC2  PSIVORE  
PSIVORE1  PSIVORLB  PSIVSUS  PSJCOMR  

Entry Points

Name Comments DBIA/ICR reference
DEL55 ; Delete order from 55.
C ;
INCOMP ; Delete order missing critical information.
DEQ ;
K ;
TL1 ;
CONVER(X,Y) ;
TL ;
GTPD ; Find Orderable Item/dosage ordered for IM.
NEW ; New order entry
CONVER1(ORDDT,X,Y)

External References

Name Field # of Occurrence
C^%DTC CONVER+5
NOW^%DTC TL+7
^DIK DEL55+2
^DIR INCOMP+2
EDIT^PSIVEDT NEW+6
^PSIVHYPL DEQ+1
^PSIVLABL DEQ+1
^PSIVLTR DEQ+1
53^PSIVORC1 NEW+4
OTYP^PSIVORC1 NEW+5
NEWENT^PSIVORFE NEW+1
GTOT^PSIVUTL NEW+6
EN1^PSJHL2 DEL55+3
$$OIDF^PSJLMUT1 GTPD+2
$$FMADD^XLFDT CONVER1+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: TL+1
Function Call: WRITE
  • Prompt: " ",$S($L(X)=1:" ",1:""),X
  • Line Location: TL+1
Function Call: WRITE
  • Prompt: !
  • Line Location: TL+2
Function Call: WRITE
  • Prompt: "..:"
  • Line Location: TL+2
Function Call: WRITE
  • Prompt: ?3*$E(Y_"000",2,3)-1+$S($E(Y_"000",4,5)>40:2,$E(Y_"000",4,5)>20:1,1:0),PSI,PSI(Y)
  • Line Location: TL1+1
Function Call: WRITE
  • Prompt: !!,$C(7),"THIS ORDER IS NOT USABLE!",!,"Enter ""D"" to Delete, or ""B"" to Bypass",!
  • Line Location: INCOMP+1
Routine Call
  • DIR
  • Line Location:
    • INCOMP+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(55 - [#55] DEQ+1, C+1, DEL55+3, DEL55+4, NEW+4
^PS(59.5 - [#59.5] TL+3, NEW+1
^VA(200 - [#200] NEW+4

Label References

Name Line Occurrences
$$CONVER1 CONVER+3
GTPD NEW+6
TL1 TL+4, TL+6, TL+7

Naked Globals

Name Field # of Occurrence
^( C+1
^(0 TL+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % TL+7
>> ACTION DEQ+1*
DA DEL55+2*, DEL55+3~
DA(1 DEL55+2*
>> DAT C+1*
DAYS CONVER1+4~*, CONVER1+5*, CONVER1+6
>> DFN DEQ+1, C+1, DEL55+2, DEL55+3, DEL55+4, NEW+4
DIK DEL55+2*, DEL55+3~
DIR INCOMP+1~, INCOMP+2!
DIR("??" INCOMP+2*
DIR("A" INCOMP+2*
DIR(0 INCOMP+2*
>> DIRUT INCOMP+2
DRG NEW+2!
DRG( GTPD+1, GTPD+2
>> DRGI GTPD+1*, GTPD+2
>> DRGN NEW+1*
>> DRGT GTPD+1*, GTPD+2
DT TL+3
>> EDIT NEW+5*
I K+1!
MINS CONVER1+4~*, CONVER1+5*, CONVER1+6
OD K+1!
>> ON DEQ+1, C+1
>> ON55 DEL55+1, DEL55+2, DEL55+3, DEL55+4
ORDDT CONVER1~, CONVER1+6
ORIFN DEL55+3~*
>> P( NEW+2*
>> P("DO" GTPD+3*
>> P("DTYP" NEW+5
>> P("IVRM" NEW+1*
>> P("PD" NEW+6, GTPD+1*, GTPD+2*
>> P(15 CONVER+3, CONVER+5
>> P(17 NEW+3*
>> P(2 NEW+6
>> P(21 DEL55+1
>> P(23 NEW+3*
>> P(4 DEQ+1*, TL+3, TL+4, NEW+3*, NEW+4, NEW+6
>> P(6 NEW+4*
PDATE K+1!, CONVER+4*, CONVER+5*, CONVER+6
PDOSE K+1!, CONVER+4*, CONVER+5, CONVER+6
PLAST K+1!
PSCT K+1!
PSGCNT K+1!
PSGFDX NEW+2!
PSGSA K+1!, TL+5*, CONVER+3, CONVER+4, CONVER+5
PSI K+1!, TL+3!, TL+4*, TL+5!*, TL+6*, TL+7*, TL1+1, TL1+2!
PSI( TL+3*, TL+5*, TL+7*, TL1+1
PSIV1 K+1!
PSIVA K+1!
PSIVAC INCOMP+1~, INCOMP+2*, DEL55+2, DEL55+3
PSIVDOSE K+1!
PSIVEC K+1!
PSIVLABN K+1!
PSIVMI K+1!
PSIVNOL K+1!
>> PSIVOK NEW+5*
>> PSIVORFA DEL55+2
PSIVSC K+1!
>> PSIVSN TL+3, C+1, NEW+1
>> PSIVTYPE NEW+3
>> SNM C+1*
>> TRACK DEQ+1*
U DEQ+1, TL+3, C+1, DEL55+3, NEW+1, NEW+3, NEW+4, GTPD+2, GTPD+3
UP1 K+1!
X TL+1*, TL+2*, TL+3*, TL+5*, TL1+1*, CONVER~, CONVER+3*, CONVER+4, CONVER+5*, CONVER+6*
, CONVER+7, CONVER1~, CONVER1+5, CONVER1+6*, CONVER1+7, NEW+2*, GTPD+2*, GTPD+3
>> X1 CONVER+5*
>> X2 CONVER+5*
Y TL+7*, TL1+1*, CONVER~, CONVER+3, CONVER+4, CONVER+5, CONVER1~, CONVER1+5, INCOMP+2, NEW+4*
>> ZTQUEUED K+1
>> ZTREQ K+1*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All