Re: Record locking

["Quazy" <quazy@xxxxxxxxxxxx>]

No the chain that locks up is trying to check to see if the record is in
existence with the deleted flag, and if it is there it does a update and if
it is not then I do a write.   Everything works fine if I delete the record
and then exit the program, and then go back in and recreate it.    The
problem is when I delete the record and then recreate the record without
exiting the program.


----- Original Message -----
From: "Jim Langston" <jlangston@conexfreight.com>
To: <RPG400-L@midrange.com>
Sent: Tuesday, May 30, 2000 5:14 PM
Subject: Re: Record locking


> It seems to me that you are trying to add a record that already exists.
If you
> do not delete the record, as you state, but just turn on a Record Deleted
type
> flag (we do the same thing in one of our files) then the record is still
there.  If
> you are not allowing duplicate keys, and the user "recreates it" then
arent' they
> creating a duplicate record?  And you would then be getting an error when
the
> duplicate record key was attempted to be written.
>
> I think what you actually want to do, is just change the Deleted Record
field back
> to not deleted and Update the record, not Write it.
>
> Regards,
>
> Jim Langston
>
> Quazy wrote:
>
> > I have a program that when a user deletes a record it just marks the
record for delete, that way all the data is all still there if we need to
get it back.   But if a user decides they did not want to delete the record
and recreates it before they exit that portion of the app they cant because
the record is still locked.   I have tried using the unlck command and I
have tried closing the file and opening it back up again but nothing seems
to work.   the lock gets hung up on a chain command.       Am I just doing
this wrong or what, any suggestions would be greatly appreciated.   Thanks
Chris
>
> +---
> | This is the RPG/400 Mailing List!
> | To submit a new message, send your mail to RPG400-L@midrange.com.
> | To subscribe to this list send email to RPG400-L-SUB@midrange.com.
> | To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator:
david@midrange.com
> +---
>

+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---