Re: Updating a program described file

[Jeff Young <cooljeff913@xxxxxxxxx>]

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