Re: DSPF FILE CHANGE -- RPG400-L

No, it doesn't. But everything will compile, which is what you want. You're
very welcome.

In a message dated 12/12/2008 4:04:55 P.M. Jerusalem Standard Time,
pesfunk@xxxxxxxxx writes:

Hi,

Yes i have already tried this method. It does replaces but never moves the
extra characters to the next line when the length overflows.(max 80
characters in a line).

Anyhow, that for that quick tip. It helped me change many of the items.

Thanks a lot all of you.

Regards
Manish

On Fri, Dec 12, 2008 at 2:38 PM, <Asher613Smith@xxxxxxx> wrote:

This process will mean you set up the find/replace conditions just once,
then repeatedly press F16/F17.

You can use REPLACE ALL, instead of having to repeatedly press F17. Use F14
to select replace all.

In a message dated 12/12/2008 3:34:45 P.M. Jerusalem Standard Time,
vhamberg@xxxxxxxxxxx writes:

Manish

I have to guess because you did not tell us - but are these REFFLD
keywords? If so, and if the library and file are the same for all, you
can use the REF keyword at file level. Here is the documentation from
the DDS manual - a must-read.

"Use this file-level keyword to specify the name of a file from which
field descriptions are to be retrieved or when you want to duplicate
descriptive information from several fields in a previously described
record format. You can code the file name once here rather than on
REFFLD keywords with each of the field descriptions that refer to the
file. To refer to more than one file, use the REFFLD keyword. (REF can
be specified only once.)"

Also, look at this link for guidance on when to use REF and REFFLD and
how to use them -

http://publib.boulder.ibm.com/iseries/v5r1/ic2924/info/dds/rbafpmstappa.htm

If you can take advantage of this for all or most of the fields, then
there are ways to this easier - 25 option in PDM, F15, and, perhaps,
macros (if using iSeries Access emulation). The idea is to remove
completely the file from the REFFLD keywords.

This process will mean you set up the find/replace conditions just once,
then repeatedly press F16/F17.

Be very careful!!! Review these steps very closely. Try the various
options by themselves, to see what they do. Copy a couple members to a
different file, or just do the first 2 or 3. It will be even more
painful if you make changes that should not be made!

Run WRKMBRPDM over the source file member that contains your DSPF source.

1. Press F17 to filter down to DSPFs, just in case there are any other
member source types in the source file.
2. At the top of the list, put the 25 opt (Find string) on the first
member, then press F13 to repeat the option for the entire list.
3. Press Enter.
5. Put REF( into the "Find" field. This is to find any of these, to see
if they are different from the file you named on the REFFLD keywords. If
there are no REF keywords, or if the file named there is the same as the
one on most of your REFFLD keywords, your task is easier. You can then
go to the rest of this process.
6. After you've gone through all the members, go back to the top of the
member list.
7. At the top of the list, put the 25 opt (Find string) on the first
member, then press F13 to repeat the option for the entire list.
8. Go through the list and blank out the Opt for those that should not
be processed.
9. Press Enter.
10. Put the LIB/FILE string into the "Find" field, preceded by a space.
Be sure to put full quote marks around the string.
Example: " MANBOI/REFFILE" where REFFILE is the file named on all
or most of the REFFLD keywords.
11. On the "Find String" prompt, change "Action" to 2 (Edit). Be sure
"Print list" is N and "Parameters" is empty.
12. Press Enter.
13. When the first member opens up, press F14 (Find/Change options).
14. In the "Change" field put 2 full quote marks - "". Set "Occurrences
to process" to 1 (Next), "Records to search" to 1 (All), "Kind of match"
to 2 (Ignore case), and "Allow data shift" to Y (Yes). These settings
will now be maintained for all the rest of the members that match the
Find string.
15. Press F16 - if the Find string is found in a REFFLD, press F17.
16. Repeat step 15 until you have changed all that should be changed.

An alternative to 14-16 - if you know for certain that the Find string
is not in a REF keyword, and that the Find string will only be in REFFLD
keywords, then you can set "Occurrences to process" to 2 (All) and then
just press F17.

17. Go to the beginning of the member and see if there is a REF keyword
at file level. If not, add one, with the newly named reference file. If
there is, it probably has been changed already. If not, add it to the
source. You could even record a macro for this (if using iSeries Access
emulation).
18. Press F3 to exit and save.

Good luck
Vern

manish soni wrote:

Dear All,

>

I am stuck in a big problem. I need to change around 30 display files

where

the library of fields needs to be changed from MANBOI to GEPRGSDATA.

Now

since GEPRGSDATA is bigger than MANBOI, it is getting overflowed to

line many a times. I have around 50 fields in every display files. It is

a

massive work to change all of them and the C MANBOI GEPRGSDATA at the

top
is

not helpful.

My question is, Is there a technique in display files where i can just

write
> at the top of the program, define MANBOI to GEPRGSDATA ?
>

Thanks for your reply
Manish

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

**************Make your life easier with all your friends, email, and
favorite sites in one place. Try it now.
(

http://www.aol.com/?optin=new-dp&icid=aolcom40vanity&ncid=emlcntaolcom00000010

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

--
Regards
Manish Soni