×
The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.
I have a strange problem going on with one of my RPG programs. The program is a REST web service and we are using CGIDEV2 and YAJL. In one of my sub-procedures, I call a procedure that is part of CGIDEV2 called ZhbGetInput. Here is the prototype:
D ZhbGetInput pr 10i 0
D SavedQueryString...
D 32767 varying options(*varsize)
D qusec 516 options(*varsize)
I call it like this in the sub-procedure:
inputCount = ZhbGetInput(savedQuery: QUSEC);
These fields are defined as global fields as follows:
DCL-S InputCount int(10);
DCL-S SavedQuery varchar(32767);
I /include the definition for QUSEC from the CGIDEV2 source.
Here is where it gets interesting. If the SavedQuery field is defined as less than 32767, the ZhbGetInput procedure blows up every other time I call the web service with a low level "pointer not set for location referenced" error in program QRNXINIT. The process aborts and doesn't even return the error to my program. The first time I call the program, it always works. Also, if I move the definition of the SavedQuery field into the sub-procedure where it is used, it also causes the same error every other time the program is called. The field is only used on the call to ZhbGetInput. It seems like when the program bombs, it cleans things up and then the next call is successful.
Anyone seen anything like this before? I assume something is trampling on memory and messing things up, but I don't know where to look. We are on V7R1, upgrading soon to V7R3.
If I need to provide more of the program code, let me know.
Dean Eshleman
Software Development Architect
Everence
______________________________________________________________________
Confidentiality Notice: This information is intended only for the individual or entity named. If you are not the intended recipient, do not use or disclose this information. If you received this e-mail in error, please delete or otherwise destroy it and contact us at (800) 348-7468 so we can take steps to avoid such transmission errors in the future. Thank you.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact
[javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.