FBCS Access to FBUCUTL5 routine    ICR (5441)

FN = file number (162.91, 162.92, 162.93, or 162.94)

IG = ignore screen (optional)

^TMP("FBAR",$J,"FBAR")=total count;5^ ^TMP("FBAR
,$J,number)=ien;.01 field value

Example for file 162.91

D DISP9^FBUCUTL5(162.91)

^TMP("FBAR",546787498,1)=1;APPROVED
2)=2;DISAPPROVED
3)=3;CANCELLED/WITHDRAWN
4)=4;APPROVED TO STABILIZATION
5)=5;ABANDONED
"FBAR")=5;5^

X-REF to use for sort
"APMS    for patient (veteran)
"AVMS    for vendor
"AOMS    for other party

Veteran or Vendor or other party IEN (depends on
specified x-ref)

either 0 for all status' for a patient/vendor or a
status list in string format, delimited by "^" EG: ("10^50^")

(optional) mill bill screening criteria with value
"M" for just mill bill claims
"N" for just non-mill bill claims
"A" (or null) for all claims

^TMP("FBAR ,$J, FBAR )= display count in array;piece positions for display
(only if count)

^TMP("FBAR ,$J,number) = ien;name(vet or ven)^name(ven or vet)^fee
program^date of claim^status^may be more information and pieces in string

Example:
D DISP7^FBUCUTL5("AVMS",1427,0)

Global ^TMP("FBAR" -- NOTE: translation in effect


^TMP("FBAR",546787498,1)=713;FEEHOSPITAL^FEEPATIENT,T^CIVIL
HOSPIT^12/18/08^DISPOSITIONED^!^TREATMENT FROM: 12/8/08^TREATMENT TO: 12/12/08

2)=714;FEEHOSPITAL^FEEPATIENT,T^OUTPATIENT^2/12/09^DISPOSI
TIONED^!^TREATMENT FROM: 2/10/09^TREATMENT TO: 2/10/09

3)=716;FEEHOSPITAL^FEEPATIENT,T^CIVIL HOSPIT^6/10/09^DISPO
SITIONED^!^TREATMENT FROM: 6/1/09^TREATMENT TO: 6/6/09


"FBAR")=3;5^20^35^52^63^6^33^57^