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 |