RCXFMSC1 ;WISC/RFJ-fms cash receipt (cr) build lines ;1 Oct 97
Source file <RCXFMSC1.m>
Package | Total | Call Graph |
---|---|---|
Accounts Receivable | 6 | $$ACCK^PRCAACC $$DTYPE^PRCAFBD1 $$RECTYP^PRCAFUT $$EDILB^RCDPEU ($$GETFUNDB,$$GETFUNDO)^RCXFMSUF $$CALCRSC^RCXFMSUR |
VA FileMan | 1 | $$GET1^DIQ |
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 |
---|---|---|
FMSLINES(RECEIPDA,RCTR) | ; receipda is the ien for the receipt in file 344
; return total(fund,revsrce,vendorid,fmstrantype) = dollar amount ; RCTR = 1 if extracting for a TR document, null or 0 if for CR |
|
INTADMIN | ; check for interest and admin charges
|
|
TOTAL(AMOUNT) | ; accumulate totals for summary document
|
|
SETTMP | ; set the tmp global for detailed data by bill
; the tmp global is used by the 215 report (rcy215a) |
|
GETTYPE(BILLDA,RCTR) | ; return a bills fms transaction type (which goes on the CRA code
; sheet) from the field 259 refund/reimbursement in file 430. ; If RCTR = 1, return TR code, otherwise return CR code |
|
LINE(BILLDA) | ;
|
Name | Field # of Occurrence |
---|---|
$$GET1^DIQ | FMSLINES+20, FMSLINES+35, FMSLINES+49, FMSLINES+57, FMSLINES+58 |
$$ACCK^PRCAACC | FMSLINES+25 |
$$DTYPE^PRCAFBD1 | GETTYPE+9 |
$$RECTYP^PRCAFUT | GETTYPE+5 |
$$EDILB^RCDPEU | FMSLINES+7 |
$$GETFUNDB^RCXFMSUF | FMSLINES+21, FMSLINES+36, FMSLINES+50 |
$$GETFUNDO^RCXFMSUF | INTADMIN+2, INTADMIN+5, INTADMIN+8, INTADMIN+11 |
$$CALCRSC^RCXFMSUR | FMSLINES+44, FMSLINES+59 |
FileNo | Call Tags |
---|---|
^PRCA(430 - [#430] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^PRCA(430 - [#430] | FMSLINES+14, LINE+3 |
^PRCA(433 - [#433] | FMSLINES+12, FMSLINES+13, FMSLINES+63 |
^RCY(344 - [#344] | FMSLINES+9 |
^TMP($J | SETTMP+4, SETTMP+10* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | FMSLINES+4~, SETTMP+4*, SETTMP+5*, SETTMP+6*, SETTMP+7*, SETTMP+8*, SETTMP+9*, SETTMP+10 |
ACCRUAL | FMSLINES+4~, FMSLINES+25*, FMSLINES+28 |
AMOUNT | FMSLINES+4~, INTADMIN+1*, INTADMIN+2, INTADMIN+4*, INTADMIN+5, INTADMIN+7*, INTADMIN+8, INTADMIN+10*, INTADMIN+11, TOTAL~ , TOTAL+1, TOTAL+7 |
BILLDA | FMSLINES+4~, FMSLINES+15*, FMSLINES+20, FMSLINES+21, FMSLINES+25, FMSLINES+29, FMSLINES+32, FMSLINES+35, FMSLINES+36, FMSLINES+44 , FMSLINES+49, FMSLINES+50, FMSLINES+57, FMSLINES+58, FMSLINES+59, SETTMP+4, SETTMP+10, GETTYPE~, GETTYPE+5, LINE~ , LINE+3 |
CATEGORY | FMSLINES+4~, FMSLINES+14*, FMSLINES+18, FMSLINES+63 |
>> DETAIL( | FMSLINES+32* |
FMSTYPE | FMSLINES+4~, FMSLINES+29*, FMSLINES+30*, FMSLINES+32 |
FUND | FMSLINES+4~, FMSLINES+20*, FMSLINES+21*, FMSLINES+35*, FMSLINES+36*, FMSLINES+49*, FMSLINES+50*, FMSLINES+54, INTADMIN+2*, INTADMIN+5* , INTADMIN+8*, INTADMIN+11*, TOTAL+3*, TOTAL+7, SETTMP+2*, SETTMP+4, SETTMP+10 |
RCEDILB | FMSLINES+5~, FMSLINES+7*, FMSLINES+8 |
RCTR | FMSLINES~, FMSLINES+7*, FMSLINES+29, GETTYPE~, GETTYPE+4*, GETTYPE+11 |
RECEFT | FMSLINES+5~, FMSLINES+8*, FMSLINES+36, FMSLINES+44, FMSLINES+50 |
RECEIPDA | FMSLINES~, FMSLINES+7, FMSLINES+9 |
RECEIPT | FMSLINES+4~, FMSLINES+9*, FMSLINES+10, FMSLINES+12 |
REFUND | GETTYPE+3~, GETTYPE+5*, GETTYPE+6*, GETTYPE+7*, GETTYPE+9*, GETTYPE+10*, GETTYPE+11 |
REVSRCE | FMSLINES+4~, FMSLINES+44*, FMSLINES+57*, FMSLINES+58*, FMSLINES+59*, TOTAL+4*, TOTAL+7 |
>> TOTAL( | TOTAL+7* |
TRAN0 | FMSLINES+5~, FMSLINES+13*, FMSLINES+14, FMSLINES+15 |
TRAN3 | FMSLINES+5~, FMSLINES+13*, FMSLINES+32, FMSLINES+63*, FMSLINES+66, INTADMIN+1, INTADMIN+4, INTADMIN+7, INTADMIN+10, SETTMP+5 , SETTMP+6, SETTMP+7, SETTMP+8, SETTMP+9 |
TRANDA | FMSLINES+5~, FMSLINES+12*, FMSLINES+13, FMSLINES+63 |
VENDORID | FMSLINES+5~, FMSLINES+42*, FMSLINES+54*, TOTAL+5*, TOTAL+7 |
X | LINE+2~, LINE+3*, LINE+4*, LINE+5 |
Z | FMSLINES+5~ |