Re: Updating a program described file

That is correct.
The end result of his FTP script will be to delete a file on the remote system, but that is not the issue here.
The question the OP asked was how to update selected records in his script file which was located in a source menber in QCLSRC.
The issue that was at question was that the QCLSRC file was internaly defined, and he was attempting to use the UPDATE op code to update the record. That op code requires either an external defined file record name, or a data structure as the result field when using an internal defined file.


Jeff Young
Sr. Programmer Analyst
IBM -e(logo) server Certified Systems Exper - iSeries Technical Solutions V5R2
IBM Certified Specialist- e(logo) server i5Series Technical Solutions Designer V5R3
IBM Certified Specialist- e(logo)server i5Series Technical Solutions Implementer V5R3









----- Original Message ----
From: Booth Martin <booth@xxxxxxxxxxxx>
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>
Sent: Tuesday, February 26, 2008 5:40:11 PM
Subject: Re: Updating a program described file

In other words, even if it works, it won't be deleting any members that way?



Jeff Young wrote:

Booth,
The file is opened to either the first member or via an ovrdbf to the specified member.
Using the Update op code, the program just updates the record in the file for the menber that was opened.

Jeff Young
Sr. Programmer Analyst
IBM -e(logo) server Certified Systems Exper - iSeries Technical Solutions V5R2
IBM Certified Specialist- e(logo) server i5Series Technical Solutions Designer V5R3
IBM Certified Specialist- e(logo)server i5Series Technical Solutions Implementer V5R3









----- Original Message ----
From: Booth Martin <booth@xxxxxxxxxxxx>
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>
Sent: Tuesday, February 26, 2008 3:28:06 PM
Subject: Re: Updating a program described file

Is there time for a *duh* question from a programmer that will be
red-faced in a few minutes??

I understood that the update opcode was to update a record, not a
member? I don't understand how this would work, even if were made to work?

Jeff Young wrote:

Another solution would be to add a data structure for the source file to the program and use that for his I/O:
FQCLSRC UF F 92 DISK
IQCLSRC AA 01
*
D SOURCE E DS EXTNAME(QCLSRC)
C *entry plist
C parm filename 24
*
C read QCLSRC SOURCE
*
C eval SrcDta = 'delete ' + filename
C update qclsrc SOURCE
*
C eval *inlr = *on


Jeff Young
Sr. Programmer Analyst
IBM -e(logo) server Certified Systems Exper - iSeries Technical Solutions V5R2
IBM Certified Specialist- e(logo) server i5Series Technical Solutions Designer V5R3
IBM Certified Specialist- e(logo)server i5Series Technical Solutions Implementer V5R3