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



Thanks Carel, but I am able to execute this from the debug line:
EVAL chds1 = a5kfld

chds is defined like this:

* DS to display long character variable values
D chDS DS
D chDS1 1 1024A
D chDS2 1025 2048A
D chDS3 2049 3072A
D chDS4 3073 4096A
D chDS5 4097 5120A

I am changing the program now so I will do something like:

* version #2
* DS to display long character variable values
D chDS DS
D chDSall 1 5120A
D chDS1 1 1024A
D chDS2 1025 2048A
D chDS3 2049 3072A
D chDS4 3073 4096A
D chDS5 4097 5120A


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Carel Teijgeler
Sent: Thursday, September 27, 2012 8:31 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: Re: Using eval on debug command line

I think EVAL in DEBUG is only to change the value of a variable during the debug session. Not to use as a replacement of an RPG code line.

So it is :

Debug . . . EVAL chds = "Mytext"

Regards,
Carel Teijgeler

*********** REPLY SEPARATOR ***********

On 27-9-2012 at 13:39 Gary Thompson wrote:

Why do I get an "Assignment type error occurred."
when I code an eval on the debug command line that attempts to copy a
5k byte field into a data structure?

Example:
Debug . . . EVAL chds = a5kfld

The identical statement executes in code, but not from my debug command
line.

I have a module that I use in rpgle where an sql statement has
parameter markers that must be replaced with a user-selected value.

the fields passed to the module are 5k bytes and when I want to view
these fields in debug I have been coding an eval to copy the long field
to a DS that breaks the field into 1024 byte segments I can display,
but I would like to avoid the code, just include the chds that breaks
the field into 1024 byte segments, and enter the EVAL from the command
line.


--
This is the RPG programming on the IBM i / System i (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.



-----
Geen virus gevonden in dit bericht.
Gecontroleerd door AVG - www.avg.com
Versie: 10.0.1382 / Virusdatabase: 2441/5291 - datum van uitgifte:
09/25/12



--
This is the RPG programming on the IBM i / System i (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.