Re: OPNQRYF to delete records using a position in the record as a selection criteria

I wonder if you could do it backwards? Select the records you want to
*keep*, then use CPYFRMOQRYF to copy those records to a temp file, then CPYF
the temp file records with MBROPT(*REPLACE) back to the original file.

On 10/5/06, Booth Martin <booth@xxxxxxxxxxxx> wrote:

Opnqryf orders  the file, including selections.  A program can then add,
update, or delete to the file, but it has to be done in a program.

Al Barsa wrote:
> Hi,
>
> My remembrance is that OPNQRYF only reports, and does not update/delete
> data, but I could be wrong.
>
> Al
>
> Al Barsa, Jr.
> Barsa Consulting Group, LLC
>
> 400>390
>
> "i" comes before "p", "x" and "z"
> e gads
>
> Our system's had more names than Elizabeth Taylor!
>
> 914-251-1234
> 914-251-9406 fax
>
> http://www.barsaconsulting.com
> http://www.taatool.com
> http://www.as400connection.com
>
>
>
>
>              "Charles
>              St-Laurent"
>              <dringpiece@hotma
                                          To
>              il.com>                   midrange-l@xxxxxxxxxxxx
>              Sent by:
cc
>              midrange-l-bounce
>              s@xxxxxxxxxxxx
                                        Subject
>                                        OPNQRYF to delete records using a
>                                        position in the record as a
>              10/05/2006 09:10          selection criteria
>              AM
>
>
>              Please respond to
>              Midrange Systems
>                  Technical
>                 Discussion
>              <midrange-l@midra
>                  nge.com>
>
>
>
>
>
>
> Hi!
>
> I would like to know if it is possible to delete records from a file
with
> the command OPNQRYF only if the first char of the record is equal to
'D'. I
> don't know the name of the field at that position when I use the command
in
> my CLP... Something like:
>
> If (%subst(Record:1:1) = 'D')
>     Delete Record
>
> directly in a OPNQRYF command...
>
> Thanks in advance for your answers
> Charles
>
>
>
> --
> This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/midrange-l.
>
>
>
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.