ECXDVSN1 ;ALB/JAP - Division selection utility (cont.) ; 3/30/07 7:56am
Source file <ECXDVSN1.m>
Package | Total | Call Graph |
---|---|---|
Outpatient Pharmacy | 2 | PSS^PSO59 DIC^PSODI |
VA FileMan | 2 | ^DIC EN^DIQ1 |
Registration | 1 | $$PRIM^VASITE |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
DSS Extracts | 4 | ECXAECQ ECXALAB ECXANUR ECXSARXS |
Name | Comments | DBIA/ICR reference |
---|---|---|
ECQ(ECXDIV,ECXALL,ECXERR) | ;setup division/site information for QSR extract audit report
; input ; ECXDIV = passed by reference array variable (required) ; ECXALL = 0/1 (optional) ; '0' indicates user to select QUASAR site/division; ; '1' indicates 'all' sites/divisions or only one site/division ; exists in file #509850.8; currently only one site is allowed ; to be defined; ; default is '1' ; output ; ECXDIV = data for QUASAR site/division; ; ECXDIV(ien in file #4)=ien in file #509850.8^name^station number ; ECXERR = 0/1 ; if input problem, then '1' returned |
|
LAB(ECXACC,ECXALL,ECXERR) | ;setup accession area information for LAB extract audit report
; input ; ECXACC = passed by reference array variable (required) ; ECXALL = 0/1 (optional) ; '0' indicates user to select Accession Area(s); ; '1' indicates 'all' Accession Areas are selected ; default is '1' ; output ; ECXACC = data for Accession Area(s); ; ECXACC(ien in file #68)=name^abbreviation ; ECXERR = 0/1 ; if input problem, then '1' returned |
|
NUR(ECXDIV,ECXALL,ECXERR) | ;setup accession area information for LAB extract audit report
; input ; ECXDIV = passed by reference array variable (required) ; ECXALL = 0/1 (optional) ; '0' indicates user to select nursing location(s)/division(s); ; '1' indicates 'all' nursing locations and medical center divisions ; are selected or facility is non-divisional; ; default is '1' ; output ; ECXDIV = data for nursing location(s) and medical center division(s); ; ECXDIV("D",ien in file #40.8)=ien in file #4^name^station number ; ECXDIV(ien in file #211.4,ien in file #40.8)=ien in file #44 ; ECXERR = 0/1 ; if input problem, then '1' returned |
|
PRE(ECXDIV,ECXALL,ECXERR) | ;setup site information for PRE extract audit report
; input ; ECXDIV = passed by reference array variable (required) ; ECXALL = 0/1 (optional) ; '0' indicates user to select Pharmacy site(s); ; '1' indicates 'all' sites are selected ; default is '1' ; output ; ECXDIV = data for Pharmacy site(s); ; ECXDIV(ien in file #59)=IEN in file #59^name^site number^IEN in file #4 ; ECXERR = 0/1 ; if input problem, then '1' returned |
FileNo | Call Tags |
---|---|
^DIC(4 - [#4] | Classic Fileman Calls |
^DG(40.8 - [#40.8] | Classic Fileman Calls |
^SC - [#44] | Classic Fileman Calls |
^PS(59 - [#59] | Classic Fileman Calls |
^LRO(68 - [#68] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ACK(509850.8 - [#509850.8] | ECQ+22 |
^LRO(68 - [#68] | LAB+19, LAB+20 |
^NURSF(211.4 - [#211.4] | NUR+21 |
Name | Field # of Occurrence |
---|---|
^( | ECQ+22, LAB+19, PRE+20, PRE+21, PRE+32 |
^(100 | PRE+21, PRE+32 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ARRAY | PRE+13~, PRE+15*, PRE+16, PRE+20, PRE+21, PRE+31, PRE+32 |
DA | ECQ+23*, LAB+13~, LAB+21*, NUR+23*, PRE+13~ |
DIC | ECQ+15~, ECQ+23*, LAB+13~, LAB+21*, LAB+30*, NUR+23*, NUR+32*, NUR+38*, PRE+13~, PRE+25~ , PRE+26*, PRE+27 |
DIC("S" | NUR+38* |
DIC(0 | LAB+30*, NUR+32*, NUR+38*, PRE+26* |
DIQ | ECQ+23*, LAB+13~, LAB+21*, NUR+23*, PRE+13~ |
DIQ(0 | ECQ+23*, NUR+23* |
DIRUT | LAB+13~ |
DR | ECQ+23*, LAB+13~, LAB+21*, NUR+23* |
DT | NUR+19 |
DTOUT | LAB+13~, LAB+31, NUR+39, PRE+25~, PRE+28 |
DUOUT | LAB+13~, LAB+31, NUR+39, PRE+25~, PRE+28 |
ECX | ECQ+15~, ECQ+23!, ECQ+24, ECQ+25, LAB+13~, LAB+21!, LAB+22, NUR+22!, NUR+25 |
ECX(4 | ECQ+24 |
ECX(44 | NUR+25 |
ECX(68 | LAB+24, LAB+25 |
ECXA | LAB+13~, LAB+15*, LAB+19*, LAB+20 |
ECXACC | LAB~, LAB+34!, LAB+35 |
ECXACC( | LAB+25*, LAB+33* |
ECXALL | ECQ~, ECQ+16*, ECQ+18*, ECQ+21, LAB~, LAB+14*, LAB+17, LAB+28, NUR~, NUR+16* , NUR+30, NUR+37, PRE~, PRE+14*, PRE+18, PRE+23 |
ECXARR | PRE+13~ |
ECXD | ECQ+15~, ECQ+19*, ECQ+22*, ECQ+23, ECQ+24 |
>> ECXDIEN | NUR+23*, NUR+25*, NUR+26*, NUR+27, NUR+30*, NUR+31*, NUR+32, NUR+33, NUR+34, NUR+41* , NUR+42, NUR+44, NUR+45 |
ECXDIV | ECQ~, ECQ+26!, ECQ+27, NUR~, NUR+47!, NUR+48, PRE~, PRE+34!, PRE+35 |
ECXDIV( | ECQ+24*, NUR+34*, NUR+45*, PRE+21*, PRE+32* |
ECXDIV("D" | NUR+33*, NUR+44* |
ECXERR | ECQ~, ECQ+19*, ECQ+25*, ECQ+26, ECQ+27*, LAB~, LAB+15*, LAB+29, LAB+31*, LAB+34 , LAB+35*, NUR~, NUR+17*, NUR+37, NUR+39*, NUR+47, NUR+48*, PRE~, PRE+15*, PRE+24 , PRE+28*, PRE+34, PRE+35* |
ECXIEN | ECQ+15~, ECQ+22*, ECQ+24, LAB+13~, LAB+19*, LAB+20, LAB+21, LAB+24, LAB+25, PRE+13~ , PRE+20*, PRE+21, PRE+32 |
>> ECXLOC( | NUR+27*, NUR+31, NUR+34, NUR+42, NUR+45 |
>> ECXNLIEN | NUR+21*, NUR+27, NUR+33*, NUR+34*, NUR+44*, NUR+45* |
>> ECXNLNM | NUR+23*, NUR+25*, NUR+27 |
ECXP | PRE+13~, PRE+15*, PRE+18*, PRE+20* |
>> ECXPRIME | NUR+19*, NUR+26 |
>> ECXSC | NUR+17*, NUR+21*, NUR+23, NUR+25, NUR+27 |
>> NM | NUR+41*, NUR+43 |
OUT | ECQ+15~, LAB+13~, LAB+28*, LAB+29, LAB+31*, LAB+32*, NUR+17*, NUR+37, NUR+39*, NUR+40* , PRE+13~, PRE+23*, PRE+24, PRE+28*, PRE+29* |
U | ECQ+24, LAB+25, LAB+33, NUR+27, NUR+33, NUR+41, NUR+44, PRE+21, PRE+32 |
X | ECQ+15~, LAB+13~, LAB+30!, LAB+32, NUR+32*, NUR+40, PRE+13~, PRE+25~, PRE+27, PRE+29 |
Y | ECQ+15~, LAB+13~, LAB+30!, LAB+32, LAB+33, NUR+32, NUR+40, NUR+41, PRE+13~, PRE+25~ , PRE+29, PRE+30 |
Y(0 | LAB+33, NUR+33, NUR+44 |