Functional Description B03B0088
Purpose
Function is used to unlog a log receipt. After a log receipt has been assigned to a customer this
function is called to update the F03B14 table to reverse the log receipt amount and update the F03B13
table.
Setup Notes and Prerequisites
None.
Special Logic
None.
Technical Specification
Parameters
Item DescriptionI/OReq?Notes
PYID mnPaymentidIYesReceipt Payment ID ICUT szBatchtype
I YesBatch Type for unlog entry
ICU mnBatchnumberIYesBatch Number for unlog entry
DICJ jdDatebatchjulianIYesBatch Date for unlog entry
DGJ jdDateforglandvoucherjuliaIYesG/L Date for unlog entry
EV01 cErrorFlagOOptError flag passed back
RC5 mnLastRC5AssignedOOptAssigned line numberof the F03B14 reversal of the log
receipt
Related Tables
F03B13Receipt HeaderInput/Update
F03B14Receipt DetailInput/Update/Output
Related Functions
B9800100Get Audit Information
X0903Fiscal Date Edits +
Processing
Fetch F03B13 for PYID set GBR error 078I if not found and set cErrorFlag = '1'
Set read loop to locate F03B14 logged record TYIN = L and DCTM = RL
When F03B14 logged record found IF Posted call I03B0088_PostedRL
Else record Unposted call I03B0088_UnpostedRL
IF function return Failed set cErrorFlag = '2'
IF function return OK update F03B13 table
Internal Functions
I03B0088_UnpostedRL
Delete F03B14 logged record if delete fails set cErrorFlag = '2' and return Failed
I03B0088_UnpostedRL
Set Select Sort on F03B14 for PYID, RC5 descending
Fetch record assign RC5 + 1 for reversing record
Setup F03B14 fields and output reversing record
D03B0088 - Unlog "RL" Logged Receipts
Item DescriptionI/OReq?Notes
PYID mnPaymentidIYesReceipt Payment ID ICUT szBatchtype
I YesBatch Type for unlog entry
ICU mnBatchnumberIYesBatch Number for unlog entry
DICJ jdDatebatchjulianIYesBatch Date for unlog entry
DGJ jdDateforglandvoucherjuliaIYesG/L Date for unlog entry
EV01 cErrorFlagOOptError flag passed back
RC5 mnLastRC5AssignedOOptAssigned line numberof the F03B14 reversal of the log
receipt
^
Parameter Name | Data Item | Data Type | Req/Opt | I/O/Both |
---|---|---|---|---|
mnPaymentid | PYID | MATH_NUMERIC | NONE | NONE |
Itemab Descriptionab ab ab I/Oab Req?ab Notes
| ||||
szBatchtype | ICUT | char | NONE | NONE |
Itemab Descriptionab ab ab I/Oab Req?ab Notes
| ||||
mnBatchnumber | ICU | MATH_NUMERIC | NONE | NONE |
Itemab Descriptionab ab ab I/Oab Req?ab Notes
| ||||
jdDatebatchjulian | DICJ | JDEDATE | NONE | NONE |
Itemab Descriptionab ab ab I/Oab Req?ab Notes
| ||||
jdDateforglandvoucherjulia | DGJ | JDEDATE | NONE | NONE |
Itemab Descriptionab ab ab I/Oab Req?ab Notes
| ||||
cErrorFlag | EV01 | char | NONE | NONE |
Itemab Descriptionab ab ab I/Oab Req?ab Notes
| ||||
mnLastRC5Assigned | RC5 | MATH_NUMERIC | NONE | NONE |
Itemab Descriptionab ab ab I/Oab Req?ab Notes
|
B9800100 Get Audit Information | ||||
X0903 Fiscal Date Edits + |
F03B13 Receipts Header | ||||
F03B14 Receipts Detail |