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 |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DPT - [#2] | VET+3 |
^FB(162.92 - [#162.92] | DAYS+5, STATUS+3, ORDER+3 |
^FB(162.94 - [#162.94] | DISAP+6 |
^FB583 - [#162.7] | DISAP+6*, FBZ+4 |
^FBAA(161.8 - [#161.8] | PROG+3 |
^FBAA(162.1 - [#162.1] | PAY+5, PAYST+16, PAYST+18 |
^FBAA(162.8 - [#162.8] | PEND+3 |
^FBAAC("AM" | PAY+5, PAYST+26, PAYST+28, PAYST+30, PAYST+32 |
^FBAAI("E" | PAY+5, PAYST+40 |
^FBAAV - [#161.2] | VEN+3 |
^XUSEC( | OVER+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%H | CDTC+4! |
%Y | DTC+4~! |
DA | DISAP+4~, FILE+7~ |
DA(1 | DISAP+6*, FILE+8* |
DA1 | DISAP~, DISAP+5, DISAP+6 |
DD | DISAP+6!, ADD! |
DIC | DISAP+4~, DISAP+5*, FILE+7~, ADD*! |
DIC(0 | DISAP+5*, ADD* |
DINUM | FILE+7~, ADD*! |
DO | DISAP+6!, ADD! |
DT | TIME+3 |
DUZ | OVER+3 |
ED | TIME~, TIME+3 |
FB1725 | DAYS~, DAYS+6 |
FBBS | PAYST+9~, PAYST+20*, PAYST+21, PAYST+22, PAYST+34*, PAYST+35, PAYST+36, PAYST+42*, PAYST+43, PAYST+44 |
FBC | PAYST+9~, PAYST+11*, PAYST+23*, PAYST+37*, PAYST+45*, PAYST+46, PAYST+47 |
>> FBCUP( | PAYST+12! |
FBDA | LOCK~, LOCK+8, LOCK+9, FILE+7, PEND~, PEND+3, PAYST~, PAYST+12, PAYST+13, PAYST+21 , PAYST+35, PAYST+43, PAYST+47 |
FBDA1 | FILE~, FILE+8 |
FBDI | FILE~, FILE+7, ADD |
FBGL | PTR~, PTR+4, LOCK~, LOCK+8, LOCK+9*, L, PAY~, PAY+4*, PAY+5, FILE~ , ADD, PAYST+9~, PAYST+13*, PAYST+16, PAYST+18, PAYST+26, PAYST+28, PAYST+30, PAYST+32, PAYST+40 |
FBIEN | PTR~, PTR+4 |
>> FBIENS | PAYST+19*, PAYST+20, PAYST+21, PAYST+33*, PAYST+34, PAYST+35, PAYST+41*, PAYST+42, PAYST+43 |
>> FBLOCK | LOCK+8*, L* |
FBPDA | PAYST+9~, PAYST+15*, PAYST+16*, PAYST+18, PAYST+19, PAYST+25*, PAYST+26*, PAYST+28, PAYST+30, PAYST+32 , PAYST+33, PAYST+39*, PAYST+40*, PAYST+41 |
FBPDA1 | PAYST+9~, PAYST+17*, PAYST+18*, PAYST+19, PAYST+27*, PAYST+28*, PAYST+30, PAYST+32, PAYST+33 |
FBPDA2 | PAYST+9~, PAYST+29*, PAYST+30*, PAYST+32, PAYST+33 |
FBPDA3 | PAYST+9~, PAYST+31*, PAYST+32*, PAYST+33 |
FBRET | PAYST+9~, PAYST+10*, PAYST+22*, PAYST+36*, PAYST+44*, PAYST+46*, PAYST+47, PAYST+48 |
FBUCP | PAYST~, PAYST+12, PAYST+21, PAYST+35, PAYST+43, PAYST+47 |
FBVAL | PTR+4~, PTR+5*, PTR+6 |
FBX | UNTIME~, UNTIME+2 |
FBY | DAYS+4~, DAYS+5*, DAYS+6 |
GO | LOCK~, LOCK+8*, L |
KEY | OVER~, OVER+3 |
NODE | PTR+4~*, PTR+5 |
U | VET+3, VEN+3, PROG+3, DAYS+6, DISAP+6, ORDER+3, UNTIME+2, PAYST+22, PAYST+36, PAYST+44 , PAYST+47 |
X | CDTC+4~, DTC+4~, VET~, VET+3*, VEN~, VEN+3*, PROG~, PROG+3*, DAYS~, DAYS+5 , DISAP~, DISAP+6, STATUS~, STATUS+3, ORDER~, ORDER+3*, PAY~, PAY+4, UPOK~, UPOK+3 , FBZ~, FBZ+3, FBZ+4*, FILE~, FILE+7, ADD |
X1 | CDTC~, DTC~ |
X2 | CDTC~, DTC~ |
Y | DISAP+4~, FILE+7~, ADD, ADD+1 |
>> ZTQUEUED | L |