× 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.



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.


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

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.