ABMUTL8 ; IHS/ASDST/DMJ - 837 UTILITIES ;
Source file <ABMUTL8.m>
| Package | Total | Call Graph | 
|---|---|---|
| Third Party Billing | 4 | $$DX^ABMCVAPI $$FMT^ABMERUTL (ANES,CDSET,OCSET,OSSET,PXSET)^ABMUTL8A $$RCID^ABMUTLP | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| DXA(X) | ;EP - Admitting DX | |
| 837 | ;EP - override for 837 5010 formats | |
| OSSET(X) | ;EP -occurrence span set | |
| PTAX(X) | ;EP - provider taxonomy | |
| STRIP(X) | ;EP - strip trailing null data elements | |
| PXSET(X) | ;EP -set px array | |
| OCSET(X) | ;EP -occurrence set | |
| OVER(ABMLN,ABMPCE) | ;EP - get override values from 3P Insurer file | |
| WR(X) | ;EP - write to file | |
| DXSET2(X) | ;EP - set dx array | |
| AN(X) | ;EP - alpha numeric only | |
| CDSET(X) | ;EP - condition code set | |
| DXSET(X) | ;EP - set dx array | |
| VASET(X) | ;EP -value code set | |
| ANES(X) | ;EP - anesthesia charges set | |
| DXP(X) | ;EP - Primary DX | |
| DXE(X) | ;EP - E-Code | |
| HRN(X) | ;PEP - HRN ; First look at Visit Loc for HRN ; If not then look at Parent Loc for HRN ; If not, loop Satellite Locs for said parent until one is found. | 
| Name | Field # of Occurrence | 
|---|---|
| $$DX^ABMCVAPI | DXA+5, DXE+5, DXSET+15, DXSET+17, DXSET2+25, DXSET2+37, DXSET2+38, DXSET2+41, DXSET2+47, DXSET2+48 | 
| $$FMT^ABMERUTL | 837+53, 837+54 | 
| ANES^ABMUTL8A | ANES+1 | 
| CDSET^ABMUTL8A | CDSET+2 | 
| OCSET^ABMUTL8A | OCSET+2 | 
| OSSET^ABMUTL8A | OSSET+2 | 
| PXSET^ABMUTL8A | PXSET+2 | 
| $$RCID^ABMUTLP | WR+2 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^ABMDBILL( | DXA+2, DXA+3, DXA+9, DXE+2, DXSET+8, DXSET+10, DXSET+17, DXSET2+7, DXSET2+9, DXSET2+21 , DXSET2+23, DXSET2+26, DXSET2+30, DXSET2+32, DXSET2+41, DXSET2+42, DXSET2+43, DXSET2+46, DXSET2+47, DXSET2+48 , VASET+6, VASET+7 | 
| ^ABMDCODE - [#9002274.03] | VASET+10 | 
| ^ABMNINS( | OVER+9, OVER+10, OVER+14, 837+3, 837+9, 837+11, 837+27, 837+30, 837+35, 837+36 | 
| ^AUPNPAT - [#9000001] | HRN+4, HRN+10, HRN+15 | 
| ^BAR(90052.05 | HRN+8, HRN+9, HRN+14 | 
| Name | Line Occurrences | 
|---|---|
| $$STRIP | WR+3 | 
| DXSET | DXP+2 | 
| DXSET2 | DXSET+3 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| ABMBTYP | DXA+2~*, DXA+9, DXA+10 | 
| ABMCHAR | AN+3*, AN+4, AN+13! | 
| ABMCHAR( | AN+4*, AN+6 | 
| >> ABMCNT | DXSET+6*, DXSET+11*, DXSET+12, DXSET+13, DXSET+15, DXSET2+5*, DXSET2+19*, DXSET2+21, DXSET2+23, DXSET2+25 , DXSET2+26, DXSET2+28*, DXSET2+39*, DXSET2+41, DXSET2+42, DXSET2+43, VASET+3*, VASET+8*, VASET+9, VASET+10 , VASET+15 | 
| >> ABMDEBUG | WR+6, WR+10 | 
| >> ABMDELI | WR+1*, WR+2*, WR+9 | 
| ABMDX | DXSET+4!, DXSET2+2! | 
| ABMDX( | DXSET+12*, DXSET+13*, DXSET+15*, DXSET2+21*, DXSET2+23*, DXSET2+25*, DXSET2+26*, DXSET2+43* | 
| ABMDX("ADM" | DXSET+17*, DXSET2+47* | 
| ABMDX("ADMTYP" | DXSET2+48* | 
| ABMDX(1 | DXP+3 | 
| >> ABMDXA | DXA+3*, DXA+4, DXA+5*, DXA+6, DXA+7*, DXA+9*, DXA+10*, DXA+11 | 
| ABMDXE | DXE+2*, DXE+3, DXE+5*, DXE+6, DXSET2+3! | 
| ABMDXE( | DXSET2+41*, DXSET2+42* | 
| >> ABMDXP | DXP+3*, DXP+4 | 
| >> ABME("RTYPE" | 837+3, 837+4, 837+5, 837+6, 837+9, 837+11, 837+24, 837+25, 837+27, 837+30 , 837+35, 837+36, 837+52, 837+53, 837+54, 837+55 | 
| >> ABME("VTYP" | 837+1! | 
| >> ABMELE | 837+7*, 837+9*, 837+11, 837+12, 837+13, 837+14, 837+15, 837+16, 837+17, 837+18 , 837+19, 837+21, 837+22, 837+23, 837+28*, 837+30*, 837+35, 837+36, 837+39, 837+40 , 837+41, 837+42, 837+43, 837+44, 837+45, 837+46, 837+48, 837+49, 837+51 | 
| >> ABMELEM | 837+12*, 837+13*, 837+14*, 837+15*, 837+16*, 837+17*, 837+18*, 837+19*, 837+21*, 837+22* , 837+23*, 837+24, 837+25, 837+39*, 837+40*, 837+41*, 837+42*, 837+43*, 837+44*, 837+45* , 837+46*, 837+48*, 837+49*, 837+51*, 837+52, 837+53, 837+54, 837+55 | 
| >> ABMLINE | VASET+7*, VASET+10, VASET+15 | 
| ABMLN | OVER~, OVER+9, OVER+10, OVER+14 | 
| >> ABMLOOP | 837+3, 837+9, 837+11, 837+27, 837+30, 837+35, 837+36 | 
| ABMOVTYP | OVER+2~, OVER+9*, OVER+10*, OVER+12, OVER+14 | 
| >> ABMP("EXP" | DXSET+3, DXSET2+26, DXSET2+43, OVER+8, 837+3, 837+9, 837+11, 837+27, 837+30, 837+35 , 837+36 | 
| >> ABMP("INS" | WR+2, OVER+9, OVER+10, OVER+14, 837+3, 837+9, 837+11, 837+27, 837+30, 837+35 , 837+36 | 
| >> ABMP("LDFN" | HRN+4, HRN+8, HRN+9, OVER+9, OVER+10, OVER+14, 837+3, 837+9, 837+11, 837+27 , 837+30, 837+35, 837+36 | 
| >> ABMP("VDT" | DXA+5, DXE+5, DXSET+15, DXSET+17, DXSET2+25, DXSET2+37, DXSET2+38, DXSET2+41, DXSET2+47, DXSET2+48 | 
| >> ABMP("VTYP" | OVER+10, 837+36 | 
| >> ABMPAR | HRN+7*, HRN+8*, HRN+9*, HRN+10, HRN+12, HRN+14 | 
| ABMPCE | OVER~, OVER+9, OVER+10, OVER+14 | 
| ABMR | WR+13! | 
| ABMR( | 837+5!, 837+6*, 837+24*, 837+52* | 
| ABMREC | WR+13! | 
| ABMREC( | WR+3, 837+4*, 837+25*, 837+55* | 
| >> ABMSAT | HRN+13*, HRN+14*, HRN+15 | 
| >> ABMSTOT | WR+11* | 
| >> ABMSTRNG | WR+3*, WR+4, WR+7*, WR+8 | 
| >> ABMT("EXP" | OVER+8*, OVER+9, OVER+10, OVER+14 | 
| ABMVA | VASET+2! | 
| ABMVA( | VASET+9*, VASET+10*, VASET+15* | 
| >> ABMVALUE | OVER+1*, OVER+12, OVER+14*, OVER+15, 837+35*, 837+36*, 837+38, 837+52, 837+53*, 837+54* , 837+55 | 
| DUZ(2 | DXA+2, DXA+3, DXA+9, DXE+2, DXSET+8, DXSET+10, DXSET+17, DXSET2+7, DXSET2+9, DXSET2+21 , DXSET2+23, DXSET2+26, DXSET2+30, DXSET2+32, DXSET2+41, DXSET2+42, DXSET2+43, DXSET2+46, DXSET2+47, DXSET2+48 , VASET+6, VASET+7 | 
| >> HRN | HRN+4*, HRN+6, HRN+10*, HRN+11, HRN+14, HRN+15*, HRN+16 | 
| I | DXSET+5~, DXSET+7*, DXSET+8*, DXSET+10, DXSET2+4~, DXSET2+6*, DXSET2+7*, DXSET2+9, DXSET2+29*, DXSET2+30* , DXSET2+32, VASET+4~, VASET+5*, VASET+6*, VASET+7, STRIP+2~, STRIP+3*, STRIP+4, AN+1~, AN+2* , AN+3, AN+5*, AN+6*, AN+7, AN+8, AN+9, AN+10, AN+11, AN+12 | 
| IO | WR+5 | 
| IO(0 | WR+6, WR+12 | 
| J | DXA+9, DXSET+5~, DXSET+9*, DXSET+10*, DXSET+15, DXSET2+4~, DXSET2+8*, DXSET2+9*, DXSET2+21, DXSET2+23 , DXSET2+25, DXSET2+26, DXSET2+31*, DXSET2+32*, DXSET2+37, DXSET2+38, DXSET2+41, DXSET2+42, DXSET2+43 | 
| U | DXA+2, DXA+3, DXA+5, DXA+9, DXE+2, DXE+5, DXSET+15, DXSET+17, DXSET2+21, DXSET2+23 , DXSET2+25, DXSET2+26, DXSET2+37, DXSET2+38, DXSET2+41, DXSET2+42, DXSET2+43, DXSET2+46, DXSET2+47, DXSET2+48 , VASET+10, VASET+15 | 
| X | HRN~, HRN+4, HRN+10, HRN+15, DXP~, DXP+2, DXA~, DXA+2, DXA+3, DXA+9 , DXE~, DXE+2, DXSET~, DXSET+3, DXSET+8, DXSET+10, DXSET+17, DXSET2~, DXSET2+7, DXSET2+9 , DXSET2+21, DXSET2+23, DXSET2+26, DXSET2+30, DXSET2+32, DXSET2+41, DXSET2+42, DXSET2+43, DXSET2+46, DXSET2+47 , DXSET2+48, PXSET~, PXSET+2, OSSET~, OSSET+2, OCSET~, OCSET+2, VASET~, VASET+6, VASET+7 , CDSET~, CDSET+2, ANES~, ANES+1, WR~, WR+3, STRIP~, STRIP+1, STRIP+3, STRIP+4 , AN~, AN+2, AN+3, AN+12*, AN+14, PTAX~, PTAX+2*, PTAX+3 | 
| >> Y | STRIP+4*, STRIP+5 |