Ok. After reading a bit more on your email. Seems like you are using
value of v_pdffiles to construct a PDF command. Could it be because the
PDF command only allow max of 1024 charater in the PDS files parameter.
In other word, the limitation is actually on the PDF command not the RPG
program.
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Lim Hock-Chai
Sent: Thursday, May 01, 2008 1:20 PM
To: RPG programming on the AS400 / iSeries
Subject: RE: Variable length
The error messages you indicated in your email are
A matching apostrophe not found.
A matching parenthesis not found.
Error found on *N command.
Errors occurred in command.
What program generates these error messages? Are you calling another
program/procedure and passing v_pdffiles as a param to this
program/procedure?
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Florin Todor - YYZ
Concord
Sent: Thursday, May 01, 2008 1:18 PM
To: RPG programming on the AS400 / iSeries
Subject: RE: Variable length
Lim, I do not pass this variable as a parameter; I populate it inside
the program...
I am going to force an error and to dump it to see the whole value of
the variable as you and Adam suggested...
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Lim Hock-Chai
Sent: Thursday, May 01, 2008 2:12 PM
To: RPG programming on the AS400 / iSeries
Subject: RE: Variable length
The limit is on the debugger, not RPG. Varying length field is widely
used in RPG community and truncation is NOT the likely problem.
When you call the program with v_pdffiles as the parameter, how do you
pass this parm? Every varying length field has two addition bytes in
the front of the field that RPG uses to keeps track of the length of the
field. You must be careful when passing varying length field as a
param.
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Florin Todor - YYZ
Concord
Sent: Thursday, May 01, 2008 12:43 PM
To: RPG programming on the AS400 / iSeries
Subject: RE: Variable length
Actually I do not receive an *escape message, the concatenation process
simply doesn't work; when I look in job log, I see something like that:
A matching apostrophe not found.
A matching parenthesis not found.
Error found on *N command.
Errors occurred in command.
Regarding the value of v_pdffiles, I copied it here just the end of it,
taken from debugger (as you can see it is truncated after 1024
characters; there were supposed to be around 1600):
.....................................................................
721 'Reporting/Inv_70010095225.pdf' '/Reporting/Inv_70010095266.p'
781 'df' '/Reporting/Inv_70010095274.pdf' '/Reporting/Inv_7001009'
841 '5308.pdf' '/Reporting/Inv_70010095332.pdf' '/Reporting/Inv_7'
901 '0010095357.pdf' '/Reporting/Inv_70010095571.pdf' '/Reporting'
961 '/Inv_70010095589.pdf' '/Reporting/Inv_70010095597.pdf' '/Rep'
1021 'orti'
I believe the error created in job log for concatenation command is
because of this truncation...
The value of s_index doesn't really matter at this point; I'm using it
here (for value of 1) only to initialize v_pdffiles...
Thanks
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Lim Hock-Chai
Sent: Thursday, May 01, 2008 12:33 PM
To: RPG programming on the AS400 / iSeries
Subject: RE: Variable length
If you take option D (dump) when received *escape message on the
concatenation command error, what is the content of v_PDFFiles and
v_Index in the dump spool file.
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Florin Todor - YYZ
Concord
Sent: Thursday, May 01, 2008 10:40 AM
To: RPG programming on the AS400 / iSeries
Subject: RE: Variable length
D v_PDFFiles S 1700 varying
D v_Index S 2 0
.............................................
If v_Index = 1;
v_PDFFiles = '''' + c_Cst + %Trim(PDFName) + '''';
Else;
v_PDFFiles = v_PDFFILES + ' ''' + c_Cst + %Trim(PDFName) + '''';
Endif;
(c_cst = constant; PDFName = field from a file)
..............................................
The idea is to populate this variable with names of PDF files residing
in IFS (names are read from PDFName field from a file) in order to use
it as input parameter for concatenation of PDF's command.
If the number of read records exceed a certain value and the v_PDFfiles
variable exceed 1024, the variable is truncated and, obviously, the
concatenation command ends in error...
Hopefully this will help.
Thank you
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Kurt Anderson
Sent: Thursday, May 01, 2008 11:07 AM
To: RPG programming on the AS400 / iSeries
Subject: RE: Variable length
BTW, I declared the variable in two ways: with and without "varying"
keyword, with the same results.
This sounds like a debugger issue, or at least not a Varying issue if it
still happens when you don't specify the Varying keyword. Though
without code to see it's all guesswork.
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at
http://archive.midrange.com/rpg400-l.
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at
http://archive.midrange.com/rpg400-l.
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at
http://archive.midrange.com/rpg400-l.
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at
http://archive.midrange.com/rpg400-l.
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at
http://archive.midrange.com/rpg400-l.
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at
http://archive.midrange.com/rpg400-l.
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe,
unsubscribe, or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at
http://archive.midrange.com/rpg400-l.
midrange.com
