FBPAY67 ;AISC/DMK,TET,BPOIFO/MEC - CH/CNH PAYMENT HISTORY SORT ;9/13/12 10:29am
Source file <FBPAY67.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;entry to sort
|
|
| FBAAC | ;check ^fbaac("an" (file 162)
|
|
| SORT | ;sort programs 6 & 7 (civil hos & cnh)
|
|
| KILL | ;kill variables set in routine and in FBPAY2, sort/set sections
|
|
| SET | ;set string, also called by fbchdi (fblistc or fbaanq set if called by fbchdi)
|
|
| SETTMP | ||
| AN | ;get data from an xref - called at tag fbaac in pay3 & pay67
|
|
| AN1 | ||
| OTH | ;other fee programs - if 'fbsort (by vendor)
|
|
| ANC(FBM,FBI) | ;ancillary payments - if fbsort (by patient)
|
|
