FBAAUTL2 ;AISC/GRR - FEE UTILITY ROUTINE ;9/21/14 21:48
Source file <FBAAUTL2.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Name | Comments | DBIA/ICR reference |
---|---|---|
CONDAT | ;called from input transform in 161.21,.02-.03
|
|
DATES | ;ASK FROM AND TO DATES AND ENSURE THEY DO NOT OVERLAP PRIOR AUTHORIZATIONS
|
|
FDAT | ||
EDAT | ||
EN1 | ;CHECK WHETHER AUTHORIZATION FROM DATE OVERLAPS PREVIOUS ENTRIES
|
|
END | ||
CHKDT | ||
CHKBO | ||
ERRD | ||
UPDT | ;UPDATE BATCH STATUS
|
|
PAT |
|
|
ASKVOK | ||
VENOUT | ||
FBPH | ||
PRPRDT | ||
IFCAP | ||
POV | ;GET POV/TREATMENT TYPE FROM 161 FOR TRANSMISSION OF PAYMENTS
; in K, L, M, N - IENs for File 162 service provided multiple ; out POV - purpose of visit (internal pointer) or null ; out FBTT - treatment type (internal code) or null |
|
XREF | ;SET X-REF FOR PRINT AUTHORIZATION FIELD (161.01,1)
|
|
ADD | ||
KILL | ||
VER(X) | ;determine version of a file based on DD node
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^FBAA(161.7 - [#161.7] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD( | VER+2 |
^DD("DD" | PRPRDT |
^DPT - [#2] | FBPH+1 |
^FBAA(161.21 - [#161.21] | CONDAT+2, CONDAT+3 |
^FBAAA - [#161] | EN1+1, POV+9, XREF+1, XREF+3, ADD, KILL |
^FBAAA("AF" | ADD*, KILL! |
^FBAAC - [#162] | POV+6 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> % | PRPRDT |
>> %DT | FDAT*, EDAT* |
>> %DT("A" | FDAT*, EDAT* |
>> %DT("B" | FDAT*, EDAT* |
>> %DT(0 | EDAT*! |
>> A | PAT+4* |
>> DA | CONDAT+3, UPDT+1*, XREF+1, ADD, KILL |
>> DA(1 | XREF+1, XREF+3, ADD, KILL |
>> DFN | EN1+1, FBPH+1* |
>> DIC | UPDT+1* |
>> DIE | UPDT+1* |
DIR | ASKVOK!, FBPH! |
DIR("A" | ASKVOK*, FBPH* |
DIR("B" | ASKVOK*, FBPH* |
DIR(0 | ASKVOK*, FBPH* |
DIRUT | ASKVOK, VENOUT! |
>> DR | UPDT+1* |
DT | CHKDT+2 |
>> FB("SITE" | IFCAP+1* |
>> FB1 | EDAT, EN1+2 |
FBAAOUT | FBPH+1~ |
FBAUT | DATES+2!, END!, CHKDT+2! |
FBAUT( | EN1+1*, EN1+2!, EN1+3, CHKDT+2, CHKDT+3, CHKBO |
>> FBBEGDT | FDAT*, EDAT, END*, CHKDT, CHKDT+1, CHKDT+2*, CHKDT+3, CHKBO |
>> FBDOB | PAT+1* |
>> FBENDDT | FDAT*, EDAT*, END*, CHKDT, CHKDT+1 |
>> FBERR(1 | IFCAP* |
>> FBFI | PAT+4* |
>> FBFLAG | DATES+2*, FDAT+1, EN1+3, EN1+4 |
>> FBFLNAM | PAT+2* |
FBHDFN | FBPH+1*! |
FBLG | EN1+1*, EN1+3, EN1+4, END!, CHKDT*, CHKDT+1*, CHKDT+2*, CHKBO*, ERRD |
>> FBLNAM | PAT+2*, PAT+3* |
>> FBMI | PAT+4* |
>> FBNAME | PAT+2*, PAT+4 |
>> FBO | FDAT, EN1+2 |
FBOUT | CONDAT+1*, CONDAT+4*, EDAT*, EN1+1*, EN1+3, EN1+4*, END!, CHKDT*, CHKDT+1*, CHKDT+2* , CHKBO* |
>> FBPROG | EN1+1, CHKDT+2, CHKDT+3 |
>> FBSEX | PAT* |
>> FBSSN | PAT* |
>> FBTT | POV+4*, POV+11* |
FBVCON | CONDAT+4!, CONDAT+5! |
FBVCON( | CONDAT+2*, CONDAT+3!, CONDAT+4 |
>> FBVENO | ASKVOK* |
>> FBVENOT | VENOUT* |
>> FBVIEN | CONDAT+2 |
FBY | POV+8~, POV+9*, POV+10, POV+11 |
FBZZ | XREF+1~ |
FBZZ(0 | XREF+1*, XREF+3 |
FBZZ(1 | XREF+1*, XREF+2 |
FBZZ(2 | XREF+2* |
FTP | POV+5~, POV+6*, POV+7, POV+9 |
>> J | UPDT+1 |
>> K | POV+6, POV+9 |
>> L | POV+6 |
>> M | POV+6 |
>> N | FBPH+1*, POV+6 |
>> PAD | PAT+2 |
>> POV | POV+4*, POV+10* |
>> PRC("SITE" | IFCAP*, IFCAP+1 |
>> PRCF("X" | IFCAP* |
U | CONDAT+2, CONDAT+3, POV+6, VER+2 |
X | CONDAT+4!, VER~, VER+2 |
>> Y | FDAT, EDAT, ASKVOK, FBPH+1, PRPRDT* |
>> Y(0 | PAT, PAT+1, PAT+2 |
Z | CONDAT+1*, CONDAT+2*, CONDAT+4*!, CONDAT+5!, EN1+1*, EN1+3*, END!, CHKDT, CHKDT+1, CHKDT+2 , CHKDT+3, CHKBO |
Z(0 | CONDAT+2*, EN1+1* |
>> ZZZ | XREF+2*, XREF+3*, ADD*, KILL* |