Re: Wiping a file on open in RPG

Tried to see if there was an Fspec option on an OUTPUT file to say
overwrite and I didn't see any. And nothing grabbed me by the gills on
OVRDBF. You might be best off with your proposed solution. Even tried the
following to see if there was some default on an OUTPUT file and ended up
with 10 rows when I ran it twice (even used JHHL rpg):
FT20240111 O E DISK
* create table rob.t20240111 (myts timestamp) RCDFMT R20240111
C 1 DO 5
C EVAL MYTS = %TIMESTAMP()
C WRITE R20240111
C ENDDO
C SETON LR

On Tue, Jan 9, 2024 at 3:24 PM James H. H. Lampert via RPG400-L <
rpg400-l@xxxxxxxxxxxxxxxxxx> wrote:

On 1/9/24 12:11 PM, Bryan Dietz wrote:

i scanned some source i accumlated for "_Ropen"

it can be used in RPGLE.

Right. I've had more than one occasion to use runtime calls more
idiomatic to C, but here, I was looking for something that was
RPG-native and RPG-idiomatic.

And Scott said:

I mean... yes you can do this, but... if the only reason is to
clear the file, wouldn't it be easier to just run CLRPFM prior to
opening it?

I quite agree. In this case, lacking a native equivalent, it would
probably be easier to make the file USROPN, and wipe the file by
shelling out a CLRPFM with QCMDEXC, than to use the _Rxxxxx calls.

--
JHHL
--
This is the RPG programming on IBM i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.