ABMPTSMT ; IHS/SD/SDR - Non-ben patient statement ;
Source file <ABMPTSMT.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
MARG | ;Set left and top margins
|
|
GUARCHK | ; set vars for header
|
|
HDR | ;
|
|
WLINE | ;write service line
|
|
CENTER(X) | ;EP
|
|
WCOVRG | ; coverage info from bill
|
|
XIT | ;
|
|
SLINES | ;service lines
|
|
PRTFILE | ; EP - save message, date, and who printed statement
|
|
COVRG | ;EP
|
|
TOTAL | ;total
|
Name | Field # of Occurrence |
---|---|
NOW^%DTC | PRTFILE+6 |
$$CPT^ABMCVAPI | SLINES+30, SLINES+32 |
LOC^ABMDE1X1 | WCOVRG+27 |
$$SDT^ABMDUTL | HDR+17, HDR+33, WCOVRG+13, WCOVRG+22 |
$$SDTO^ABMDUTL | SLINES+3, SLINES+22, SLINES+26 |
^ABMEHGRV | SLINES+1 |
$$FMT^ABMERUTL | HDR+34, WLINE+2, WLINE+3, WLINE+4, WLINE+5 |
$$EN^ABMVDF | MARG+2 |
^DIC | PRTFILE+9 |
$$GET1^DIQ | MARG+9, COVRG+10 |
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 |
|
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 |
|
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 |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^AUTNINS - [#9999999.18] | GET1^DIQ |
^AUTTINTY - [#9999999.181] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ABMDBILL( | MARG+4, MARG+5, MARG+6, MARG+7, MARG+8, MARG+10, MARG+11, MARG+12, HDR+24, HDR+32 , HDR+33, HDR+39, HDR+40, HDR+41, SLINES+3, SLINES+22, SLINES+26, WCOVRG+22, GUARCHK+5, GUARCHK+6 , COVRG+4, COVRG+6, COVRG+12 |
^ABMDPARM( | HDR+6, WCOVRG+22 |
^ABMDTXST - [#9002274.6] | WCOVRG+22 |
^ABMDVTYP - [#9002274.8] | HDR+38 |
^ABMNINS( | SLINES+5 |
^AUPN3PPH - [#9000003.1] | COVRG+33 |
^AUPNGUAR - [#9000043] | GUARCHK+4, GUARCHK+8, GUARCHK+10, GUARCHK+11, GUARCHK+12, GUARCHK+15, GUARCHK+36 |
^AUPNMCD - [#9000004] | COVRG+26 |
^AUPNMCR - [#9000003] | COVRG+16 |
^AUPNPAT - [#9000001] | HDR+21, COVRG+14 |
^AUPNPRVT - [#9000006] | COVRG+30 |
^AUPNRRE - [#9000005] | COVRG+20 |
^AUTNEMPL - [#9999999.75] | GUARCHK+30, GUARCHK+31, GUARCHK+32, GUARCHK+33, GUARCHK+34 |
^AUTNINS - [#9999999.18] | WCOVRG+10, WCOVRG+11, GUARCHK+24, GUARCHK+25, GUARCHK+26, GUARCHK+27, GUARCHK+28, COVRG+10, COVRG+12, COVRG+13 |
^AUTTADA - [#9999999.31] | SLINES+33 |
^AUTTADA("B" | SLINES+33 |
^AUTTLOC - [#9999999.06] | HDR+3, HDR+4, HDR+10 |
^AUTTPIC - [#9999999.65] | WCOVRG+12 |
^AUTTREVN - [#9999999.72] | SLINES+5, SLINES+34 |
^DD(9002274.4 | PRTFILE+5 |
^DIC(40.7 - [#40.7] | MARG+10 |
^DIC(5 - [#5] | GUARCHK+21, GUARCHK+27, GUARCHK+33, GUARCHK+40 |
^DPT - [#2] | HDR+32, GUARCHK+18, GUARCHK+19, GUARCHK+20, GUARCHK+21, GUARCHK+22, GUARCHK+37, GUARCHK+38, GUARCHK+39, GUARCHK+40 , GUARCHK+41 |
^ICPT("B" | SLINES+32 |
^VA(200 - [#200] | HDR+42 |
Name | Line Occurrences |
---|---|
CENTER | HDR+4, HDR+6, HDR+7, HDR+10, HDR+12 |
COVRG | WCOVRG+1 |
GUARCHK | HDR+16 |
HDR | MARG+15, WLINE+18 |
PRTFILE | WCOVRG+35 |
SLINES | MARG+16 |
TOTAL | SLINES+11, SLINES+40 |
WCOVRG | WLINE+16 |
WLINE | SLINES+10, SLINES+39 |
XIT | MARG+17 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> % | PRTFILE+7 |
>> ABM("I" | MARG+3* |
>> ABM("LM" | MARG+1* |
>> ABM("LN" | MARG+1* |
>> ABM("TM" | MARG+1*, MARG+3 |
>> ABMABEN | COVRG+12* |
>> ABMADIEN | HDR+3*, HDR+4 |
>> ABMAPRV | HDR+39*, HDR+40*, HDR+41*, HDR+42 |
ABMBEN | COVRG+2!, COVRG+13*, COVRG+14* |
>> ABMBILLD | COVRG+3*, COVRG+7* |
ABMCHRG | SLINES+7*, SLINES+8, SLINES+9*, SLINES+36*, SLINES+37, SLINES+38*, WLINE+5, XIT+4! |
>> ABMCOV | COVRG+5*, COVRG+18*, COVRG+22*, COVRG+28*, COVRG+33*, COVRG+34 |
ABMDESC | SLINES+5*, SLINES+29*, SLINES+30*, SLINES+32*, SLINES+33*, SLINES+34*, WLINE+3, XIT+4! |
>> ABMEFDT | COVRG+5*, COVRG+17*, COVRG+21*, COVRG+27*, COVRG+31*, COVRG+34 |
>> ABMG | GUARCHK+15*, GUARCHK+16 |
ABMGCITY | HDR+25, XIT+2!, GUARCHK+20*, GUARCHK+26*, GUARCHK+32*, GUARCHK+39* |
>> ABMGDA | GUARCHK+16*, GUARCHK+18, GUARCHK+19, GUARCHK+20, GUARCHK+21, GUARCHK+22, GUARCHK+24, GUARCHK+25, GUARCHK+26, GUARCHK+27 , GUARCHK+28, GUARCHK+30, GUARCHK+31, GUARCHK+32, GUARCHK+33, GUARCHK+34 |
>> ABMGEFDA | GUARCHK+9*, GUARCHK+10*, GUARCHK+11, GUARCHK+12 |
>> ABMGEFDT | GUARCHK+11*, GUARCHK+13 |
>> ABMGENDT | GUARCHK+12*, GUARCHK+13 |
>> ABMGFILE | GUARCHK+16*, GUARCHK+17, GUARCHK+23, GUARCHK+29 |
>> ABMGIEN | GUARCHK+7*, GUARCHK+8*, GUARCHK+10, GUARCHK+11, GUARCHK+12, GUARCHK+15 |
ABMGNAME | HDR+18, XIT+2!, GUARCHK+18*, GUARCHK+24*, GUARCHK+30*, GUARCHK+37* |
ABMGST | HDR+25, XIT+2!, GUARCHK+21*, GUARCHK+27*, GUARCHK+33*, GUARCHK+40* |
ABMGSTR | HDR+22, XIT+2!, GUARCHK+19*, GUARCHK+25*, GUARCHK+31*, GUARCHK+38* |
ABMGZIP | HDR+25, XIT+2!, GUARCHK+22*, GUARCHK+28*, GUARCHK+34*, GUARCHK+41* |
ABMI | HDR+27*, HDR+29*, HDR+36*, HDR+44*, WCOVRG+3*, WCOVRG+19*, WCOVRG+25*, XIT+3! |
>> ABMIEN | COVRG+3*, COVRG+4*, COVRG+6 |
>> ABMII | SLINES+16*, SLINES+17*, SLINES+19, SLINES+21, SLINES+22, SLINES+23, SLINES+24, SLINES+25, SLINES+26, SLINES+28 , SLINES+29, SLINES+30, SLINES+32, SLINES+33, SLINES+34, SLINES+35, SLINES+36 |
ABMINS | WCOVRG+5*, WCOVRG+8*, WCOVRG+9*, WCOVRG+10, WCOVRG+11, WCOVRG+12, WCOVRG+13, XIT+3!, COVRG+8*, COVRG+10 , COVRG+12, COVRG+13, COVRG+34 |
>> ABMINTRY | COVRG+5*, COVRG+16*, COVRG+17, COVRG+18, COVRG+20*, COVRG+21, COVRG+22, COVRG+26*, COVRG+27, COVRG+28 , COVRG+30*, COVRG+31, COVRG+32 |
>> ABMISNB | COVRG+3*, COVRG+10* |
ABMJ | SLINES+16*, SLINES+18*, SLINES+19*, SLINES+21, SLINES+22, SLINES+23, SLINES+25, SLINES+26, SLINES+28, SLINES+29 , SLINES+30, SLINES+32, SLINES+33, SLINES+34, SLINES+35, SLINES+36, XIT+3! |
ABMK | SLINES+16*, SLINES+20*, SLINES+21*, SLINES+22, SLINES+23, SLINES+25, SLINES+26, SLINES+28, SLINES+29, SLINES+30 , SLINES+32, SLINES+33, SLINES+34, SLINES+35, SLINES+36, XIT+3! |
ABML | XIT+3!, COVRG+1! |
ABML( | WCOVRG+6, WCOVRG+9, WCOVRG+12, WCOVRG+13, COVRG+34* |
ABML(0 | WCOVRG+14 |
>> ABMLN | TOTAL+14*, TOTAL+16 |
ABMLNCNT | SLINES+13*, WLINE+7*, WLINE+8, WLINE+19*, TOTAL+13, TOTAL+16*, XIT+5! |
ABMMSG | XIT+5! |
>> ABMMULT | COVRG+24*, COVRG+25, COVRG+26 |
ABMNOG | XIT+5!, GUARCHK+3*, GUARCHK+14*, GUARCHK+36 |
>> ABMP("BDFN" | MARG+4, MARG+5, MARG+6, MARG+7, MARG+8, MARG+10, MARG+11, MARG+12, HDR+24, HDR+32 , HDR+33, HDR+39, HDR+40, HDR+41, SLINES+3, SLINES+22, SLINES+26, WCOVRG+22, PRTFILE+2, PRTFILE+8 , GUARCHK+5, GUARCHK+6, COVRG+4, COVRG+6, COVRG+12 |
>> ABMP("BTYP" | MARG+7* |
>> ABMP("CLIN" | MARG+10* |
>> ABMP("EXP" | MARG+12* |
>> ABMP("FLAT" | SLINES+2, SLINES+4, SLINES+5, SLINES+6, SLINES+7 |
>> ABMP("INS" | MARG+8*, MARG+9, SLINES+5 |
>> ABMP("ITYP" | MARG+9* |
>> ABMP("ITYPE" | MARG+9* |
>> ABMP("LDFN" | MARG+5*, HDR+10, HDR+21 |
>> ABMP("PDFN" | MARG+4*, HDR+21, GUARCHK+4, GUARCHK+8, GUARCHK+10, GUARCHK+11, GUARCHK+12, GUARCHK+15, GUARCHK+36, GUARCHK+37 , GUARCHK+38, GUARCHK+39, GUARCHK+40, GUARCHK+41, COVRG+14, COVRG+16, COVRG+20, COVRG+30 |
>> ABMP("VDT" | MARG+11*, SLINES+30, SLINES+32 |
>> ABMP("VTYP" | MARG+6*, HDR+38, SLINES+5 |
ABMPAGE | MARG+13*, HDR+34, WLINE+17*, XIT+5! |
>> ABMPH | COVRG+32*, COVRG+33 |
ABMPRI | WCOVRG+5*, WCOVRG+6*, WCOVRG+7, WCOVRG+9, WCOVRG+11, WCOVRG+12, WCOVRG+13, XIT+3!, COVRG+11*, COVRG+34 |
>> ABMPRIS | WCOVRG+5*, WCOVRG+7*, WCOVRG+15, WCOVRG+16* |
ABMRV | XIT+3! |
ABMRV( | SLINES+17, SLINES+19, SLINES+21, SLINES+22, SLINES+23, SLINES+25, SLINES+26, SLINES+28, SLINES+29, SLINES+30 , SLINES+32, SLINES+33, SLINES+34, SLINES+35, SLINES+36 |
ABMSCD | SLINES+4*, SLINES+23*, SLINES+25*, SLINES+28*, WLINE+2, XIT+4! |
ABMSDT | SLINES+3*, SLINES+22*, SLINES+26*, WLINE+1, XIT+4! |
>> ABMSDTFR | GUARCHK+6*, GUARCHK+13 |
>> ABMSDTTO | GUARCHK+5*, GUARCHK+13 |
ABMTCHRG | MARG+14*, SLINES+8*, SLINES+37*, TOTAL+11, XIT+4! |
ABMUNIT | SLINES+6*, SLINES+7, SLINES+35*, WLINE+4, XIT+4! |
ABMV | XIT+1! |
ABMV("X1" | WCOVRG+30, WCOVRG+31, WCOVRG+32, WCOVRG+33 |
>> ABMX | COVRG+6*, COVRG+7, COVRG+8, COVRG+11, COVRG+15, COVRG+16, COVRG+19, COVRG+20, COVRG+23, COVRG+24 , COVRG+26, COVRG+29, COVRG+30 |
>> ABMY( | WCOVRG+22, PRTFILE+8 |
>> CENTER | CENTER+1*, CENTER+2 |
DA | PRTFILE+1! |
DA(1 | PRTFILE+2*, PRTFILE+3 |
DIC | PRTFILE+1!, PRTFILE+3* |
DIC("DR" | PRTFILE+8* |
DIC("P" | PRTFILE+5* |
DIC(0 | PRTFILE+4* |
DIE | PRTFILE+1! |
DT | HDR+17 |
DUZ | PRTFILE+8 |
DUZ(2 | MARG+4, MARG+5, MARG+6, MARG+7, MARG+8, MARG+10, MARG+11, MARG+12, HDR+3, HDR+4 , HDR+6, HDR+21, HDR+24, HDR+32, HDR+33, HDR+39, HDR+40, HDR+41, SLINES+3, SLINES+5 , SLINES+22, SLINES+26, WCOVRG+22, GUARCHK+5, GUARCHK+6, COVRG+4, COVRG+6, COVRG+12 |
IOM | CENTER+1 |
U | MARG+4, MARG+5, MARG+6, MARG+7, MARG+8, MARG+10, MARG+11, MARG+12, HDR+4, HDR+6 , HDR+10, HDR+21, HDR+24, HDR+32, HDR+33, HDR+38, HDR+41, HDR+42, SLINES+3, SLINES+4 , SLINES+5, SLINES+6, SLINES+7, SLINES+22, SLINES+23, SLINES+25, SLINES+26, SLINES+28, SLINES+29, SLINES+30 , SLINES+32, SLINES+33, SLINES+34, SLINES+35, SLINES+36, WCOVRG+10, WCOVRG+11, WCOVRG+12, WCOVRG+13, WCOVRG+22 , WCOVRG+30, WCOVRG+31, WCOVRG+32, WCOVRG+33, PRTFILE+5, GUARCHK+5, GUARCHK+6, GUARCHK+11, GUARCHK+12, GUARCHK+15 , GUARCHK+18, GUARCHK+19, GUARCHK+20, GUARCHK+21, GUARCHK+22, GUARCHK+24, GUARCHK+25, GUARCHK+26, GUARCHK+27, GUARCHK+28 , GUARCHK+30, GUARCHK+31, GUARCHK+32, GUARCHK+33, GUARCHK+34, GUARCHK+37, GUARCHK+38, GUARCHK+39, GUARCHK+40, GUARCHK+41 , COVRG+7, COVRG+8, COVRG+10, COVRG+11, COVRG+12, COVRG+13, COVRG+14, COVRG+15, COVRG+16, COVRG+17 , COVRG+18, COVRG+19, COVRG+20, COVRG+21, COVRG+22, COVRG+23, COVRG+24, COVRG+26, COVRG+27, COVRG+28 , COVRG+29, COVRG+30, COVRG+31, COVRG+32, COVRG+33 |
X | PRTFILE+1!, PRTFILE+7*, CENTER~, CENTER+2 |
Y | PRTFILE+1! |