Thanks for your reply Paul - but the problem doesn't happen until its gone through tens of thousands of times
I know it's a problem with one record - but that one record is far into the read of the file
Alan Shore
E-mail : ASHORE@xxxxxxxx
Phone [O] : (631) 200-5019
Phone [C] : (631) 880-8640
'If you're going through hell, keep going.'
Winston Churchill
-----Original Message-----
From: Therrien, Paul [mailto:ptherrien@xxxxxxxxxxx]
Sent: Friday, October 30, 2020 9:22 AM
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxxxxxxxx>
Cc: Alan Shore <ashore@xxxxxxxx>
Subject: [EXTERNAL] RE: Problem with view that uses an SQL function created from a procedure within a service program
Use F22 to step into the procedure instead of F10. (Green screen debug)
-----Original Message-----
From: MIDRANGE-L [mailto:midrange-l-bounces@xxxxxxxxxxxxxxxxxx] On Behalf Of Alan Shore via MIDRANGE-L
Sent: Friday, October 30, 2020 8:55 AM
To: midrange-l@xxxxxxxxxxxxxxxxxx
Cc: Alan Shore <ashore@xxxxxxxx>
Subject: Problem with view that uses an SQL function created from a procedure within a service program
Hi everyone
We are on V7r3
We have a view that is created using a couple of SQL functions created from procedures within one service program Whenever the view is accessed For example Select * from view It aborts with QRY2293 Query cannot be run - see lower level messages Looking at the job log, I see Decimal data error.
Application error. MCH1202 unmonitored by QC2UTIL1 at statement
0000000005, instruction X'0000'.
User-defined function error on member VIEW.
F1 on Decimal data error doesn't show me anything
F1 on User-defined function displays that the user defined function is ITEMPHYSICAL, which is the SQL function from the procedure in the service program So I tried STRDBG SRVPGM(PRODPA/ITMMSTSP) Which is the service program, pressing F10 I can see that it goes into the service program, where I press F12 to continue - hoping that it will stop in the service program where the problem is But it doesn't Does anyone know how to debug this situation?
As always - all replied gratefully accepted
Alan Shore
E-mail : ASHORE@xxxxxxxx<mailto:ASHORE@xxxxxxxx>
Phone [O] : (631) 200-5019
Phone [C] : (631) 880-8640
'If you're going through hell, keep going.'
Winston Churchill
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit:
https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://archive.midrange.com/midrange-l.
Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related questions.
Help support midrange.com by shopping at amazon.com with our affiliate link:
https://amazon.midrange.com
midrange.com
