Functional Description
Purpose
This function is used to update all the A/R post status related flags of the F03B11, F03B112, F03B13,
and F03B14 tables during the posting process invoked by the General Ledger Post Report (R09801). If
the function fails for any reason it will set an error without passing any error flags back to the
calling application.
Setup Notes and Prerequisites
A valid batch type and batch number is required for running this function. The function should only
be called from R09801.
Special Logic
None.
Technical Specification
Parameters
Item DescriptionI/OReq?Notes
ICUmnBatchNumberIYBatch Number.
ICUTszBatchTypeIYBatch Type.
Related Tables
F03B11Customer Ledger
F03B112Invoice Revisions
F03B13Receipts Header File
F03B14A/R Check Detail File
Related Functions
None.
Processing
Initialize return values.
Open F03B11 table using document number and document type index.
Open F03B11 table using batch type, batch number, and posting code index.
If both table calls to F03B11 were successful,
Move selected information to F03B11 data structure fields.
Select records from F03B11 based on given criteria.
Repeat,
Fetch record from F03B11.
If fetch was unsuccessful,
Set flag to exit current loop to 'TRUE'.
Else,
Move selected information to F03B11 data structure fields.
Write updated F03B11 data structure to F03B11 table.
If Post Status = '1',
Open F03B112 table using document number and type index.
Open F03B112 table using batch number, batch type, and
posting code index.
If both table calls to F03B112 were successful,
Move selected information to F03B112 data structure
fields.
Select records from F03B112.
Repeat,
Fetch record from F03B112.
If fetch was successful,
Set flag to brake out of current loop to 'TRUE'.
Else,
Move selected information to F03B112 data
structure fields.
Fetch specific record from F03B112 table.
If fetch was successful,
Write updated F03B112 data structure to F03B112
table.
Set Post Status = '2'.
Endif.
Endif.
Until (flag = 'TRUE').
Endif.
Endif.
Endif.
Until (flag = 'TRUE').
Endif.
Open F03B13 table using payment ID index.
Open F03B14 table using payment ID, and line ID index.
Open F03B14 table using 'full key' index.
If all open table calls were successful,
Move selected information to F03B14 data structure fields.
Fetch record from the F03B14 table.
While fetch was successful,
If related payment ID has changed,
Assign new values to selected F03B13 data structure fields.
Write updated F03B13 data structure to F03B13 table.
Endif.
Move selected information to F03B14 data structure fields.
Write updated F03B14 data structure to F03B14 table.
End While.
Endif.
Close all open tables.
^
D0000080 - Update A/R Post Status Flags
| Parameter Name | Data Item | Data Type | Req/Opt | I/O/Both |
|---|---|---|---|---|
| mnBatchNumber | ICU | MATH_NUMERIC | NONE | NONE |
A number that identifies a group of transactions that the system processes and balances as a unit. When you enter a batch, you can either
| ||||
| szBatchType | ICUT | char | NONE | NONE |
A code that specifies the system and type of transactions entered in a batch. The system assigns the value when you enter a transaction.
| ||||
| None |
| F03B11 Customer Ledger | ||||
| F03B112 Invoice Revisions | ||||
| F03B13 Receipts Header | ||||
| F03B14 Receipts Detail |