ABMUB92 ;IHS/ASDST/LSL - Update UB92 codes
Source file <ABMUB92.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
A | ; Admission Source Codes
|
|
C | ; Condition codes
|
|
B | ; Bill Type
|
|
D | ; Denial Reasons
|
|
P | ; Patient Discharge Status
|
|
I | ; Special Program
|
|
H | ; HCFA POS
|
|
FIX | ;
; Get x-ref on single digit numeric back |
|
DETAIL | ;
; If code is one digit numeric, place 0 before code |
|
O | ; Occurance Codes
|
|
N | ; Newborn
|
|
START | ;
; A = ADMISSION SOURCE ; B = BILL TYPE ; C = CONDITION ; D = DENIAL REASON ; H = HCFA POS ; I = SPECIAL PROGRAM ; N = NEWBORN ; O = OCCURANCE ; P = PATIENT DISCHARGE STATUS ; R = RELATIONSHIP TO INSURED ; S = OCCURANCE SPAN ; T = ADMISSION TYPE ; V = VALUE ; X = PSRO APRROVAL |
|
S | ; Occurance Span codes
|
|
R | ; Relationship to Insured
|
|
T | ; Admission Type
|
|
V | ; Value codes
|
|
X | ; PSRO Approval
|
FileNo | Call Tags |
---|---|
^ABMDCODE - [#9002274.03] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ABMDCODE("AC" | DETAIL+3, DETAIL+6, DETAIL+26, FIX+4, FIX+7, FIX+8* |
Name | Line Occurrences |
---|---|
DETAIL | START+16 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ABM | START+16*, START+17!, DETAIL+3, DETAIL+6, DETAIL+26, DETAIL+27, FIX+2*, FIX+4, FIX+7, FIX+8 |
ABMC | START+17!, DETAIL+7*, DETAIL+10 |
ABMCNT | START+17!, DETAIL+20*, DETAIL+22* |
ABMCODE | START+17!, DETAIL+2*, DETAIL+3*, DETAIL+4, DETAIL+6, DETAIL+7, FIX+3*, FIX+4*, FIX+5, FIX+7 , FIX+8 |
>> ABMDA | DETAIL+5*, DETAIL+6*, DETAIL+8, DETAIL+12, FIX+6*, FIX+7*, FIX+8 |
ABMDESC | START+17!, DETAIL+25*, DETAIL+27 |
DA | START+17!, DETAIL+8*, DETAIL+12* |
DD | START+17!, DETAIL+28! |
DIC | START+17!, DETAIL+18*, DETAIL+30! |
DIC("DR" | DETAIL+27* |
DIC(0 | DETAIL+19* |
DIE | START+17!, DETAIL+9* |
DIK | START+17!, DETAIL+13* |
DIK(1 | DETAIL+14* |
DO | START+17!, DETAIL+28! |
DR | START+17!, DETAIL+10* |
X | START+17!, DETAIL+24*, DETAIL+26 |
Name | Field # of Occurrence |
---|---|
$T(@ABM+ABMCNT | DETAIL+21, DETAIL+23, DETAIL+24, DETAIL+25 |