Jeff,
If you look below at the variable value, you can see there is a blank
between the PDF names and it is supposed to be like that; that blank
takes care of it...
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of jdavis@xxxxxxxx
Sent: Thursday, May 01, 2008 1:45 PM
To: RPG programming on the AS400 / iSeries
Subject: RE: Variable length
Here could be the problem;
v_PDFFiles = v_PDFFILES + ' ''' + c_Cst + %Trim(PDFName) + '''';
Should look like
v_PDFFiles = v_PDFFILES + '''' + c_Cst + %Trim(PDFName) + '''';
There is an extra blank in the string.
Jeff Davis
"Florin Todor - YYZ Concord" <ftodor@xxxxxxxxxxxxxxxx>
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
05/01/2008 12:42 PM
Please respond to
"RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
To
"RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
cc
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.
midrange.com
