ABSPOSR7 ;IHS/OIT/SCR - POS Insurance Report ;
Source file <ABSPOSR7.m>
| Package | Total | Call Graph | 
|---|---|---|
| Kernel | 2 | ^%ZIS ^%ZISC | 
| VA Fileman | 2 | ^DIC ^DIR | 
| IHS Patient Registration | 1 | $$GETMCR^AGUTL | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| DISP(ABSPNAME) | ;display list of insurers | |
| OUTPUT(ABSPTYPE,ABSPELDT,ABSPDTL,ABSPNAME,ABSPCNT,ABSPTOT,ABSPSU) | ; | |
| EN | ||
| HDR(ABSPNAME,ABSPELDT,ABSPTYPE,ABSPPG) | ||
| INACT() | ;include inactive/deceased pts? | |
| INS(ABSPTYPE) | ; SELECT THE INSURER OR CHOOSE ALL INSURERS | |
| MEDICARE(ABSPLIST,ABSPELDT,ABSPDEAD,ABSPCNT,ABSPTOT,ABSPSU) | ; | |
| COUNTIT(ABSPLIST,ABSPTYPE,ABSPELDT,ABSPDEAD,ABSPCNT,ABSPTOT,ABSPSU) | ;do counts for selected insurers | |
| INSTYPE() | ||
| SUHDR(ABSPDTL,ABSPSU,ABSPSRV) | ||
| DETAILQ() | ; | |
| GETINS(ABSPINS,ABSPTYPE,ABSPLIST,ABSPNAME) | ;RETURN info on specified insurer or all of identified type | |
| PRIVATE(ABSPLIST,ABSPELDT,ABSPDEAD,ABSPCNT,ABSPTOT,ABSPSU) | ||
| DEVSEL | ; SELECT DEVICE | |
| ELIGDT() | ;get list for what date-default to today | |
| MEDICAID(ABSPLIST,ABSPELDT,ABSPDEAD,ABSPCNT,ABSPTOT,ABSPSU) | ; | |
| MESSAGE | ; | |
| CENTER(X) | ||
| DETAIL(ABSPNAME,ABSPSU,ABSPSRV,ABSPINS,ABSPELDT,ABSPTYPE,ABSPPG) | 
| 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 | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| FileNo | Call Tags | 
|---|---|
| ^ABSPEI - [#9002313.4] | Classic Fileman Calls | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^ABSPEI - [#9002313.4] | GETINS+5, GETINS+6 | 
| ^AUPN3PPH - [#9000003.1] | PRIVATE+19 | 
| ^AUPNMCD - [#9000004] | MEDICAID+4, MEDICAID+5, MEDICAID+8, MEDICAID+9, MEDICAID+11, MEDICAID+19, MEDICAID+23, MEDICAID+24, MEDICAID+38 | 
| ^AUPNMCR - [#9000003] | MEDICARE+4, MEDICARE+5, MEDICARE+9, MEDICARE+10, MEDICARE+12, MEDICARE+16, MEDICARE+17 | 
| ^AUPNPAT - [#9000001] | MEDICARE+20, MEDICARE+21, MEDICARE+31, PRIVATE+12, PRIVATE+13, PRIVATE+20, MEDICAID+28, MEDICAID+29, MEDICAID+39 | 
| ^AUPNPRVT - [#9000006] | PRIVATE+3, PRIVATE+5, PRIVATE+6, PRIVATE+8, PRIVATE+9, PRIVATE+19 | 
| ^AUTNINS - [#9999999.18] | GETINS+6, GETINS+7, GETINS+11, MEDICARE+27, PRIVATE+17, MEDICAID+10, MEDICAID+14, MEDICAID+15, MEDICAID+16, MEDICAID+35 | 
| ^AUTTLOC - [#9999999.06] | MEDICARE+23, MEDICARE+24, MEDICARE+25, PRIVATE+15, PRIVATE+16, MEDICAID+31, MEDICAID+32, MEDICAID+33 | 
| ^AUTTSU - [#9999999.22] | MEDICARE+23, PRIVATE+15, MEDICAID+31 | 
| ^DD("DD" | HDR+4, HDR+7, HDR+15, DETAIL+7, DETAIL+10 | 
| ^DIC(5 - [#5] | MEDICARE+26, PRIVATE+16, MEDICAID+34 | 
| ^DPT - [#2] | MEDICARE+6, MEDICARE+7, MEDICARE+15, MEDICAID+6, MEDICAID+7, MEDICAID+22, DETAIL+5 | 
| ^TMP($J | MEDICARE+28, MEDICARE+32*, PRIVATE+18, PRIVATE+21*, MEDICAID+37, MEDICAID+40*, OUTPUT+5, OUTPUT+32!, DETAIL+3, DETAIL+4 , DETAIL+6, DETAIL+9, DETAIL+12 | 
| Name | Line Occurrences | 
|---|---|
| $$DETAIL | OUTPUT+22 | 
| $$DETAILQ | EN+20 | 
| $$ELIGDT | EN+15 | 
| $$INACT | EN+17 | 
| $$INS | EN+10 | 
| $$INSTYPE | EN+6 | 
| CENTER | HDR+10, HDR+13, HDR+16 | 
| COUNTIT | EN+24 | 
| DEVSEL | EN+22, DEVSEL+10 | 
| DISP | EN+14 | 
| GETINS | EN+13 | 
| HDR | OUTPUT+13, OUTPUT+19, DETAIL+21 | 
| MEDICAID | COUNTIT+1 | 
| MEDICARE | COUNTIT+3 | 
| MESSAGE | EN+4 | 
| OUTPUT | EN+25 | 
| PRIVATE | COUNTIT+2 | 
| SUHDR | OUTPUT+19, DETAIL+21 | 
| Name | Field # of Occurrence | 
|---|---|
| ^( | MEDICARE+7, MEDICAID+7 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| ABSPALL | INACT+2~, INACT+8*, INACT+9*, INACT+10 | 
| ABSPCNT | EN+2~, EN+24, EN+25, COUNTIT~, COUNTIT+1, COUNTIT+2, COUNTIT+3, MEDICARE~, PRIVATE~, MEDICAID~ , OUTPUT~ | 
| ABSPCNT( | MEDICARE+33*, PRIVATE+22*, MEDICAID+41*, OUTPUT+9*, OUTPUT+14, OUTPUT+16, OUTPUT+18, OUTPUT+21 | 
| ABSPCOV | MEDICARE+1~, MEDICARE+10*, MEDICARE+11, MEDICAID+1~ | 
| ABSPDEAD | EN+1~, EN+17*, EN+18, EN+24, COUNTIT~, COUNTIT+1, COUNTIT+2, COUNTIT+3, MEDICARE~, MEDICARE+15 , MEDICARE+22, PRIVATE~, PRIVATE+14, MEDICAID~, MEDICAID+22, MEDICAID+30 | 
| ABSPDPT | MEDICARE+2~, MEDICARE+5*, MEDICARE+6, MEDICARE+7, MEDICARE+28, MEDICARE+32, MEDICAID+2~, MEDICAID+5*, MEDICAID+6, MEDICAID+7 , MEDICAID+37, MEDICAID+40 | 
| ABSPDTL | EN+1~, EN+5*, EN+20*, EN+21, EN+25, DETAILQ+2~, DETAILQ+8*, DETAILQ+9*, DETAILQ+10, OUTPUT~ , OUTPUT+19, OUTPUT+22, SUHDR~, SUHDR+3 | 
| ABSPEDT | MEDICARE+1~, MEDICARE+17*, MEDICARE+18, MEDICARE+32, PRIVATE+1~, PRIVATE+9*, PRIVATE+10, PRIVATE+21, MEDICAID+1~, MEDICAID+24* , MEDICAID+26, MEDICAID+40 | 
| ABSPEIEN | MEDICARE+1~, MEDICARE+8*, MEDICARE+9*, MEDICARE+10, MEDICARE+12, MEDICARE+16, MEDICARE+17, MEDICAID+1~, MEDICAID+18*, MEDICAID+19* , MEDICAID+23, MEDICAID+24, OUTPUT+2~ | 
| ABSPELDT | EN+1~, EN+15*, EN+16, EN+24, EN+25, ELIGDT+1~, ELIGDT+10*, ELIGDT+12, COUNTIT~, COUNTIT+1 , COUNTIT+2, COUNTIT+3, MEDICARE~, MEDICARE+7, MEDICARE+18, MEDICARE+30, PRIVATE~, PRIVATE+10, MEDICAID~, MEDICAID+7 , MEDICAID+26, OUTPUT~, OUTPUT+13, OUTPUT+19, OUTPUT+22, HDR~, HDR+7, HDR+15, DETAIL~, DETAIL+21 | 
| ABSPEN | MEDICARE+1~, MEDICARE+3*, MEDICARE+4*, MEDICARE+5, MEDICARE+9, MEDICARE+10, MEDICARE+12, MEDICARE+15, MEDICARE+16, MEDICARE+17 , MEDICARE+20, MEDICARE+21, MEDICARE+30, MEDICARE+31, PRIVATE+1~, PRIVATE+4*, PRIVATE+5*, PRIVATE+6, PRIVATE+8, PRIVATE+9 , PRIVATE+19, MEDICAID+1~, MEDICAID+3*, MEDICAID+4*, MEDICAID+5, MEDICAID+8, MEDICAID+9, MEDICAID+11, MEDICAID+19, MEDICAID+22 , MEDICAID+23, MEDICAID+24, MEDICAID+28, MEDICAID+29, MEDICAID+38, MEDICAID+39, OUTPUT+2~ | 
| >> ABSPFND | MEDICAID+13*, MEDICAID+14, MEDICAID+17* | 
| ABSPHRN | MEDICARE+1~, MEDICARE+19*, MEDICARE+20*, MEDICARE+21, MEDICARE+22, MEDICARE+23, MEDICARE+24, MEDICARE+25, MEDICARE+31, PRIVATE+1~ , PRIVATE+11*, PRIVATE+12*, PRIVATE+13, PRIVATE+15, PRIVATE+16, PRIVATE+20, MEDICAID+1~, MEDICAID+27*, MEDICAID+28*, MEDICAID+29 , MEDICAID+30, MEDICAID+31, MEDICAID+32, MEDICAID+33, MEDICAID+39 | 
| ABSPHRNN | MEDICARE+1~, MEDICARE+31*, MEDICARE+32, PRIVATE+1~, PRIVATE+20*, PRIVATE+21, MEDICAID+1~, MEDICAID+39*, MEDICAID+40 | 
| ABSPHRNS | MEDICARE+1~, MEDICARE+21*, PRIVATE+1~, PRIVATE+13*, PRIVATE+14, MEDICAID+1~, MEDICAID+29* | 
| ABSPINS | EN+1~, EN+10*, EN+11, EN+13, EN+19, EN+20, INS+1~, INS+8*, INS+9*, INS+10 , GETINS~, GETINS+4, GETINS+10, GETINS+11, GETINS+12, GETINS+13, DETAIL~, DETAIL+3, DETAIL+4, DETAIL+6 , DETAIL+9, DETAIL+12 | 
| ABSPINSN | MEDICAID+1~ | 
| >> ABSPINSP | MEDICAID+9*, MEDICAID+10, MEDICAID+14, MEDICAID+15, MEDICAID+16 | 
| ABSPIT | OUTPUT+2~ | 
| ABSPLINE | EN+1~, EN+3*, SUHDR+5 | 
| ABSPLIST | EN+1~, EN+13, EN+24, GETINS~, COUNTIT~, COUNTIT+1, COUNTIT+2, COUNTIT+3, MEDICARE~, PRIVATE~ , MEDICAID~ | 
| ABSPLIST( | GETINS+8*, GETINS+12*, MEDICARE+14, PRIVATE+7, MEDICAID+21 | 
| >> ABSPMFI | MEDICAID+12*, MEDICAID+14*, MEDICAID+15, MEDICAID+16 | 
| ABSPNAM | GETINS+2~, GETINS+7*, GETINS+8, GETINS+9, GETINS+11*, GETINS+12, GETINS+13, DISP+1~, DISP+3*, DISP+5* , MEDICARE+1~, MEDICARE+27*, MEDICARE+33, PRIVATE+1~, PRIVATE+17*, PRIVATE+22, MEDICAID+1~, MEDICAID+35*, MEDICAID+41, OUTPUT+2~ , OUTPUT+6*, OUTPUT+7*, OUTPUT+8, OUTPUT+9, OUTPUT+15*, OUTPUT+16*, OUTPUT+18, OUTPUT+20, OUTPUT+21, HDR+1~ , HDR+8*, HDR+9*, HDR+11, HDR+13 | 
| ABSPNAME | EN+2~, EN+13, EN+14, EN+25, GETINS~, DISP~, OUTPUT~, OUTPUT+13, OUTPUT+19, OUTPUT+22 , HDR~, DETAIL~, DETAIL+21 | 
| ABSPNAME( | GETINS+9*, GETINS+13*, DISP+5, OUTPUT+7, OUTPUT+8, HDR+9, HDR+11 | 
| ABSPNAME("" | DISP+4 | 
| ABSPNS | GETINS+2~, GETINS+3*, GETINS+5*, GETINS+6, GETINS+7, GETINS+8, GETINS+9, PRIVATE+1~, PRIVATE+6*, PRIVATE+7 , PRIVATE+17, PRIVATE+18, PRIVATE+21, PRIVATE+22, OUTPUT+2~, OUTPUT+8*, OUTPUT+9, OUTPUT+17*, OUTPUT+18*, OUTPUT+21 , OUTPUT+22 | 
| ABSPPG | OUTPUT+2~, OUTPUT+12*, OUTPUT+13, OUTPUT+19, OUTPUT+22, HDR~, HDR+3*, HDR+5, DETAIL~, DETAIL+21 | 
| ABSPPIEN | MEDICARE+1~, MEDICARE+12*, MEDICARE+13, MEDICARE+14, MEDICARE+27, MEDICARE+28, MEDICARE+32, MEDICARE+33, MEDICAID+2~, MEDICAID+16* , MEDICAID+20, MEDICAID+21, MEDICAID+35, MEDICAID+37, MEDICAID+40, MEDICAID+41, OUTPUT+2~ | 
| ABSPPN | MEDICARE+2~, MEDICARE+30*, MEDICARE+32, PRIVATE+1~, PRIVATE+19*, PRIVATE+21, MEDICAID+1~, MEDICAID+2~, MEDICAID+38*, MEDICAID+40 | 
| ABSPPT | DETAIL+1~, DETAIL+2*, DETAIL+3*, DETAIL+4, DETAIL+5, DETAIL+6, DETAIL+9, DETAIL+12 | 
| ABSPQUIT | MEDICARE+1~, MEDICARE+3*, MEDICARE+13*, MEDICARE+14*, MEDICARE+15*, MEDICARE+22*, MEDICAID+1~, MEDICAID+3*, MEDICAID+20*, MEDICAID+21* , MEDICAID+22*, MEDICAID+30*, OUTPUT+2~, OUTPUT+3*, OUTPUT+18, OUTPUT+22*, OUTPUT+24, OUTPUT+27, OUTPUT+31*, DETAIL+1~ , DETAIL+2*, DETAIL+3, DETAIL+14, DETAIL+19*, DETAIL+20, DETAIL+22 | 
| ABSPSDT | MEDICARE+1~, MEDICARE+16*, MEDICARE+18, MEDICARE+32, PRIVATE+1~, PRIVATE+8*, PRIVATE+10, PRIVATE+21, MEDICAID+1~, MEDICAID+23* , MEDICAID+25, MEDICAID+26, MEDICAID+40 | 
| ABSPSRV | SUHDR~, SUHDR+1, DETAIL~, DETAIL+3, DETAIL+4, DETAIL+6, DETAIL+9, DETAIL+12, DETAIL+21 | 
| ABSPSTOP | DEVSEL+1~, DEVSEL+2*, DEVSEL+7*, DEVSEL+8 | 
| >> ABSPSTP | MEDICAID+11*, MEDICAID+15 | 
| ABSPSU | EN+2~, EN+24, EN+25, COUNTIT~, COUNTIT+1, COUNTIT+2, COUNTIT+3, MEDICARE~, MEDICARE+23*, MEDICARE+26 , MEDICARE+28, MEDICARE+32, MEDICARE+33, MEDICARE+34, PRIVATE~, PRIVATE+15*, PRIVATE+16, PRIVATE+18, PRIVATE+21, PRIVATE+22 , PRIVATE+23, MEDICAID~, MEDICAID+31*, MEDICAID+34, MEDICAID+37, MEDICAID+40, MEDICAID+41, MEDICAID+42, OUTPUT~, OUTPUT+19 , OUTPUT+22, SUHDR~, DETAIL~, DETAIL+21 | 
| ABSPSU( | MEDICARE+26*, PRIVATE+16*, MEDICAID+34*, SUHDR+1 | 
| ABSPSU2 | OUTPUT+2~, OUTPUT+10*, OUTPUT+19* | 
| ABSPSUC | MEDICARE+2~, MEDICARE+24*, MEDICARE+26, MEDICAID+2~, MEDICAID+32*, MEDICAID+34, OUTPUT+2~ | 
| ABSPSUS | MEDICARE+2~, MEDICARE+25*, MEDICARE+26, MEDICAID+2~, MEDICAID+33*, MEDICAID+34, OUTPUT+2~ | 
| ABSPSVC | OUTPUT+2~, OUTPUT+4*, OUTPUT+5*, OUTPUT+9, OUTPUT+11*, OUTPUT+14*, OUTPUT+16, OUTPUT+18, OUTPUT+19, OUTPUT+21 , OUTPUT+22, OUTPUT+25, OUTPUT+26 | 
| ABSPTIEN | PRIVATE+1~, PRIVATE+2*, PRIVATE+3*, PRIVATE+5, PRIVATE+6, PRIVATE+8, PRIVATE+9, PRIVATE+12, PRIVATE+13, PRIVATE+18 , PRIVATE+19, PRIVATE+20, PRIVATE+21 | 
| ABSPTOT | EN+2~, EN+24, EN+25, COUNTIT~, COUNTIT+1, COUNTIT+2, COUNTIT+3, MEDICARE~, PRIVATE~, MEDICAID~ , OUTPUT~ | 
| ABSPTOT( | MEDICARE+34*, PRIVATE+23*, MEDICAID+42*, OUTPUT+26 | 
| ABSPTOT("TOTAL" | MEDICARE+35*, PRIVATE+24*, MEDICAID+43*, OUTPUT+29 | 
| ABSPTYPE | EN+1~, EN+6*, EN+7, EN+8, EN+9*, EN+12, EN+24, EN+25, INS~, INS+5 , GETINS~, GETINS+6, COUNTIT~, COUNTIT+1, COUNTIT+2, COUNTIT+3, OUTPUT~, OUTPUT+13, OUTPUT+19, OUTPUT+22 , HDR~, HDR+10, DETAIL~, DETAIL+21 | 
| ABSPTYPI | EN+1~, EN+8*, EN+10, EN+13 | 
| >> CENTER | CENTER+1*, CENTER+2 | 
| DIC | INS+1~, INS+4*, INS+6!, ELIGDT+3!, INACT+2~, DETAILQ+2~ | 
| DIC("A" | INS+3* | 
| DIC("S" | INS+5* | 
| DIC(0 | INS+2* | 
| DIE | ELIGDT+3!, INACT+2~, DETAILQ+2~ | 
| DIR | ELIGDT+3!, ELIGDT+8!, INACT+2~, DETAILQ+2~, OUTPUT+31!, DETAIL+16! | 
| DIR("A" | INSTYPE+4*, ELIGDT+5*, INACT+4*, DETAILQ+4* | 
| DIR("B" | INSTYPE+3*, ELIGDT+6*, INACT+5*, DETAILQ+5* | 
| DIR(0 | INSTYPE+2*, ELIGDT+4*, INACT+3*, DETAILQ+3*, OUTPUT+31*, DETAIL+17* | 
| >> DIROUT | INSTYPE+6, INS+7, ELIGDT+9, INACT+7, DETAILQ+7 | 
| >> DIRUT | INSTYPE+6, INS+7, ELIGDT+9, INACT+7, DETAILQ+7 | 
| DIX | INSTYPE+1~ | 
| DR | ELIGDT+3!, INACT+2~, DETAILQ+2~ | 
| DT | HDR+4 | 
| >> DTOUT | INSTYPE+6, INS+7, ELIGDT+9, INACT+7, DETAILQ+7 | 
| >> DUOUT | INSTYPE+6, INS+7, ELIGDT+9, INACT+7, DETAILQ+7, DEVSEL+5 | 
| IO("S" | OUTPUT+31, DETAIL+15 | 
| IOF | HDR+2 | 
| IOM | CENTER+1 | 
| IOSL | DETAIL+13 | 
| IOST | OUTPUT+31, DETAIL+13 | 
| >> POP | DEVSEL+4, DEVSEL+9 | 
| U | GETINS+6, GETINS+7, GETINS+11, MEDICARE+5, MEDICARE+7, MEDICARE+10, MEDICARE+12, MEDICARE+15, MEDICARE+16, MEDICARE+17 , MEDICARE+21, MEDICARE+23, MEDICARE+24, MEDICARE+25, MEDICARE+26, MEDICARE+27, MEDICARE+31, MEDICARE+32, PRIVATE+6, PRIVATE+8 , PRIVATE+9, PRIVATE+13, PRIVATE+15, PRIVATE+16, PRIVATE+17, PRIVATE+19, PRIVATE+20, PRIVATE+21, MEDICAID+5, MEDICAID+7 , MEDICAID+9, MEDICAID+10, MEDICAID+11, MEDICAID+15, MEDICAID+16, MEDICAID+22, MEDICAID+23, MEDICAID+24, MEDICAID+29, MEDICAID+31 , MEDICAID+32, MEDICAID+33, MEDICAID+34, MEDICAID+35, MEDICAID+38, MEDICAID+39, MEDICAID+40, OUTPUT+31, DETAIL+4, DETAIL+5 , DETAIL+6, DETAIL+9, DETAIL+12, DETAIL+19 | 
| X | INSTYPE+1~, INSTYPE+7, INS+1~, ELIGDT+3!, INACT+2~, DETAILQ+2~, OUTPUT+31, CENTER~, CENTER+2, DETAIL+19 | 
| Y | INSTYPE+1~, INS+1~, INS+8, INS+9, ELIGDT+3!, ELIGDT+10, INACT+2~, INACT+8, DETAILQ+2~, DETAILQ+8 , HDR+1~, HDR+4*, HDR+5, HDR+7*, HDR+15*, HDR+16, DETAIL+1~, DETAIL+6*, DETAIL+8, DETAIL+9* , DETAIL+11 | 
| Y(0 | INSTYPE+7, ELIGDT+11 |