|
Dear Sir or Madam, I am using CGIDEV2 to develop web applications using the iSeries. Attached is a job log of a RPGLE compile. I'm define 507 fields at 6063 characters and the program compiles just fine. When I go to 508 fields at 6073 characters the program does not compile giving me the attached job log. More information listed below. Steve -----Original Message----- From: Stephen D. Engel [mailto:sengel@xxxxxxxxxx] Sent: Monday, February 23, 2004 9:52 AM To: bvstone@xxxxxxxxxxxx Subject: Have you seen this? Hi Brad, I have a program that uses: d/copy ktxxcopyle,prototypeb d/copy ktxxcopyle,variables3 d/copy ktxxcopyle,usec and c /copy ktxxcopyle,prolog3 c eval scrdbcoid = ZhbGetVar('scrdbcoid') to read in data from the browser. The attachment shows a compiler error. I am reading in MANY fields from the browser in this application. There appears to be a compiler limit as to how many fields (or how many fields x character length) can be defined after PROLOG3 using ZHBGETVAR. I am switching this from the CGIEXTRDS model and am running into this issue for the first time. Any ideas on how to get around this issue? Thanks Steve
midrange.com
5722SS1 V5R1M0 010525 Display Job Log
S1044D1G 02/23/04 08:18:10 Page 1
Job name . . . . . . . . . . : CLW1052 User . . . . . . : SENGEL
Number . . . . . . . . . . . : 239058
Job description . . . . . . : QSDEJOBD Library . . . . . : QGPL
MSGID TYPE SEV DATE TIME FROM PGM
LIBRARY INST TO PGM LIBRARY INST
CPF1124 Information 00 02/23/04 08:14:06 QWTPIIPP
QSYS 067E *EXT *N
Message . . . . : Job
239058/SENGEL/CLW1052 started on 02/23/04 at 08:14:06
in subsystem QBATCH in QSYS. Job entered
system on 02/23/04 at 08:14:06.
CPI1125 Information 00 02/23/04 08:14:06 QWTPIIPP
QSYS 02DC *EXT *N
Message . . . . : Job
239058/SENGEL/CLW1052 submitted.
Cause . . . . . : Job
239058/SENGEL/CLW1052 submitted to job queue QBATCH in
QGPL from job 239051/SENGEL/QPADEV0006.
Job 239058/SENGEL/CLW1052 was
started using the Submit Job (SBMJOB)
command with the following job
attributes: JOBPTY(4) OUTPTY(4) PRTTXT()
RTGDTA(QCMDB) SYSLIBL(QSYS
QSYS2 QHLPSYS QUSRSYS)
CURLIB(*CRTDFT) INLLIBL(SENGEL50 TIMV50QUAL
CLOCFILE50 TIMEGLOB50 TIMEKEEP50
KTSRCV50 QGPL QTEMP) LOG(4 00
*NOLIST) LOGCLPGM(*NO) INQMSGRPY(*RQD)
OUTQ(/*DEV) PRTDEV(PRT01) HOLD(*NO)
DATE(*SYSVAL) SWS(00000000)
MSGQ(QUSRSYS/SENGEL) CCSID(37) SRTSEQ(*N/*HEX)
LANGID(ENU) CNTRYID(US) ALWMLTTHD(*NO).
*NONE Request 02/23/04 08:14:06 QWTSCSBJ
*N QCMD QSYS 0173
Message . . . . : -CRTBNDRPG
PGM(SENGEL50/CLW1052)
SRCFILE(SENGEL50/KWPTSRC)
SRCMBR(CLW1052) REPLACE(*YES)
CPC2206 Completion 00 02/23/04 08:14:11 QSYCHONR
QSYS 048D QLIINSRT QSYS 0323
Message . . . . : Ownership of object
QRNFER in QTEMP type *USRSPC changed.
Cause . . . . . : The ownership of
object QRNFER in library QTEMP type
*USRSPC has changed.
CPC2206 Completion 00 02/23/04 08:14:11 QSYCHONR
QSYS 048D QLIINSRT QSYS 0323
Message . . . . : Ownership of object
QRNFEF in QTEMP type *USRSPC changed.
Cause . . . . . : The ownership of
object QRNFEF in library QTEMP type
*USRSPC has changed.
MCH4216 Escape 40 02/23/04 08:15:27 VOXERROR
0031CC QBNCRTMD QSYS *STMT
To module . . . . . . . . . : QBNCRTMD
To procedure . . . . . . . : main_module
Statement . . . . . . . . . : 951
Message . . . . : Automatic storage for
procedure exceeds maximum.
Cause . . . . . : The object was not
created because an internal system
limit was reached. Not enough automatic
storage was available to allocate a
data object within a procedure. Recovery
. . . : Reduce the number or
size of automatic data objects within
the procedure. Technical description .
. . . . . . . : The current offset in
automatic storage of the next
available byte is 16767616 bytes and the
maximum offset is 16776703 bytes.
The number of bytes required to allocate
the data object is 32769. The
dictionary index for the data object is
14968, the dictionary entry is
X'0804000100000001000000000000800100000000000000001000800000000000', and the
offset to the dictionary entry is 478996
bytes. The dictionary index for
the procedure is 1, the dictionary entry
is
X'170100010000000000001DD8000325C600000005000000000000002011010030', and the
offset to the dictionary entry is 52
bytes. The VLIC log note ID is
01004468.
CPF93B6 Information 10 02/23/04 08:15:30 QPDSERR
QSYS 083C QBNFFDC QSYS 00C3
Message . . . . : Problem log updated.
Cause . . . . . : A problem was detected
on the system, however no problem
log entry was created. This is because
a problem log entry already exists
that describes this problem. Existing
problem log entry ID 0405357317 was
updated to show this problem occurred
again.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 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.
