FBUCDD ;ALBISC/TET - DD UTILITY ROUTINE ;5/27/93 19:28
Source file <FBUCDD.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| INPUT(DA,X,Y,FBZZ) | ;input transform of status field, file 162.7
|
|
| 23 | ;If FBZZ=23 - CLAIM SUBMITTED BY
|
|
| 24 | ;IF FBZZ=24 - STATUS
|
|
| 10 | ;IF FBZZ=10 - DISPOSITION
|
|
| 7 | ;IF FBZZ=7 - DATE VALID CLAIM RECEIVED
|
|
| 4 | ;IF FBZZ=4 - TREATMENT TO DATE
|
|
| 12 | ;IF FBZZ=12 - AUTHORIZED FROM DATE
|
|
| 13 | ;IF FBZZ=14 - AUTHORIZED TO DATE
|
|
| DISCHTYP(DA) | ;discharge type - computed field expression from field 29 of 162.7
|
|
| MSIX(X,DA,FLD,ACT,FBIX) | ;cross-reference on either vendor/veteran/other,master claim,status order
|
