BWMDE ;IHS/ANMC/MWR - EXPORT MDE'S FOR CDC.;29-Oct-2003 21:28;PLS
Source file <BWMDE.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DATES | ;EP
; Select data range for export. |
|
| LOAD(BWBEGDT,BWENDDT,BWLOC,BWHCF,BWCC,BWPRV,BWCUTF,BWCUTO) | ;EP;TO QUEUE EXPORT TO RUN IN BACKGROUND
; BWBEGDT - BEGINNING DATE FOR EXPORT ; BWENDDT - ENDING DATE FOR EXPORT ; BWLOC - ARRAY OF LOCATIONS TO INCLUDE ; BWHCF - ARRAY OF HEALTH CARE FACILITIES TO INCLUDE ; BWCC - ARRAY OF COMMUNITIES TO INCLUDE ; BWPRV - ARRAY OF PROVIDERS TO INCLUDE ; BWCUTF - YOUNGEST AGE TO INCLUDE ; BWCUTO - OLDEST AGE TO INCLUDE |
|
| S2 | ;FOR SILENT CALL
|
|
| S1 | ;EP;TO RUN EXPORT IN BACKGROUND
|
|
| START | ;EP
|
|
| EXIT | ;
|
|
| EXTRACT | ;EP
|
|
| EXPORT | ;EP
; Called by option "BW CDC EXPORT DATA" exports data. |
|
| DATA | ;EP
; Retreive data and store in ^BWTMP(. |
|
| INCCHK(BWDFN,PROCDT) | ; EP
; Input: PROCDT - Date of procedure ; Returns: 0=exclude procedure; 1=include procedure |
|
| SELECT | ;EP
|
| Name | Field # of Occurrence |
|---|---|
| ^%ZISC | DATA+13 |
| $$OPEN^%ZISH | DATA+12 |
| ^%ZTLOAD | LOAD+18 |
| $$DOD^AUPNPAT | DATA+55 |
| BUILD^BWMDE1 | DATA+68 |
| CHECKS^BWMDE4 | START+3, S1+2 |
| ERROR^BWMDEU1 | DATA+14 |
| HFS^BWMDEU1 | S2+3 |
| SELECT^BWSELECT | DATES+14, DATES+18, DATES+24, DATES+28 |
| $$AGEAT^BWUTL1 | DATA+55 |
| $$CURCOM^BWUTL1 | DATA+61 |
| ASKDATES^BWUTL3 | DATES+7 |
| DIRZ^BWUTL3 | START+15, DATES+60 |
| $$AGENCY^BWUTL5 | DATES+23 |
| SETVARS^BWUTL5 | START+2, S1+1 |
| TITLE^BWUTL5 | SELECT+2 |
| KILLALL^BWUTL8 | EXIT+1 |
| ^DIR | START+7, DATES+37, DATES+47, DATES+59 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^BWP - [#9002086] | INCCHK+5, INCCHK+6 |
| ^BWPCD - [#9002086.1] | DATA+23, DATA+24, DATA+25 |
| ^BWPCD("D" | DATA+20, DATA+22, DATA+23! |
| ^BWSITE - [#9002086.02] | START+11, START+12, DATES+6, DATA+6, DATA+10, DATA+11, EXPORT+6, EXTRACT+11 |
| ^BWTMP($J | DATA+17! |
| ^DPT - [#2] | DATA+52 |
| ^TMP("BWTPCD" | DATA+70* |
| Name | Line Occurrences |
|---|---|
| $$INCCHK | DATA+53 |
| DATA | S2+1 |
| DATES | DATES+9 |
| EXIT | START+3, START+5, S2+2, S1+2 |
| EXPORT | BWMDE+10 |
| LOAD | START+16 |
| S2 | S1+3 |
| SELECT | START+4 |
| START | EXPORT+7, EXTRACT+13 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| AGE | DATA+49~, DATA+55*, DATA+56, DATA+57 |
| >> BW0 | DATA+25*, DATA+29, DATA+30, DATA+31, DATA+32, DATA+35, DATA+38, DATA+41, DATA+45, DATA+50 , DATA+53, DATA+61, DATA+65, DATA+70 |
| >> BW2 | DATA+25*, DATA+30 |
| BWBEGDT | START+16, LOAD~, LOAD+10, DATES+7, DATES+9, DATA+18, EXPORT+3~, EXTRACT+3~ |
| BWCC | START+16, LOAD~, LOAD+9*, LOAD+13 |
| BWCC( | DATA+60 |
| BWCC("ALL" | LOAD+13*, DATES+23*, DATA+60 |
| BWCDCV | START+12, DATA+6*, DATA+11, DATA+68, EXPORT+3~, EXPORT+6*, EXTRACT+3~, EXTRACT+11* |
| >> BWCUR | DATA+60, DATA+61* |
| BWCUTF | START+16, LOAD~, LOAD+10, DATES+41*, DATA+56, EXPORT+3~, EXTRACT+3~ |
| BWCUTO | START+16, LOAD~, LOAD+10, DATES+49*, DATA+57, EXPORT+3~, EXTRACT+3~ |
| BWDFN | DATA+49~, DATA+50*, DATA+51, DATA+52, DATA+53, DATA+55, INCCHK~, INCCHK+4, INCCHK+5, INCCHK+6 |
| >> BWDT | DATA+18*, DATA+20*, DATA+22, DATA+23 |
| BWENDDT | START+16, LOAD~, LOAD+10, DATES+7, DATA+18, DATA+20, EXPORT+3~, EXTRACT+3~ |
| >> BWENDT | DATA+18* |
| >> BWFLNM | START+12*, START+13, DATA+11*, DATA+12 |
| BWHCF | START+16, LOAD~, LOAD+9*, LOAD+12 |
| BWHCF( | DATA+45 |
| BWHCF("ALL" | LOAD+12*, DATA+45 |
| >> BWIEN | DATA+21*, DATA+22*, DATA+23, DATA+24, DATA+25, DATA+68, DATA+70 |
| BWLOC | START+16, LOAD~, LOAD+9*, LOAD+11 |
| BWLOC( | DATA+38 |
| BWLOC("ALL" | LOAD+11*, DATA+38 |
| >> BWMAM | DATA+31*, DATA+32* |
| >> BWNOFAC | DATA+18*, DATA+41* |
| >> BWOFAC | DATA+18*, DATA+45* |
| >> BWPAP | DATA+31*, DATA+32* |
| >> BWPATH | START+11*, START+13, DATA+10*, DATA+12 |
| BWPOP | START+3, START+5, S2+2, S1+2, DATES+7, DATES+8, DATES+14, DATES+15, DATES+18, DATES+19 , DATES+24, DATES+25, DATES+28, DATES+29, DATES+40*, DATES+48*, DATES+53, DATES+60*, DATA+12*, DATA+14* , EXPORT+3~, EXTRACT+3~ |
| BWPRV | START+16, LOAD~, LOAD+9*, LOAD+14 |
| BWPRV( | DATA+65 |
| BWPRV("ALL" | LOAD+14*, DATA+65 |
| BWSILENT | LOAD+15*, DATA+3, EXPORT+3~, EXTRACT+3~ |
| BWSTTDT | DATES+6*, DATES+7, DATES+9, EXPORT+3~, EXTRACT+3~ |
| BWTITLE | LOAD+16, SELECT+2, EXPORT+3~, EXPORT+4*, EXTRACT+3~, EXTRACT+9* |
| >> BWTSEL | DATA+51 |
| >> BWTSEL( | DATA+51 |
| BWXPORT | START+12, DATES+53, DATA+11, EXPORT+3~, EXPORT+4*, EXTRACT+3~, EXTRACT+12* |
| DIR | START+8!, DATES+33~, DATES+38!, DATES+42~, DATES+47!, DATES+54~ |
| DIR("?" | DATES+35*, DATES+44*, DATES+45*, DATES+56*, DATES+57* |
| DIR("A" | START+6*, DATES+36*, DATES+46*, DATES+58* |
| DIR("B" | START+6*, DATES+36*, DATES+46*, DATES+58* |
| DIR(0 | START+6*, DATES+36*, DATES+46*, DATES+58* |
| >> DIRUT | START+9, DATES+40, DATES+48, DATES+60 |
| DT | START+12, DATA+11, DATA+55 |
| DUZ(2 | START+11, START+12, DATES+6, DATES+18, DATES+23, DATA+6, DATA+10, DATA+11, EXPORT+6, EXTRACT+11 |
| ELGDT | INCCHK+3~, INCCHK+6*, INCCHK+7, INCCHK+8 |
| ELGV | INCCHK+3~, INCCHK+5*, INCCHK+7, INCCHK+8 |
| IOF | DATA+3 |
| PROCDT | INCCHK~, INCCHK+4, INCCHK+8 |
| U | START+11, START+12, DATES+6, DATA+6, DATA+10, DATA+11, DATA+24, DATA+29, DATA+30, DATA+31 , DATA+32, DATA+35, DATA+38, DATA+41, DATA+45, DATA+50, DATA+53, DATA+61, DATA+65, DATA+70 , INCCHK+5, INCCHK+6, EXPORT+6, EXTRACT+11 |
| >> Y | START+10, DATES+41, DATES+49, DATES+60 |
| >> ZTDESC | LOAD+16* |
| >> ZTDTH | LOAD+16* |
| >> ZTIO | LOAD+16* |
| >> ZTQUEUED | DATA+3 |
| >> ZTRTN | LOAD+16* |
| >> ZTSAVE("BW*" | LOAD+17* |