ABMDFUTL ; IHS/SD/DMJ - Export Forms Utility ;
Source file <ABMDFUTL.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
PRVLKUP(ABMX,ABMY) | ;EP
|
|
K24() | ;EP - box 24k hcfa form
|
|
WTOT | ;EP for writing Summary totals
|
|
YTOT | ;EP for updating ABMY("TOT") variable
; - input variables: ABM("YTOT") = $ amount of each bill ; - output variable: ABMY("TOT") = # bills ^ $ amount ^ # insurers |
|
GETPRV() | ;EP - get attending or rendering provider for line
; item if not one on indiv. page |
|
K24N(X) | ;EP - get payer assigned number (x=provider file 200 ien)
|
|
TXST | ;EP for obtaining or adding 3P TX STATUS entry
; - input variables: ABMP("EXP") - export form ; ABMY("INS") - insurer (optional) ; ABMY("TYP") - insurer type (optional) ; - output variable: ABMP("XMIT") - export batch |
|
F54() | ;EP - flag 54 HCFA BOX 33
|
|
TXUPDT | ;EP for updating the TXST file
|
|
NPI | ;
|
|
PREV | ;EP for obtaining previous payment info
|
Name | Line Occurrences |
---|---|
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 |
|
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | Classic Fileman Calls |
^ABMDTXST - [#9002274.6] | Classic Fileman Calls |
^AUTNINS - [#9999999.18] | GET1^DIQ |
^AUTTINTY - [#9999999.181] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ABMDBILL( | YTOT+6, PREV+12, PREV+14, PREV+15, PREV+17, PREV+18, PREV+24, PREV+25, PREV+27, PREV+29 , PREV+30, PREV+31, PREV+32, PREV+33, PREV+35, PREV+36 |
^ABMDTXST - [#9002274.6] | TXST+8, TXST+9, TXST+10, TXST+11, TXUPDT+3 |
^ABMNINS( | K24+5, K24N+5, K24N+10, K24N+11, K24N+15 |
^ABMREFID - [#9002274.11] | K24N+10, K24N+15 |
^AUTNINS - [#9999999.18] | K24N+5, K24N+6 |
^VA(200 - [#200] | K24N+4 |
Name | Line Occurrences |
---|---|
NPI | NPI+16 |
Name | Field # of Occurrence |
---|---|
^(0 | TXST+9, YTOT+6, TXUPDT+3, PREV+25 |
^(1 | TXUPDT+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ABM | PREV+7~, PREV+15*, PREV+16, PREV+17, PREV+18, PREV+23, PREV+24, PREV+25, PREV+27, PREV+29 , PREV+30, PREV+31, PREV+32, PREV+33, PREV+36 |
ABM( | PREV+16, PREV+23* |
ABM("A" | PREV+14*, PREV+15 |
ABM("BIL" | PREV+13* |
ABM("CLM" | PREV+12*, PREV+14, PREV+15 |
ABM("J" | PREV+24*, PREV+25, PREV+27, PREV+29, PREV+30, PREV+31, PREV+32, PREV+33 |
ABM("PROVIDER" | PRVLKUP+10*, PRVLKUP+15, PRVLKUP+17, PRVLKUP+18*, PRVLKUP+19*, NPI+1!, NPI+11, NPI+15*, NPI+20*, NPI+21 |
ABM("W" | PREV+10*, PREV+25*, PREV+36 |
ABM("YTOT" | YTOT+5 |
ABM(0 | TXUPDT+3*, TXUPDT+5 |
ABM(1 | TXUPDT+3*, TXUPDT+5 |
>> ABMAFLG | PREV+11 |
>> ABMDUZ2 | K24N+9*, K24N+10, K24N+14*, K24N+15 |
>> ABMIDCD | K24N+17*, K24N+19 |
>> ABMMFLG | PREV+11 |
>> ABMNFLG | PRVLKUP+20*, NPI+1, NPI+15* |
>> ABMP | PREV+8* |
>> ABMP("BDFN" | YTOT+6, PREV+12, PREV+13, PREV+35, K24N+2 |
>> ABMP("BILL" | PREV+6!, PREV+35* |
>> ABMP("CDFN" | PREV+12 |
>> ABMP("COI" | PREV+5*, PREV+31* |
>> ABMP("DED" | PREV+5*, PREV+32* |
>> ABMP("EXP" | TXST+9, TXST+14, PREV+11, K24+5, K24+6, K24N+8, K24N+13 |
>> ABMP("GL" | GETPRV+2, GETPRV+5, GETPRV+8, GETPRV+9 |
>> ABMP("GRP" | PREV+5*, PREV+27* |
>> ABMP("INS" | PREV+21, K24+5, K24N+3, K24N+4, K24N+5, K24N+6, K24N+10, K24N+11, K24N+15, F54+3 |
>> ABMP("ITYPE" | K24N+10, K24N+15, K24N+16, F54+1 |
>> ABMP("LDFN" | K24N+5, K24N+11 |
>> ABMP("NONC" | PREV+5*, PREV+29* |
>> ABMP("PD" | PREV+9*, PREV+25* |
>> ABMP("PDFN" | PREV+17 |
>> ABMP("PENS" | PREV+5*, PREV+30* |
>> ABMP("REF" | PREV+5*, PREV+33* |
>> ABMP("VTYP" | K24+5, K24N+5, K24N+10, K24N+15, F54+2 |
>> ABMP("WO" | PREV+9*, PREV+36* |
>> ABMP("XMIT" | TXST+7*, TXST+8, TXST+10*, TXST+11*, TXST+12, TXST+15*, WTOT+3, TXUPDT+1, TXUPDT+2, TXUPDT+3 |
ABMPM | PREV+8! |
>> ABMPQ | K24N+10*, K24N+15*, K24N+19*, K24N+20* |
>> ABMPRV | GETPRV+3*, GETPRV+6*, GETPRV+8*, GETPRV+9 |
>> ABMPRVT | GETPRV+5*, GETPRV+6, GETPRV+8*, GETPRV+9*, GETPRV+10*, GETPRV+11 |
>> ABMR("SBR" | PREV+21 |
ABMX | TXST+6~, TXST+7*, TXST+8*, TXST+9, TXST+10, TXST+11, PRVLKUP~, PRVLKUP+6, NPI+11 |
ABMY | PRVLKUP~, NPI+11 |
ABMY("INS" | TXST+11, TXST+14 |
ABMY("TINS" | YTOT+6* |
ABMY("TOT" | YTOT+4*, YTOT+5*, YTOT+6*, WTOT+4*, WTOT+6, WTOT+7, WTOT+8, TXUPDT+5 |
ABMY("TYP" | TXST+10, TXST+14 |
DA | TXUPDT+2*, PRVLKUP+3~, PRVLKUP+11~, NPI+6~ |
DD | TXST+15! |
DIC | TXST+13*, PRVLKUP+3~, PRVLKUP+11~, PRVLKUP+12*, NPI+6~ |
DIC("DR" | TXST+14* |
DIC("S" | PRVLKUP+14* |
DIC(0 | TXST+13*, PRVLKUP+13* |
DIE | TXUPDT+4*, PRVLKUP+3~, PRVLKUP+11~, NPI+6~ |
DINUM | TXST+15! |
DIR | WTOT+9!, PRVLKUP+3~, PRVLKUP+11~, NPI+6~ |
DIR("A" | PRVLKUP+5*, NPI+10* |
DIR("B" | PRVLKUP+6*, NPI+11* |
DIR(0 | WTOT+9*, PRVLKUP+4*, NPI+8* |
>> DIROUT | PRVLKUP+8 |
DO | TXST+15! |
DR | TXUPDT+5*, PRVLKUP+3~, PRVLKUP+11~, NPI+6~ |
DT | TXST+8, TXST+13 |
>> DTOUT | PRVLKUP+8 |
>> DUOUT | PRVLKUP+8 |
DUZ | TXST+14 |
DUZ(2 | TXST+8, TXST+9, TXST+10, TXST+11, YTOT+6, TXUPDT+3, PREV+12, PREV+14, PREV+15, PREV+17 , PREV+18, PREV+24, PREV+25, PREV+27, PREV+29, PREV+30, PREV+31, PREV+32, PREV+33, PREV+35 , PREV+36, K24+5, K24N+9, K24N+14 |
U | TXST+9, TXST+10, TXST+11, TXST+14, YTOT+4, YTOT+5, YTOT+6, WTOT+6, WTOT+7, WTOT+8 , TXUPDT+5, PREV+12, PREV+17, PREV+25, PREV+27, PREV+29, PREV+30, PREV+31, PREV+32, PREV+33 , PREV+35, PREV+36, K24N+5, K24N+6, K24N+10, K24N+11, K24N+15, PRVLKUP+18, PRVLKUP+19, NPI+20 |
X | TXST+13*, K24N~, K24N+4, K24N+5, K24N+11, PRVLKUP+3~, PRVLKUP+11~, PRVLKUP+15*, NPI+6~ |
Y | TXST+15, K24N+1~, K24N+2*, K24N+3*, K24N+4*, K24N+5*, K24N+11*, K24N+22, PRVLKUP+3~, PRVLKUP+9 , PRVLKUP+10, PRVLKUP+11~, PRVLKUP+17, PRVLKUP+18, PRVLKUP+19, NPI+3, NPI+6~, NPI+15, NPI+16, NPI+18! , NPI+20 |
>> ZTQUEUED | WTOT+1 |