©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
ABSPOSCG ; IHS/SD/RLT - Set up ABSP() - CONT; [ 05/22/2006 9:00 AM ]
Source file <ABSPOSCG.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS Patient Registration | 1 | ($$GETMCR,$$GETRRE)^AGUTL |
| Kernel | 1 | $$NPI^XUSNPI |
| VA Fileman | 1 | $$GET1^DIQ |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| MDFLG() | ;EP ^ABSPOSCC
|
|
| GETMDPOL() | ;EP Called from ^ABSPOSCC
; /IHS/OIT/RAM ; 15 DEC 2017 ; Total rewrite to account for Medicare Bendficiary Identifier, or MBI. ; /IHS/OIT/RAM ; 21 MAR 18 ; update to # logic - scan for Medicare Part D first, return that from the original area if it exists. ; Does the individual have a new MBI? If so, get it and return.... Do we care? This isn't date specific, so everything is 'Today'... just get the info... |
|
| PHARNPI(X,Y) | ;EP
|
|
| RRNAME() | ;EP ^ABSPOSCC
|
|
| RRDFLG() | ;EP ^ABSPOSCC
|
|
| GETRRD() | ;EP ^ABSPOSCC
|
|
| OLDGETMDPOL() | ;EP ^ABSPOSCC
|
|
| RRDOB() | ;EP ^ABSPOSCC
|
|
| GETRRDPL() | ;EP ^ABSPOSCC
|
|
| GETMDIEN() | ;EP ^ABSPOSCC
|
| FileNo | Call Tags |
|---|---|
| ^ABSPEI - [#9002313.4] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ABSP(9002313.56 - [#9002313.56] | PHARNPI+7 |
| ^ABSP(9002313.99 - [#9002313.99] | RRDFLG+3, MDFLG+3 |
| ^ABSPEI - [#9002313.4] | RRDFLG+6, MDFLG+6 |
| ^ABSPF(9002313.92 - [#9002313.92] | RRDFLG+7, MDFLG+7 |
| ^AUPNMCR - [#9000003] | OLDGETMDPOL+3, OLDGETMDPOL+6, GETMDPOL+6, GETMDPOL+14 |
| ^AUPNRRE - [#9000005] | GETRRDPL+5, GETRRDPL+13, RRNAME+2, RRNAME+4, RRDOB+2, RRDOB+5 |
| ^PS(59 - [#59] | PHARNPI+9 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DOB | RRDOB+1~, RRDOB+2*, RRDOB+6*, RRDOB+7 |
| FMTIEN | RRDFLG+1~, RRDFLG+6*, RRDFLG+7, MDFLG+1~, MDFLG+6*, MDFLG+7 |
| >> INSIEN | RRDFLG+4, RRDFLG+6, MDFLG+4, MDFLG+6 |
| INST | PHARNPI+6~, PHARNPI+9*, PHARNPI+10, PHARNPI+11 |
| MDFLG | OLDGETMDPOL+6, GETMDPOL+6, MDFLG+1~, MDFLG+4*, MDFLG+7*, MDFLG+8 |
| >> MDIEN | OLDGETMDPOL+6, GETMDPOL+6 |
| MDPOL | OLDGETMDPOL+2~, OLDGETMDPOL+4*, OLDGETMDPOL+6*, OLDGETMDPOL+7, GETMDPOL+4~*, GETMDPOL+6*, GETMDPOL+8 |
| NAME | RRNAME+1~, RRNAME+2*, RRNAME+5*, RRNAME+6 |
| NPI | PHARNPI+6~, PHARNPI+11*, PHARNPI+12 |
| OPSITE | PHARNPI+6~, PHARNPI+7*, PHARNPI+8, PHARNPI+9 |
| >> PINSDA | GETRRDPL+5, GETRRDPL+9, GETRRDPL+13, RRNAME+2, RRNAME+4, RRDOB+2, RRDOB+5, OLDGETMDPOL+3, OLDGETMDPOL+6, GETMDPOL+6 , GETMDPOL+10, GETMDPOL+14 |
| POL | GETRRDPL+1~*, GETRRDPL+9*, GETRRDPL+11, GETRRDPL+13*, GETRRDPL+15, OLDGETMDPOL+2~, OLDGETMDPOL+3*, OLDGETMDPOL+7*, OLDGETMDPOL+8, GETMDPOL+4~* , GETMDPOL+10*, GETMDPOL+12, GETMDPOL+14*, GETMDPOL+16 |
| RRDDOB | RRDOB+1~, RRDOB+3*, RRDOB+5*, RRDOB+6 |
| RRDFLG | GETRRDPL+5, RRNAME+4, RRDOB+5, RRDFLG+1~, RRDFLG+4*, RRDFLG+7*, RRDFLG+8 |
| >> RRDIEN | GETRRDPL+5, RRNAME+4, RRDOB+5 |
| RRDNAME | RRNAME+1~, RRNAME+3*, RRNAME+4*, RRNAME+5 |
| RRDPOL | GETRRDPL+1~*, GETRRDPL+5*, GETRRDPL+7 |
| U | GETRRDPL+5, GETRRDPL+13, RRNAME+2, RRNAME+4, RRDOB+2, RRDOB+5, RRDFLG+6, RRDFLG+7, OLDGETMDPOL+3, OLDGETMDPOL+6 , GETMDPOL+6, GETMDPOL+14, MDFLG+6, MDFLG+7, PHARNPI+7, PHARNPI+9, PHARNPI+11 |
| X | PHARNPI~, PHARNPI+4, PHARNPI+7 |
| Y | PHARNPI~, PHARNPI+5, PHARNPI+7 |