midrange.com code scratchpad |
Name:
SURENDER KANTHASWAMY
|
Scriptlanguage:
Plain Text
|
Tabwidth:
4
|
Date:
05/10/2021 03:08:59 pm
|
IP:
Logged
|
|
Description:
Issue with RPG Service Program which is used for IWS
I am facing this weird issue which I am not able to identify using the job
log. It will be more helpful if anyone points me in the right direction to
identify the issue.
I created a Service Program which I will configure in IWS Service. Whenever
a request comes from the External world this Service program is the first
program which will be executed.
I am getting the input in JSON format and I am using the DATA-INTO and
DATA-GEN opcodes in the Service program module for parsing and generating
the JSON.
Now, in the Service program module i have one of the below line
data-gen DS_Input %data(Wrk_Input:'doc=string countprefix=num_')
%gen('YAJLDTAGEN');
I am getting this error while executing this code,
Pointer not set for location referenced.
Error caused procedure _QRNI_GLOB in program *LIBL/YAJLDTAGEN to stop
during initialization.
Error RNX8001 occurred while running the program or procedure for the
DATA-GEN operation.
Any response will be very much appreciated.
|
Code:
- Detailed Job Log
-
- Ownership of object FLDSPACE in QTEMP type *USRSPC changed.
- Ownership of object FLDSPACE in QTEMP type *USRSPC changed.
- Ownership of object FLDSPACE in QTEMP type *USRSPC changed.
- Ownership of object FLDSPACE in QTEMP type *USRSPC changed.
- Ownership of object FLDSPACE in QTEMP type *USRSPC changed.
- Ownership of object FLDSPACE in QTEMP type *USRSPC changed.
- Pointer not set for location referenced.
- Error caused procedure _QRNI_GLOB in program *LIBL/YAJLDTAGEN to stop
- during initialization.
- Error RNX8001 occurred while running the program or procedure for the
- DATA-GEN operation.
- Pointer not set for location referenced.
- Error caused procedure GPMSGSGR in program *LIBL/PROGRAMA to stop
- during initialization.
- Pointer not set for location referenced.
- Error caused procedure PROGRAMB in program *LIBL/PROGRAMB to stop
- during initialization.
- Application error. RNX8001 unmonitored by PROGRAMB at statement *N,
- instruction X'0000'.
|
|
|