©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
AGELUP5 ;IHS/ASDS/EFG - UPDATE ELIGIBILITY FROM FILE
Source file <AGELUP5.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS Patient Registration | 2 | (HEAD,PEND)^AGELUP6 $$S^AGVDF |
| Kernel | 1 | $$FMTE^XLFDT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| FP | ;find patient in rpms
|
|
| 1 | ;;MCR NAME
|
|
| MCRY | ;if railroad coverage
|
|
| MDISP | ;display medicare info
|
|
| R(AG) | ;process railroad retirement
|
|
| MCRN | ;no railroad coverage in rpms
|
|
| DFL | ;set descrepency flags
|
|
| 3 | ;;MCR NUMBER
|
|
| 2 | ;;MCR DOB
|
|
| 4 | ;;SFX
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNRRE - [#9000005] | R+7, R+11, MCRY+1, MCRY+2, MCRY+4, MCRY+5, MCRY+8, MCRY+9, MCRY+10 |
| ^AUTTRRP - [#9999999.33] | MCRY+6 |
| ^DPT("SSN" | FP+1 |
| ^TMP($J | R+3, R+4* |
| Name | Line Occurrences |
|---|---|
| DFL | MCRY+12, MCRN+3 |
| FP | R+1 |
| MCRN | R+11 |
| MCRY | R+7 |
| MDISP | R+12 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | MCRY+9 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| AG | R~ |
| AG("DFN" | R+1, R+2, R+3, R+4, R+7, R+11, FP+1*, MCRY+1, MCRY+2, MCRY+4 , MCRY+5, MCRY+8, MCRY+9, MCRY+10 |
| AG("DT" | DFL+11, DFL+12, DFL+13, DFL+16, MDISP+21, MDISP+22, MDISP+24 |
| AG("FDOB" | DFL+4 |
| AG("FNBR" | R+5, DFL+6 |
| AG("FNM" | DFL+2 |
| AG("FSFX" | DFL+8 |
| AG("FSSN" | FP+1 |
| AG1 | R+6!, MDISP+13*, MDISP+15*, MDISP+17, MDISP+19 |
| AG1( | MCRN+2*, MDISP+6, MDISP+7 |
| AG1("DT" | MCRY+10*, DFL+13, DFL+14, DFL+15, DFL+16, MDISP+15, MDISP+17, MDISP+19 |
| AG1(1 | MCRY+1*, MCRN+1* |
| AG1(2 | MCRY+3* |
| AG1(3 | MCRY+4* |
| AG1(4 | MCRY+6* |
| AG2 | R+6!, MDISP+20*, MDISP+21*, MDISP+22, MDISP+24 |
| AG2( | MDISP+10, MDISP+11 |
| AG2(1 | DFL+2*, DFL+3 |
| AG2(2 | DFL+4*, DFL+5 |
| AG2(3 | DFL+6*, DFL+7 |
| AG2(4 | DFL+8*, DFL+9 |
| >> AGACT | R+15* |
| >> AGAUTO | R+9, R+14 |
| >> AGCNT | MDISP+13*, MDISP+18*, MDISP+19, MDISP+20*, MDISP+23*, MDISP+24, MDISP+25, MDISP+26* |
| >> AGCOV | MCRY+9*, MCRY+10 |
| >> AGCVT | MDISP+16*, MDISP+17*, MDISP+19, MDISP+22*, MDISP+24 |
| >> AGDT | MCRY+9*, MCRY+10 |
| AGFL | MCRY+11!, MCRY+13, DFL+1! |
| AGFL( | MDISP+5, MDISP+8 |
| AGFL(1 | DFL+3* |
| AGFL(2 | DFL+5* |
| AGFL(3 | DFL+7* |
| AGFL(4 | DFL+9* |
| AGFL(5 | DFL+13*, DFL+16* |
| AGLINE | MDISP+14! |
| AGLINE( | MDISP+19*, MDISP+24*, MDISP+25*, MDISP+27, MDISP+28*, MDISP+30, MDISP+31, MDISP+33, MDISP+34, MDISP+36 , MDISP+37 |
| >> AGMCVT | MCRY+7* |
| >> AGMDOB | MCRY+2*, MCRY+3, DFL+5 |
| >> AGMEED | MCRY+7* |
| >> AGMESD | MCRY+7* |
| >> AGMNBR | MCRY+4*, DFL+7 |
| >> AGMNM | MCRY+1*, DFL+3 |
| >> AGMSFX | MCRY+5*, MCRY+6*, DFL+9 |
| AGSAME | R+6!, R+8, MCRY+13* |
| >> DA | MCRY+8*, MCRY+9, MCRY+10 |
| I | MCRN+2*, DFL+10~, DFL+11*, DFL+12, DFL+13, DFL+14*, DFL+15, DFL+16, MDISP+1*, MDISP+5 , MDISP+6, MDISP+7, MDISP+8, MDISP+10, MDISP+11, MDISP+26*, MDISP+27*, MDISP+28, MDISP+30, MDISP+31 , MDISP+33, MDISP+34, MDISP+36, MDISP+37 |
| IO(0 | R+16 |
| J | DFL+10~, DFL+12*, DFL+13, DFL+15*, DFL+16 |
| Name | Field # of Occurrence |
|---|---|
| $T(@I | MDISP+2 |