BWMDET1 ;CMI/THL - NEW METHOD TO EXPORT CBE/MAM DATA - BWMDET CON'T;30-May-2003 15:26;DKM
Source file <BWMDET1.m>
| Package | Total | Call Graph |
|---|---|---|
| Women's Health | 6 | ^BWMDE ($$CNTYRES,$$CNTYSCR,$$DOB,$$PATID,$$RECID,$$STRES,$$STSCR,$$ZIP)^BWMDE2 $$EOR^BWMDE21 (F1,USED)^BWMDET PCDVARS^BWUTL3 ^BWUTL5 |
| VA Fileman | 2 | ^%DTC ^DIC |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| RACE(DATE) | ;EP;FIND RACE FOR SELECTED SITES AFTER SELECTED DATES
|
|
| LASTCBE | ;EP;FIND LAST CBE
|
|
| CBEARRAY | ;EP;CREATE ARRAY OF ALL VISITS FOR A PATIENT
|
|
| FILE | ;FILE NEW EXPORT RECORD
|
|
| SEL | ;EP;TO SELECT PATIENTS TO EXPORT ;PATCH 8
|
|
| S1 | ||
| PAID | ;EP;
|
|
| INTV | ;EP;CALCULATE INTERVAL BETWEEN EVENTS
|
|
| L0 | ||
| L1 | ||
| ENDATE | ;EP;CHECK ENROLLMENT DATE
|
|
| SETUP | ;EP;
|
|
| MCARE | ;EP;EVALUATE MEDICARE ELIGIBILITY; PATCH 8
|
| Name | Field # of Occurrence |
|---|---|
| ^%DTC | INTV+3, ENDATE+5 |
| ^BWMDE | SEL+4 |
| $$CNTYRES^BWMDE2 | FILE+21 |
| $$CNTYSCR^BWMDE2 | FILE+13 |
| $$DOB^BWMDE2 | FILE+24 |
| $$PATID^BWMDE2 | FILE+18 |
| $$RECID^BWMDE2 | FILE+19 |
| $$STRES^BWMDE2 | FILE+22 |
| $$STSCR^BWMDE2 | FILE+12 |
| $$ZIP^BWMDE2 | FILE+23 |
| $$EOR^BWMDE21 | FILE+70 |
| F1^BWMDET | L1+15 |
| USED^BWMDET | ENDATE+6 |
| PCDVARS^BWUTL3 | FILE+7 |
| ^BWUTL5 | FILE+7 |
| ^DIC | S1+4 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^BWP - [#9002086] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNMCR - [#9000003] | MCARE+5, MCARE+6 |
| ^AUPNMCR("B" | MCARE+1 |
| ^AUTTLOC - [#9999999.06] | FILE+14 |
| ^BWCBE - [#9002086.93] | L1+7 |
| ^BWDIAG - [#9002086.31] | L1+6 |
| ^BWP - [#9002086] | ENDATE+2 |
| ^BWPCD - [#9002086.1] | L1+4, CBEARRAY+5, ENDATE+3 |
| ^BWPCD("C" | CBEARRAY+4 |
| ^BWTMP($J | FILE+71* |
| ^DPT - [#2] | PAID+8 |
| ^TMP("BWTEST" | FILE+46* |
| ^TMP("BWTPCD" | LASTCBE+8, LASTCBE+19, LASTCBE+33, LASTCBE+44, LASTCBE+57, LASTCBE+67, L1+2* |
| ^TMP("CBEARRAY" | LASTCBE+1, LASTCBE+2, LASTCBE+7, LASTCBE+18, LASTCBE+30, LASTCBE+32, LASTCBE+43, LASTCBE+54, LASTCBE+56, LASTCBE+66 , L1+3!, CBEARRAY+1, CBEARRAY+11*, CBEARRAY+12* |
| Name | Line Occurrences |
|---|---|
| CBEARRAY | LASTCBE+1 |
| ENDATE | L1 |
| INTV | LASTCBE+9, LASTCBE+20, LASTCBE+34, LASTCBE+45, LASTCBE+58, LASTCBE+68, L1+16 |
| L0 | LASTCBE+31, LASTCBE+55 |
| L1 | LASTCBE+15, LASTCBE+27, LASTCBE+41, LASTCBE+51, LASTCBE+64, LASTCBE+74 |
| LASTCBE | L1+5 |
| MCARE | FILE+4 |
| PAID | FILE+44 |
| RACE | FILE+2 |
| S1 | SEL+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| AGE | PAID+4~, PAID+8*, PAID+9*, PAID+10*, PAID+11*, PAID+12 |
| >> BW0 | FILE+15, FILE+16, FILE+17 |
| >> BWCDC( | FILE+12*, FILE+13*, FILE+14*, FILE+15*, FILE+16*, FILE+17*, FILE+18*, FILE+19*, FILE+20*, FILE+21* , FILE+22*, FILE+23*, FILE+24*, FILE+25*, FILE+26*, FILE+27*, FILE+28*, FILE+29*, FILE+32*, FILE+33* , FILE+34*, FILE+35*, FILE+36*, FILE+37*, FILE+38*, FILE+39*, FILE+40*, FILE+45*, FILE+47*, FILE+48 , FILE+49*, FILE+50*, FILE+51*, FILE+52*, FILE+53*, FILE+54*, FILE+56*, FILE+58*, FILE+59, FILE+60* , FILE+61*, FILE+62*, FILE+63*, FILE+64*, FILE+65*, FILE+66*, FILE+67*, FILE+68*, FILE+69*, FILE+70* , FILE+71, FILE+74! |
| >> BWDFN | MCARE+1, MCARE+5, MCARE+6, FILE+71 |
| >> BWDT | MCARE+7 |
| >> BWIEN | FILE+7, FILE+12, FILE+13, FILE+14, FILE+15, FILE+16, FILE+17, FILE+18, FILE+19, FILE+20 , FILE+21, FILE+22, FILE+23, FILE+24, FILE+25, FILE+26, FILE+27, FILE+28, FILE+29, FILE+32 , FILE+33, FILE+34, FILE+35, FILE+36, FILE+37, FILE+38, FILE+39, FILE+40, FILE+45, FILE+47 , FILE+48, FILE+49, FILE+50, FILE+51, FILE+52, FILE+53, FILE+54, FILE+56, FILE+58, FILE+59 , FILE+60, FILE+61, FILE+62, FILE+63, FILE+64, FILE+65, FILE+66, FILE+67, FILE+68, FILE+69 , FILE+70, FILE+71, FILE+74 |
| >> BWMAM | FILE+10*, FILE+17 |
| >> BWPAP | FILE+11*, FILE+16 |
| BWQUIT | SEL+1, SEL+2!, S1+6*, MCARE+2!, MCARE+5, MCARE+7*, RACE+2!, RACE+9*, FILE+1!, FILE+3! , FILE+5! |
| >> BWSILENT | FILE+73 |
| >> BWT("CBE RESU | LT POINTER" , L1+6*, L1+7 |
| BWTCBE | FILE+74! |
| BWTCBE("CBE P | AID" , L1+8!, L1+9*, FILE+30*, FILE+31*, FILE+32 |
| BWTCBE(20 | FILE+27, SETUP+1* |
| BWTCBE(21 | L1+7*, L1+9, L1+15, FILE+8, FILE+9, FILE+28, FILE+30, FILE+31, SETUP+2* |
| BWTCBE(22 | FILE+8*, FILE+9*, FILE+29 |
| BWTCBE(23 | FILE+8*, FILE+9*, SETUP+3* |
| BWTCBE(27 | SETUP+4* |
| BWTCBE(29 | SETUP+5* |
| BWTCBE(32 | FILE+36, SETUP+6* |
| BWTCBE(33 | FILE+37 |
| BWTCBE(35 | PAID+5, PAID+6, FILE+38, FILE+41, FILE+42, SETUP+7* |
| BWTCBE(36 | FILE+39, FILE+54, SETUP+9* |
| BWTCBE(37 | FILE+2, FILE+9, FILE+40 |
| BWTCBE(38 | PAID+2*, PAID+3*, PAID+6*, PAID+7*, PAID+12*, PAID+13*, FILE+41*, FILE+42*, FILE+43*, FILE+45 , FILE+46 |
| BWTCBE(52 | FILE+49 |
| BWTCBE(53 | FILE+50 |
| BWTCBE(54 | FILE+51 |
| BWTCBE(55 | FILE+52 |
| BWTCBE(56 | FILE+53 |
| BWTCBE(57 | FILE+54 |
| BWTCBE(58 | FILE+55*, FILE+56 |
| BWTCBE(59 | FILE+57*, FILE+58 |
| BWTCBE(60 | FILE+62 |
| BWTCBE(61 | FILE+63 |
| BWTCBE(62 | FILE+64 |
| BWTCBE(63 | FILE+65 |
| BWTCBE(64 | FILE+67 |
| BWTCBE(65 | FILE+68 |
| BWTCBE(66 | FILE+69 |
| BWTDAT | LASTCBE+7, LASTCBE+8, LASTCBE+18, LASTCBE+19, LASTCBE+30, LASTCBE+54, L0, L1+5*, L1+11*, INTV+1 , ENDATE+1~ |
| BWTDATX | LASTCBE+4~, LASTCBE+8*, LASTCBE+19*, LASTCBE+30*, LASTCBE+31, LASTCBE+32, LASTCBE+43, LASTCBE+54*, LASTCBE+55, LASTCBE+56 , LASTCBE+66, L0*, L1+3, L1+5, L1+10*, L1+13, INTV+2, ENDATE+1~ |
| >> BWTINTV | LASTCBE+10, LASTCBE+21, LASTCBE+35, LASTCBE+46, LASTCBE+59, LASTCBE+69, INTV+5* |
| >> BWTP0 | PAID+2, PAID+3, PAID+8 |
| >> BWTPATDA | LASTCBE+1, LASTCBE+2, LASTCBE+7, LASTCBE+18, LASTCBE+30, LASTCBE+32, LASTCBE+43, LASTCBE+54, LASTCBE+56, LASTCBE+66 , L1+3, CBEARRAY+1, CBEARRAY+4, CBEARRAY+11, CBEARRAY+12, ENDATE+2 |
| >> BWTPCDDA | LASTCBE+7, LASTCBE+18, L0, ENDATE+3, FILE+46 |
| BWTQUIT | LASTCBE+3!, LASTCBE+8, LASTCBE+11*, LASTCBE+19, LASTCBE+22*, LASTCBE+33!, LASTCBE+36*, LASTCBE+44!, LASTCBE+47*, LASTCBE+57! , LASTCBE+60*, LASTCBE+67!, LASTCBE+70*, L1+1, ENDATE+6* |
| >> BWTSEL | SEL+3 |
| >> BWTSEL( | S1+7* |
| BWTX | LASTCBE+4~, LASTCBE+7*, LASTCBE+8, LASTCBE+14, LASTCBE+18*, LASTCBE+19, LASTCBE+26, LASTCBE+32*, LASTCBE+33, LASTCBE+40 , LASTCBE+43*, LASTCBE+44, LASTCBE+50, LASTCBE+56*, LASTCBE+57, LASTCBE+63, LASTCBE+66*, LASTCBE+67, LASTCBE+73 |
| >> BWTZ | LASTCBE+5*, LASTCBE+8*, LASTCBE+14*, LASTCBE+19*, LASTCBE+26*, LASTCBE+40*, LASTCBE+50*, LASTCBE+63*, LASTCBE+73*, L0* , L1+2, L1+3, L1+4 |
| D | MCARE+3~, MCARE+6*, MCARE+7 |
| DATE | RACE~, RACE+3, RACE+5, RACE+6 |
| DIC | S1*, S1+5! |
| DIC("A" | S1+2* |
| DIC(0 | S1+1* |
| DT | PAID+9 |
| DUZ(2 | PAID+1, PAID+2, PAID+3, RACE+4, FILE+2, FILE+14 |
| IO(0 | FILE+73 |
| >> J | FILE+60* |
| >> NEW | FILE+8, FILE+9 |
| U | L1+5, L1+6, L1+7, L1+10, CBEARRAY+6, CBEARRAY+7, CBEARRAY+8, CBEARRAY+9, CBEARRAY+11, CBEARRAY+12 , ENDATE+2, ENDATE+3, MCARE+6, MCARE+7, PAID+1, PAID+2, PAID+3, PAID+8, FILE+14, FILE+15 , FILE+16, FILE+17 |
| X | L1+4*, L1+5, L1+6, L1+10, INTV+4*, INTV+5, CBEARRAY+2~, CBEARRAY+3*, CBEARRAY+4*, CBEARRAY+5 , CBEARRAY+11, CBEARRAY+12, ENDATE+6, MCARE+3~, MCARE+4*, MCARE+5*, MCARE+6, FILE+59*, FILE+60, FILE+61 , FILE+66 |
| >> X1 | INTV+1*, ENDATE+2*, ENDATE+4 |
| >> X2 | INTV+2*, ENDATE+3*, ENDATE+4 |
| XMINUS | LASTCBE+16!, LASTCBE+25!, LASTCBE+28!, LASTCBE+33, LASTCBE+36, LASTCBE+39!, LASTCBE+42!, LASTCBE+52!, LASTCBE+65!, LASTCBE+75! , INTV+4* |
| XX | L1+12~, L1+13* |
| Y | CBEARRAY+2~, CBEARRAY+5*, CBEARRAY+6, CBEARRAY+7, CBEARRAY+8, CBEARRAY+9, CBEARRAY+11, CBEARRAY+12, S1+6, S1+7 , MCARE+3~, MCARE+6*, MCARE+7 |
| YY | L1+12~, L1+14* |
| Z | CBEARRAY+2~, CBEARRAY+9*, CBEARRAY+10, CBEARRAY+11, CBEARRAY+12, MCARE+3~ |
| >> ZZ | RACE+7*, RACE+8 |