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 |