FBFHLD9 ;OIFO/SAB-GET DATA FOR INPATIENT INVOICE ;9/9/2003
Source file <FBFHLD9.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| EN | ;
 ; input ; FBAAIN - invoice number ; output ; If transaction type = "X" then only * items are output ; Claim Level Data ; FBD(0,"AMT") = Amount Disbursed^Amount Interest ; *FBD(0,"CAN") = Cancel Date^Cancel Reason^Cancel Activity ; FBD(0,"DAYS) = Covered Days ; FBD(0,"DRG") = DRG^DRG Weight ; FBD(0,"DT") = Invoice Date ; *FBD(0,"FPPS") = FPPS Claim ID ; *FBD(0,"INV") = Invoice #^Transaction Type^Station #  | 
|
| INVOICE | ; determine invoice data
 ; FBD(0,"AMT") = Amount Disbursed^Amount Interest ; FBD(0,"CAN") = Cancel Date^Cancel Reason^Cancel Activity ; FBD(0,"DAYS") ; FBD(0,"DRG") ; FBD(0,"DT") = Invoice Date ; FBD(0,"FPPS") = FPPS Claim ID ; FBD(0,"INV") = Invoice #^Transaction Type^Station # ; FBSTA = station number ; FBTTYP = transaction type (C or X)  | 
|
| LINE | ;   FBC
 ; FBD(#,"ADJ") = AdjReason1^AdjGrp1^AdjAmt1 ; FBD(#,"AMT") = Amount Claimed^Amount Paid ; FBD(#,"CK") = Check Number^Check Date^Payment Method ; FBD(#,"835") = Routing Number^Financial Institution^^Account Number ; FB*3.5*122 ; FBD(#,"DT") = Start Date^End Date ; FBD(#,"FPPS") = FPPS Line Item ; FBD(#,"RMK") = Remittance Remark1^Remittance Remark2  | 
|
| CKLNST() | ; check line status extrinsic function
 ; result (0 or 1) ; 0 when line should not be sent to FPPS ; 1 when line should be sent to FPPS  | 
| FileNo | Call Tags | 
|---|---|
| ^FBAAI - [#162.5] | GET1^DIQ |