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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PSJNEWOC

Package: Inpatient Medications

Routine: PSJNEWOC


Information

PSJNEWOC ;BIR/SAB - STORES BACKDOOR ORDER CHECKS IN FILE #100.05 ;11/08/2012

Source Information

Source file <PSJNEWOC.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
VA FileMan 4 FILE^DICN  (,WP)^DIE  $$GET1^DIQ  ^DIWP  
Inpatient Medications 2 VF1^PSJNEWOA  ACT^PSJNEWOC  
Kernel 1 $$NOW^XLFDT  
Order Entry Results Reporting 1 SAVEOC^OROCAPI1  
Outpatient Pharmacy 1 DAOC^PSONEWOA  

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

Package Total Caller Graph
Inpatient Medications 18 PSGOD  PSGOEE  PSGOER  PSGOEV  PSIVOD  PSIVOPT1  PSIVORC2  PSJCOM  
PSJCOM1  PSJCOMR  PSJCOMV  PSJDGAL2  PSJLIACT  PSJNEWOA  PSJNEWOC  PSJOE  
PSJOE1  PSJOEA2  

Entry Points

Name Comments DBIA/ICR reference
ACT ;
ACT3 ;
ACT2 ;
VF1(PSGORD) ;
VF2 ;verify within same session
DAOC ;allergy
SET ;DEFINED 100.05
BEGIN ;
SET2 ;
; #50 - DISPENSE DRUGS^100.06PA^^5;0
GRP1 ;
; #60 - GROUP ONE PHARMACY ORDERS^100.07VA^^6;0
; OP PENDING ORDERS - IEN;PS(52.41,
; IP RX - IEN;PS(53.1,
; OP RX - IEN;PSRX(
GRP2 ;
CLINEFF ;clinical effects
CLINEFF1 ;
IV ;IV additive and solutions
ADDSOL ;set interacting Additives and solutions for IV's
GETADD ;interacting Additives for IV's
GETSOLS ;interacting solutions for IV's
SET3 ;
; set the variables needed for all order checks
CPRS
CPRSA
NOSYS ;
EXEC ;order chk exeception
ERROR ;order drug chk errors
SETOC(PSJORDNM) ;SET ORDER CHECKS IN TO FILE 100.05
DAOC2 ;I +$G(PSGORD) S ^TMP("PSODAOC",$J,"IP IEN")=PSGORD ;set up which IEN will be used to store order checks

External References

Name Field # of Occurrence
FILE^DICN SET2+5, GRP1+10, GRP2+18, CLINEFF1+5, ADDSOL+8, CPRSA+16, CPRSA+36
^DIE ACT3+10, BEGIN+21, CLINEFF1+17, CPRSA+12, NOSYS+12, EXEC+13, ERROR+13, ERROR+27
WP^DIE CLINEFF1+8
$$GET1^DIQ ACT3+4, SET+5, CPRSA+2, NOSYS+3, EXEC+3, ERROR+3, ERROR+18
^DIWP CLINEFF+6, CLINEFF+8
SAVEOC^OROCAPI1 BEGIN+14, CPRSA+10, NOSYS+10, EXEC+11, ERROR+11, ERROR+25
VF1^PSJNEWOA SETOC+6
ACT^PSJNEWOC DAOC2+1
DAOC^PSONEWOA VF2+3, DAOC+5
$$NOW^XLFDT SET+4, CPRSA+4, NOSYS+5, EXEC+6, ERROR+6, ERROR+21, SETOC+12

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ORD(100.05 - [#100.05] Classic Fileman Calls
^PS(53.1 - [#53.1] GET1^DIQ
55.01 GET1^DIQ
55.06 GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] GRP2+14
^ORD(100.05 - [#100.05] ACT3+6, ACT3+7, CLINEFF1+4, CLINEFF1+16, ADDSOL+6
^PS(53.1 - [#53.1] SET3+14, SETOC+13
^PS(55 - [#55] SETOC+14, SETOC+15
^TMP("PSJDAOC" BEGIN+2, BEGIN+7, SET2+2, GRP1+7, GRP1+8, GRP2+8, GRP2+9, CLINEFF+3, CLINEFF+7, CLINEFF+8
, GETADD+2, GETADD+3, GETSOLS+1, GETSOLS+2, CPRS, CPRS+1!, CPRSA+5, NOSYS+9, EXEC+5, EXEC+10
, ERROR+5, ERROR+10
^TMP("PSODAOC" ACT+3, ACT3+1, ACT2+5, VF1+3, VF2+2, VF2+6!, DAOC+3*, DAOC+8!, ERROR+20, ERROR+24
, SETOC+5, SETOC+8, SETOC+11*
^UTILITY($J CLINEFF+4!, CLINEFF1+7, CLINEFF1+9!

Label References

Name Line Occurrences
ACT3 VF1+4
ADDSOL IV+6
CLINEFF1 CLINEFF+6
CPRSA CPRS
DAOC ACT2+5
DAOC2 SETOC+17
GETADD BEGIN+5
IV GRP1+13, GRP2+19
SET2 BEGIN+22
SET3 ACT3+2, BEGIN+10, CPRSA+6, NOSYS+6, EXEC+7, ERROR+7, ERROR+22

Naked Globals

Name Field # of Occurrence
^(0 CPRSA+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADDSOLS SET+1~
ADDSOLS( IV+3, GETADD+4*
ADDSOLS("S" GETSOLS+3*
CLASS SET+1~
CLASSIEN SET+1~
DA ACT+2~, ACT3+8!, ACT3+9*, VF1+2~, VF2+1~, SET+1~, BEGIN+4!, BEGIN+9!, BEGIN+15*, BEGIN+16
, SET2+4, GRP1+9, GRP2+17, CLINEFF1+1!, CLINEFF1+4*, CLINEFF1+12!, CLINEFF1+13*, CLINEFF1+15, CLINEFF1+16*, IV+1~
, ADDSOL+3*, ADDSOL+6*, CPRSA~, CPRSA+11*, CPRSA+15, CPRSA+35, NOSYS+1~, NOSYS+11*, EXEC+1~, EXEC+12*
, ERROR+1~, ERROR+12*, ERROR+16~, ERROR+26*, SETOC+4~, SETOC+9~
DA(1 SET2+4*, GRP1+9*, GRP1+12, GRP2+17*, CLINEFF1+2*, CLINEFF1+3, CLINEFF1+4, CLINEFF1+8, CLINEFF1+15*, ADDSOL+3*
, CPRSA+15*, CPRSA+35*
DA(2 CLINEFF1+15*, CLINEFF1+16, ADDSOL+3*, ADDSOL+5, ADDSOL+6
DACNT IV+1~, IV+2*, IV+4*, IV+5*, ADDSOL+3, ADDSOL+5, ADDSOL+6
DD ADDSOL+8!
>> DFN ACT3+4, SET+5, CPRSA+2, NOSYS+3, EXEC+3, ERROR+3, ERROR+18, SETOC+14, SETOC+15
DIC ACT+2~, ACT3+8!, VF1+2~, VF2+1~, SET+1~, BEGIN+4!, SET2+3!, SET2+4*, GRP1+6!, GRP1+9*
, GRP1+11!, GRP2+16!, GRP2+17*, CLINEFF+4!, CLINEFF1+1!, CLINEFF1+3*, CLINEFF1+6!, CLINEFF1+12!, IV+1~, ADDSOL+5*
, CPRSA+14~, CPRSA+15*, CPRSA+18~, CPRSA+35*, SETOC+4~
DIC(0 SET2+4*, GRP1+9*, GRP2+17*, CLINEFF1+3*, ADDSOL+5*, CPRSA+15*, CPRSA+35*
DIE ACT+2~, ACT3+8!, ACT3+9*, VF1+2~, VF2+1~, SET+1~, BEGIN+4!, BEGIN+19*, SET2+3!, GRP1+6!
, CLINEFF+4!, CLINEFF1+1!, CLINEFF1+6!, CLINEFF1+12!, CLINEFF1+15*, IV+1~, CPRSA+12*, NOSYS+12*, EXEC+13*, ERROR+13*
, ERROR+27*, SETOC+4~
DINUM CLINEFF+2~, CLINEFF+5*, CLINEFF1+4*, ADDSOL+2~, ADDSOL+6*
DIR CLINEFF1+1!, CLINEFF1+6!, CLINEFF1+12!, SETOC+4~
DIWF CLINEFF+2~, CLINEFF+5*
DIWL CLINEFF+2~, CLINEFF+5*
DIWR CLINEFF+2~, CLINEFF+5*
DO ADDSOL+8!
DR ACT+2~, ACT3+8!, ACT3+9*, VF1+2~, VF2+1~, SET+1~, BEGIN+4!, BEGIN+17*, BEGIN+18*, BEGIN+19*
, BEGIN+20*, CLINEFF+2~, CLINEFF+4!, CLINEFF1+1!, CLINEFF1+6!, CLINEFF1+15*, IV+1~, ADDSOL+7*, CPRSA+12*, NOSYS+12*
, EXEC+13*, ERROR+13*, ERROR+27*, SETOC+4~
DUZ BEGIN+11, CPRSA+7, NOSYS+7, EXEC+8, ERROR+8, ERROR+23
IT BEGIN+3~*, BEGIN+7*, BEGIN+18
IVIENS ADDSOL+2~, GETADD+1~, GETADD+3*, GETADD+4, GETSOLS+2*, GETSOLS+3
IVSOL IV+1~, IV+2*, IV+4*
IVTYPE IV+1~, IV+3*, IV+4, ADDSOL+4
LAYGO ADDSOL+2~, ADDSOL+4*
NODE GRP1+5~, GRP1+13*, GRP2+19*, ADDSOL+4, ADDSOL+5, ADDSOL+6
NODE2 IV+1~, IV+2*, IV+4*, ADDSOL+5, ADDSOL+6
OCCDT SET+1~, SET+4*, BEGIN+11, CPRSA~, CPRSA+4*, CPRSA+7, NOSYS+1~, NOSYS+5*, NOSYS+7, EXEC+1~
, EXEC+6*, EXEC+8, ERROR+1~, ERROR+6*, ERROR+8, ERROR+16~, ERROR+21*, ERROR+23, SETOC+9~, SETOC+12*
OCHISIEN ACT3+3~, ACT3+7*, ACT3+9
ODA SET+1~, BEGIN+3*, BEGIN+16*, CLINEFF1+2, CLINEFF1+13, ADDSOL+3
ODA(1 GRP1+12*
OLD CLINEFF+2~
OLDOCCUR ACT3+3~
OLDX CLINEFF+2~, CLINEFF+5*, CLINEFF+7*, CLINEFF+8
>> ON55 SET3+7, SET3+14, SET3+22
ORDNUM ACT3+3~, ACT3+4*, ACT3+5, ACT3+6, ACT3+7
ORL SET+1~, BEGIN+9!, BEGIN+14, CPRSA~, CPRSA+10, NOSYS+1~, NOSYS+10, EXEC+1~, EXEC+11, ERROR+1~
, ERROR+11, ERROR+16~, ERROR+25, SETOC+9~
ORL(1 BEGIN+11*, BEGIN+12*, BEGIN+13*, CPRSA+7*, CPRSA+8*, CPRSA+9*, NOSYS+7*, NOSYS+8*, NOSYS+9*, EXEC+8*
, EXEC+9*, EXEC+10*, ERROR+8*, ERROR+9*, ERROR+10*, ERROR+23*, ERROR+24*
ORN DAOC+2, SET+1~, SET+5*, SET+6, BEGIN+11, CPRSA~, CPRSA+2*, CPRSA+3, CPRSA+7, NOSYS+1~
, NOSYS+3*, NOSYS+4, NOSYS+7, EXEC+1~, EXEC+3*, EXEC+4, EXEC+8, ERROR+1~, ERROR+3*, ERROR+4
, ERROR+8, ERROR+16~, ERROR+18*, ERROR+19, ERROR+23, SETOC+9~, SETOC+13*, SETOC+14*, SETOC+15*, SETOC+16
ORTY CPRSA~, CPRSA+5*, CPRSA+7
PI ACT2+17!
PSGORD VF1~, SET3+5, SET3+6, SET3+7, SET3+14, SET3+22
PSIEDITO SET3+9, SET3+16!, DAOC2+2
>> PSIOCVFY SET3+10, SET3+13, SET3+21
PSJAOC1 ACT+2~, ACT2+5*!, VF1+2~, VF2+1~, VF2+2*
PSJCLEFF CLINEFF+2~, CLINEFF+5*, CLINEFF+7*, CLINEFF+8, CLINEFF1+7*, CLINEFF1+8
PSJDAOC ACT3+9, ACT2+17!, BEGIN+11, SET3+7*, SET3+11*, SET3+15*, SET3+18*, SET3+19*, SET3+23*, CPRSA+7
, NOSYS+1~, NOSYS+7, EXEC+8, ERROR+1~, ERROR+8, ERROR+16~, ERROR+23, SETOC+9~, SETOC+12*
PSJDAOCN SET+1~
PSJDATA DAOC+1~, DAOC+2*, DAOC+3
>> PSJEDITO SET3+4, DAOC2+2
PSJER CLINEFF+2~
PSJFILE CLINEFF+2~, CLINEFF1+7*, CLINEFF1+8
PSJIENS CLINEFF+2~
>> PSJKIND BEGIN+2, BEGIN+6, BEGIN+8, BEGIN+19, SET2+2, GRP1+7, GRP1+8, GRP2+8, GRP2+9, CLINEFF+3
, CLINEFF+7, CLINEFF+8, GETADD+2, GETADD+3, GETSOLS+1, GETSOLS+2
>> PSJOCFG DAOC+2, SET3+3*, SET3+7, SET3+11, SET3+13, SET3+15, SET3+18, SET3+19, SET3+23
>> PSJORD SET3+5, SET3+19
PSJORDN1 SETOC+4~*, SETOC+10
PSJORDNM SETOC~, SETOC+3, SETOC+4
PSJRDRG GRP2+6~, GRP2+13*
PSJREMD GRP2+6~, GRP2+7*, CLINEFF1+16*
>> PSJREN VF2+4, DAOC+6
PSJRIEN GRP2+6~, GRP2+7*, GRP2+10*, GRP2+13*, GRP2+15
PSJRSITE GRP2+6~, GRP2+7*, GRP2+10*, GRP2+13*, GRP2+14
PSJRSITI GRP2+6~, GRP2+10*, GRP2+14*, GRP2+15, CLINEFF1+15
PSJRSTAT GRP2+6~
PSJVER SET3+2~, SET3+14*, SET3+15, SET3+22*, SET3+23
>> PSJVERFY ACT3+1, SET3+21
>> PSJVFY SET3+4
>> PSJZH BEGIN+13
PSOCNT ADDSOL+2~, ADDSOL+3*
PSOSTYP SET+1~, BEGIN+3*
>> PSOZH DAOC+4*
RET ACT2+17!, SET+1~, BEGIN+9!, BEGIN+14, CPRSA~, CPRSA+10, NOSYS+1~, NOSYS+10, EXEC+1~, EXEC+11
, ERROR+1~, ERROR+11, ERROR+16~, ERROR+25, SETOC+9~
RET(1 BEGIN+15, CPRSA+11, NOSYS+11, EXEC+12, ERROR+12, ERROR+26
RX ERROR+1~
RXN ACT+3*, ACT2+17!, SET+2*, SET+5, CPRSA~, CPRSA+1*, CPRSA+2, NOSYS+1~, NOSYS+2*, NOSYS+3
, EXEC+1~, EXEC+2*, EXEC+3, ERROR+1~, ERROR+2*, ERROR+3, ERROR+16~, ERROR+17*, ERROR+18, SETOC+9~
, SETOC+11*
RXORDER ACT+2~, ACT+3*, ACT3+4, VF1+2~, VF1+3*, VF2+1~, VF2+2*, DAOC+2, SET+2, SET+5
, SET3+14, SET3+22, CPRSA+1, CPRSA+2, CPRSA+34, NOSYS+2, NOSYS+3, EXEC+2, EXEC+3, ERROR+2
, ERROR+3, ERROR+17, ERROR+18, SETOC+10*, SETOC+11, SETOC+12, SETOC+13, SETOC+14, SETOC+15
SETORDER SET3+2~
SEV SET+1~, BEGIN+1*, BEGIN+2*, BEGIN+7, BEGIN+19, SET2+2, GRP1+7, GRP1+8, GRP2+8, GRP2+9
, CLINEFF+3, CLINEFF+6, CLINEFF+7, CLINEFF+8, GETADD+2, GETADD+3, GETSOLS+1, GETSOLS+2, EXEC+1~
SEVERITY BEGIN+3~*, BEGIN+7*, BEGIN+8*, BEGIN+11
STATUS SET+1~
STOP SET3+2~, SET3+4, SET3+7*, SET3+9, SET3+11*, SET3+13, SET3+15*
U SETOC+13, SETOC+14, SETOC+15
X ACT+2~, ACT3+3~, VF1+2~, VF2+1~, SET2+2*, GRP1+9*, GRP2+17*, CLINEFF+6*, CLINEFF+7, CLINEFF+8*
, CLINEFF1+3*, ADDSOL+2~, ADDSOL+3*, ADDSOL+7*, CPRSA+15*, CPRSA+34*, SETOC+4~
XZX CPRS~*, CPRSA+5
Y ACT+2~, VF1+2~, VF2+1~, SETOC+4~
Z CPRSA~, NOSYS+1~, ERROR+1~, ERROR+16~, SETOC+9~
ZCHK SET+1~, EXEC+1~
ZCLZ SET+1~, BEGIN+1*
ZDRG SET+1~, CPRS~, CPRSA~, CPRSA+5*, CPRSA+15, EXEC+1~
ZIEN GRP1+5~, IV+2*, IV+3*, ADDSOL+7
ZOC SET+1~, EXEC+1~, EXEC+5*, EXEC+10, ERROR+5*, ERROR+10, ERROR+20*, ERROR+24
ZORMGS ACT2+17!, CPRSA+5*, CPRSA+9
ZORMSG CPRS~
ZORT SET+1~, GRP1+5~, GRP1+8*, GRP1+9, GRP2+9*, GRP2+12, GRP2+13, GRP2+15*, GRP2+17, CLINEFF1+14
, IV+2, EXEC+1~
ZSIEN IV+1~, IV+2*, IV+3
ZTOT SET+1~, EXEC+1~
ZVA SET+1~, BEGIN+1*, BEGIN+2*, SET2+2, GRP1+7, GRP1+8, GRP2+8, GRP2+9, CLINEFF+3, CLINEFF+7
, CLINEFF+8, GETADD+2, GETADD+3, GETSOLS+1, GETSOLS+2
ZX SET+1~, BEGIN+1*, GRP1+6*, GRP1+7*, GRP1+8, GRP2+7*, GRP2+8*, GRP2+9, GETADD+2*, GETADD+3
, GETSOLS+1*, GETSOLS+2
ZZX SET+1~, EXEC+1~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All