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



In free format
clear *all filenamer;

I think I had to do it this way to get the key fields cleared after a chain.

Personally, I'd used an SQL statement to get the max number

Exec Sql
Select max(custnbr) into :custNo from custmstr where...

Then you don't have to worry about it

-----Original Message-----
From: RPG400-L <rpg400-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of James H. H. Lampert via RPG400-L
Sent: Thursday, April 28, 2022 2:58 PM
To: RPG programming on the IBM i / System i <rpg400-l@xxxxxxxxxxxxxxxxxx>
Cc: James H. H. Lampert <jamesl@xxxxxxxxxxxxxxxxx>
Subject: Clearing all fields of a record in preparation to write a new one

I'm trying to remember:

I have a scenario in which I will need to find the last customer number
in a file, increment that customer number, and then write a new record,
with initial values for only a few of the fields.

Is there an easy way, using traditional RPG scatter-gather I/O, to clear
out all the fields of the record?

--
JHHL

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.