Description
Restore messages from system errors
Parameters
oiReturnStatus | output | integer | Return status of the method. |
Internal usage
QadFinancials
program code (program5/bersprocessor.p)
/* =================================================================================================== */
/* Method : RestoreFromSystemErrors */
/* Desc : This method restores all general messages into tFCMessages table */
/* --------------------------------------------------------------------------------------------------- */
/* =================================================================================================== */
assign oiReturnStatus = -98.
/* =================================================================================================== */
/* Backup all errors to system ones */
/* =================================================================================================== */
for each tSystemFcMessages:
create tFcMessages.
buffer-copy tSystemFcMessages to tFcMessages.
end.
empty temp-table tSystemFcMessages.
/* =================================================================================================== */
/* Return */
/* =================================================================================================== */
if oiReturnStatus = -98 then assign oiReturnStatus = 0.