JonSellers
Member
To JDELIST,
We are having an unusual problem with RunUbe.
Denver has been unable to solve this problem, so any suggestions from the JDELIST would be greatly appreciated.
Here are some facts about the problem:
UBE's operate correctly when executed via Batch Versions (BV) or LaunchUBE.exe. We experience the error only when using RUNUBE.
UBE performs all processing (updates) correctly but ends with either one of these error messages:
1) "Function check. MCH3402 unmonitored by QSQLCLS at statement *N, instruction X'008D'."
2) "Application error. *N unmonitored by *N at statement *N, instruction X'4000'"
On the "View Submitted Jobs" screen, UBEs that receive the first error message show to be in status "Error", UBEs that receive the second error message are shown as status "Done". Either way, the UBE is not finishing normally.
Problem appears to only affect custom UBE's. JDE-written UBE appear to work ok (still verifying this).
Error only occurs when updating the table that the UBE is based upon. Example: Custom columnar UBE is based upon the F0101 business view "V0101C". In the Do Section there is code to update a field on the F0101, such as:
VA rpt_UserReservedNumber = "2"
F0101.Update
BC Long Address Number = TK Long Address Number
VA rpt_UserReservedNumber -> TK User Reserved Number
AS400 SQL Package is deleted prior to running UBE
Error occurs only when Updating records. Custom UBEs that only Insert or Delete records have no trouble.
The UBEs are not complex. They are simple columnar reports created using the RDA wizard. They use no "Smart fields", or custom BSFN's. They use standard ER commands (Like UPDATE) to perform the table maintenance functions.
UBE runs ok (no error) when Updating less than 80,000 records
UBE Produces the error message when updating more than 80,000 records
Here are the complete error messages:
First Error Message:
900 - CALL PGM(B7333SYS/JDB_1) /* The CALL command contains parameters */
- RETURN /* RETURN due to end of CL program */
Member F5445 added to file PRINTQUEUE in B7333SYS.
Pointer not set for location referenced.
Pointer not set for location referenced.
Library SVM7333 already exists in library list.
Exception recursion detected.
Application error. *N unmonitored by *N at statement *N, instruction
X'4000'.
Second Error Message:
900 - CALL PGM(B7333SYS/JDB_1) /* The CALL command contains parameters */
- RETURN /* RETURN due to end of CL program */
Cursor CURSOR25 already open.
Tried to refer to all or part of an object that no longer exists.
SQL system error.
Tried to refer to all or part of an object that no longer exists.
Function check. MCH3402 unmonitored by QSQLCLS at statement *N,
instruction X'008D'.
SQL system error.
Cursor CURSOR25 already open.
Member F3078 added to file PRINTQUEUE in B7333SYS.
A Side Note:
We do not have the luxury of simply not using Runube and using BV/Launchube instead. The production job scheduling package we are using starts all UBEs via the "runube" command and therefore we must fix the problem.
Thanks,
Jon Sellers
One World XE B7333, Update 3, SP 16.1 rev 3
As/400 (enterprise)
NT 4.0 (client)
WTS
We are having an unusual problem with RunUbe.
Denver has been unable to solve this problem, so any suggestions from the JDELIST would be greatly appreciated.
Here are some facts about the problem:
UBE's operate correctly when executed via Batch Versions (BV) or LaunchUBE.exe. We experience the error only when using RUNUBE.
UBE performs all processing (updates) correctly but ends with either one of these error messages:
1) "Function check. MCH3402 unmonitored by QSQLCLS at statement *N, instruction X'008D'."
2) "Application error. *N unmonitored by *N at statement *N, instruction X'4000'"
On the "View Submitted Jobs" screen, UBEs that receive the first error message show to be in status "Error", UBEs that receive the second error message are shown as status "Done". Either way, the UBE is not finishing normally.
Problem appears to only affect custom UBE's. JDE-written UBE appear to work ok (still verifying this).
Error only occurs when updating the table that the UBE is based upon. Example: Custom columnar UBE is based upon the F0101 business view "V0101C". In the Do Section there is code to update a field on the F0101, such as:
VA rpt_UserReservedNumber = "2"
F0101.Update
BC Long Address Number = TK Long Address Number
VA rpt_UserReservedNumber -> TK User Reserved Number
AS400 SQL Package is deleted prior to running UBE
Error occurs only when Updating records. Custom UBEs that only Insert or Delete records have no trouble.
The UBEs are not complex. They are simple columnar reports created using the RDA wizard. They use no "Smart fields", or custom BSFN's. They use standard ER commands (Like UPDATE) to perform the table maintenance functions.
UBE runs ok (no error) when Updating less than 80,000 records
UBE Produces the error message when updating more than 80,000 records
Here are the complete error messages:
First Error Message:
900 - CALL PGM(B7333SYS/JDB_1) /* The CALL command contains parameters */
- RETURN /* RETURN due to end of CL program */
Member F5445 added to file PRINTQUEUE in B7333SYS.
Pointer not set for location referenced.
Pointer not set for location referenced.
Library SVM7333 already exists in library list.
Exception recursion detected.
Application error. *N unmonitored by *N at statement *N, instruction
X'4000'.
Second Error Message:
900 - CALL PGM(B7333SYS/JDB_1) /* The CALL command contains parameters */
- RETURN /* RETURN due to end of CL program */
Cursor CURSOR25 already open.
Tried to refer to all or part of an object that no longer exists.
SQL system error.
Tried to refer to all or part of an object that no longer exists.
Function check. MCH3402 unmonitored by QSQLCLS at statement *N,
instruction X'008D'.
SQL system error.
Cursor CURSOR25 already open.
Member F3078 added to file PRINTQUEUE in B7333SYS.
A Side Note:
We do not have the luxury of simply not using Runube and using BV/Launchube instead. The production job scheduling package we are using starts all UBEs via the "runube" command and therefore we must fix the problem.
Thanks,
Jon Sellers
One World XE B7333, Update 3, SP 16.1 rev 3
As/400 (enterprise)
NT 4.0 (client)
WTS