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~ |