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

Sure...if that was the only criteria, it would be equivalent.

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

In that case just use:

CPYF FROMFILE(VV) TOFILE(BB) INCCHAR(*RCD 1 *NE 'D')

(Note the *RCD parm)


Michael Ryan wrote:
> 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.
>>
>>
--
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.