Call Graph
Call Graph Total: 5
| Package | Total | Call Graph |
|---|---|---|
| VA FileMan | 3 | ^DIC EN^DIQ1 ^DIR |
| DSS Extracts | 2 | ACTDIV^ECXDVSN PDIV3^ECXPUTL |
ECXDVSN2 ;ALB/JAP - Division selection utility (cont.) ; 5/11/04 3:29pm
Source file <ECXDVSN2.m>
| Package | Total | Call Graph |
|---|---|---|
| VA FileMan | 3 | ^DIC EN^DIQ1 ^DIR |
| DSS Extracts | 2 | ACTDIV^ECXDVSN PDIV3^ECXPUTL |
| 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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| RAD(ECXDIV,ECXALL,ECXERR) | ;setup division/site information for RAD extract audit report
; input ; ECXDIV = passed by reference array variable (required) ; ECXALL = 0/1 (optional) ; '0' indicates user to select radiology division; ; '1' indicates 'all' radiology divisions selected or only one division ; exists in file #79; default is '1' ; output ; ECXDIV = data for radiology division/site; ; ECXDIV(ien in file #79)=ien in file #4^name^station number ; ECXERR = 0/1 ; if input problem, then '1' returned |
|
| MTL(ECXDIV,ECXALL,ECXERR) | ;setup division/site information for MTL extract audit report
; input ; ECXDIV = passed by reference array variable (required) ; ECXALL = 0/1 (optional) ; '0' not valid; mental health is non-divisional ; '1' indicates 'all' divisions selected or only one ; exists in file #602; default is '1' ; output ; ECXDIV = data for site; ; ECXDIV(ien in file #602)=name in file #602^ien in file #4^name in file #4^station number ; ECXERR = 0/1 ; if error, then '1' returned; otherwise 0 |
|
| SUR(ECXDIV,ECXALL,ECXERR) | ;setup division/site information for SUR extract audit report
; input ; ECXDIV = passed by reference array variable (required) ; ECXALL = 0/1 (optional) ; '0' indicates user to select surgery division; ; '1' indicates 'all' surgery divisions selected or only one division ; exists in file #133; default is '1' ; output ; ECXDIV = data for surgery division/site; ; ECXDIV(ien in file #133)=ien in file #4^name^station number ; ECXERR = 0/1 ; if input problem, then '1' returned |
|
| PRO(ECXDUZ,ECXPRIME,ECXDIV,ECXALL,ECXERR) | ;setup division/site information for PRO extract reports
; input ; ECXDUX = ien in file#200 for user ; ECXPRIME = primary division ien in file #4 (required) ; all other variables passed by reference ; output ; ECXALL = 0 (one subdivision) ; 1 (all divisions related to primary division) ; ECXDIV = data array for prosthetics division/site; ; ECXDIV(n)=ien in file #4^name^station number ; ECXERR = 0/1 ; if input problem, then '1' returned |
|
| HELP | ;help for dir in pro
|
|
| ALL(ECXDIV,ECXALL,ECXSTART,ECXEND,ECXERR) | ;general purpose division information
; input ; ECXDIV = array of divisions selected (required) ; passed by reference array to contain ; selected divisions; ; ECXALL = 1/0 (optional) ; 1==> user wants all divisions OR ; facility is non-divisional ; 0==> user wants to select some divisions ; if ECXALL not defined, then assume 1 ; ECXSTART = start date of date range (optional) ; ECXEND = end date of date range (optional) ; ECXERR = passed by reference for error return (required) ; output ; ECXDIV = array of divisions selected from file #40.8; ; ECXDIV(ien in file #40.8) = ien in file #4^name^station number^primary indicator^active indicator^dss id ; error CODE ; ECXERR = 1, if input problem occurs ; 0, otherwise |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^SRO(133 - [#133] | Classic Fileman Calls |
| ^DIC(4 - [#4] | Classic Fileman Calls |
| ^DG(40.8 - [#40.8] | Classic Fileman Calls |
| ^RA(79 - [#79] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DG(40.8 - [#40.8] | ALL+26 |
| ^DIC(4 - [#4] | PRO+15 |
| ^ECX(727.3 - [#727.3] | ALL+33, ALL+34, ALL+43, ALL+44 |
| ^ECX(728 - [#728] | MTL+25 |
| ^RA(79 - [#79] | RAD+18 |
| ^SRO(133 - [#133] | SUR+17 |
| ^YSA(602 | MTL+19 |
| Name | Field # of Occurrence |
|---|---|
| ^( | RAD+18, MTL+21, SUR+17, ALL+26 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | RAD+12~, RAD+19*, RAD+27*, MTL+12~, MTL+22*, MTL+27*, SUR+12~, SUR+18*, SUR+26*, PRO+12~ |
| >> DATA | MTL+28*, MTL+30 |
| DATE | MTL+12~ |
| DIC | RAD+12~, RAD+19*, RAD+24*, RAD+27*, MTL+12~, MTL+22*, MTL+27*, SUR+12~, SUR+18*, SUR+23* , SUR+26*, PRO+12~, ALL+20~, ALL+27*, ALL+36* |
| DIC("W" | SUR+23* |
| DIC(0 | RAD+24*, SUR+23*, ALL+27*, ALL+36* |
| DIQ | RAD+12~, RAD+19*, RAD+27*, MTL+12~, MTL+22*, MTL+27*, SUR+12~, SUR+18*, SUR+26*, PRO+12~ |
| DIR | PRO+12~, PRO+24!, PRO+29! |
| DIR("?" | PRO+28* |
| DIR("A" | PRO+23*, PRO+28* |
| DIR("B" | PRO+23* |
| DIR(0 | PRO+23*, PRO+28* |
| DIRUT | PRO+12~ |
| >> DIV | PRO+21*, PRO+22, PRO+30*, PRO+33, HELP+2*, HELP+3 |
| DR | RAD+12~, RAD+19*, RAD+27*, MTL+12~, MTL+22*, MTL+27*, SUR+12~, SUR+18*, SUR+26*, PRO+12~ |
| DSITE | MTL+12~ |
| >> DSSITE | MTL+25*, MTL+26, MTL+27, MTL+28 |
| DT | ALL+23 |
| DTOUT | RAD+12~, RAD+25, SUR+12~, SUR+24, PRO+12~, PRO+25, PRO+31, ALL+37 |
| DUOUT | RAD+12~, RAD+25, SUR+12~, SUR+24, PRO+12~, PRO+25, PRO+31, ALL+37 |
| ECXACT | ALL+20~, ALL+31, ALL+32, ALL+41, ALL+42, ALL+45 |
| ECXALL | RAD~, RAD+13*, RAD+16, RAD+22, MTL~, MTL+13*, MTL+18, SUR~, SUR+13*, SUR+16 , SUR+21, PRO~, PRO+18*, PRO+30*, ALL~, ALL+24*, ALL+25, ALL+35 |
| ECXARR | RAD+12~, RAD+19!, RAD+20, RAD+27!, RAD+28, MTL+12~, MTL+22!, MTL+23, MTL+27!, SUR+12~ , SUR+18!, SUR+19, SUR+26!, SUR+27, PRO+12~ |
| ECXARR(4 | RAD+20, RAD+28, MTL+28, SUR+19, SUR+27 |
| ECXARR(602 | MTL+24 |
| ECXD | RAD+12~, RAD+14*, RAD+18*, MTL+14*, MTL+19, SUR+12~, SUR+14*, SUR+17*, SUR+18, SUR+19 , SUR+26*, SUR+27, ALL+20~, ALL+31, ALL+32, ALL+41, ALL+42 |
| ECXDIEN | ALL+20~, ALL+29*, ALL+30, ALL+39*, ALL+40 |
| ECXDIV | RAD~, RAD+29!, RAD+30, MTL~, MTL+31!, MTL+32, SUR~, SUR+28!, SUR+29, PRO~ , PRO+16, PRO+25!, PRO+31!, PRO+32, PRO+34, ALL~, ALL+46!, ALL+47 |
| ECXDIV( | RAD+20*, RAD+28*, MTL+30*, SUR+19*, SUR+27*, PRO+22, PRO+30, PRO+33!, HELP+3, ALL+30* , ALL+32*, ALL+34*, ALL+40*, ALL+42*, ALL+44* |
| ECXDIV(1 | PRO+17 |
| ECXDIV(99 | PRO+19 |
| ECXDUZ | PRO~, PRO+16 |
| ECXEND | ALL~, ALL+23*, ALL+31, ALL+41 |
| ECXERR | RAD~, RAD+14*, RAD+23, RAD+25*, RAD+29, RAD+30*, MTL~, MTL+14*, MTL+20*, MTL+23* , MTL+26*, MTL+31, MTL+32*, SUR~, SUR+14*, SUR+22, SUR+24*, SUR+28, SUR+29*, PRO~ , PRO+13*, PRO+14*, PRO+15*, PRO+17*, PRO+34*, ALL~, ALL+21*, ALL+35, ALL+37*, ALL+46 , ALL+47* |
| ECXIEN | RAD+12~, RAD+18*, RAD+19, RAD+20, RAD+27*, RAD+28, MTL+12~, MTL+21*, MTL+22, MTL+24 , MTL+30, SUR+12~, SUR+17*, SUR+19, SUR+26*, SUR+27, ALL+20~, ALL+26*, ALL+27, ALL+30 , ALL+31, ALL+32, ALL+33, ALL+34, ALL+39*, ALL+40, ALL+41, ALL+42, ALL+43, ALL+44 |
| ECXNAME | ALL+20~, ALL+29*, ALL+30, ALL+39*, ALL+40 |
| ECXNUM | ALL+20~, ALL+29*, ALL+30, ALL+39*, ALL+40, ALL+45 |
| ECXPRIME | PRO~, PRO+14, PRO+15, PRO+16 |
| ECXSTART | ALL~, ALL+23*, ALL+31, ALL+41 |
| >> LAST | PRO+19*, PRO+21, PRO+33, HELP+2 |
| NM | ALL+20~, ALL+26* |
| OUT | RAD+12~, RAD+22*, RAD+23, RAD+25*, RAD+26*, SUR+12~, SUR+21*, SUR+22, SUR+24*, SUR+25* , PRO+12~, PRO+25*, PRO+27*, PRO+30*, PRO+31*, ALL+20~, ALL+21*, ALL+35, ALL+37*, ALL+38* |
| SITE | MTL+12~ |
| U | RAD+20, RAD+28, MTL+25, MTL+28, MTL+30, SUR+19, SUR+26, SUR+27, PRO+22, HELP+3 , ALL+29, ALL+30, ALL+32, ALL+34, ALL+39, ALL+40, ALL+42, ALL+44 |
| X | RAD+12~, RAD+24!, RAD+26, MTL+12~, MTL+19*, MTL+20, MTL+21, SUR+12~, SUR+23!, SUR+25 , PRO+12~, PRO+24!, PRO+29!, PRO+33*, ALL+20~, ALL+27*, ALL+38 |
| Y | RAD+12~, RAD+24!, RAD+26, RAD+27, MTL+12~, SUR+12~, SUR+23!, SUR+25, SUR+26, PRO+12~ , PRO+24!, PRO+26, PRO+29!, PRO+30, ALL+20~, ALL+27!, ALL+28, ALL+36!, ALL+38, ALL+39 |
| Y(0 | ALL+29, ALL+39 |
| YSITE | MTL+12~, MTL+24*, MTL+30 |
