FBUCUTL ;ALBISC/TET - UNAUTHORIZED CLAIMS UTILITY ;12/7/2001
Source file <FBUCUTL.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
CDTC(X1,X2) | ;date comparison
|
|
DTC(X1,X2) | ;days between two days
|
|
VET(X) | ;veteran name
|
|
VEN(X) | ;vendor name
|
|
PROG(X) | ;fee program name
|
|
PTR(FBGL,FBIEN) | ;get .01 value of pointer
|
|
LOCK(FBGL,FBDA,GO) | ;lock entry before editing
|
|
L | ||
DAYS(X,FB1725) | ;number of days associated with a status
|
|
DISAP(DA1,X) | ;disapproval reason for disapproved dispositions
|
|
STATUS(X) | ;get status internal entry number
|
|
ORDER(X) | ;get order number of status
|
|
PAY(X,FBGL) | ;determine if any payments have been made
|
|
OVER(KEY) | ;determine if ability to override
|
|
UPOK(X) | ;ok to update
|
|
TIME(ED) | ;determine if expiration date passed
|
|
UNTIME(FBX) | ;write untimely message - called from input templates
|
|
FBZ(X) | ;get zero node on 162.7
|
|
FILE(FBGL,X,FBDI,FBDA1) | ;add entry to file or subfile
|
|
ADD | ||
PEND(FBDA) | ;check if any info pending for claim
|
|
PAYST(FBDA,FBUCP) | ; unauthorized claim payment status (released+)
|
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|