Re: Multi user programming?

> Suppose I'm running a program which is used to edit a record.  Now let us
say
> I'm in edit mode, editing a record.  And when I try to run the same
program in
> one more terminal and try to edit the same record, which is already used
by
> one more user, the system shows blank screen with "X" at the bottom.  How
to
> rectify this problem.  How do the network programming works.  How to lock
and
> unlock the records.
>
> Can u help me in this regards,
>
> Rajendren K. G.
> TMSI. INDIA.
>

No program should ever(99.999%)  go down for a locked wait on a record.
You should never leave a locked record on the screen during user key/think
time.


Have RTNDTA on DDS format of the "Change Screen"
Have one is externally defined data structure(DSx) of file being updated
Have one standalone field(Fldx)  big enough to hold the above D/S.

Get Record with No-Lock
Eval   Fldx  = DSx
Put record on screen.
User changes info
Chain to file,
IF     DSx <> Fldx
     Some one has changed record in the mean time.
     send error message represent the screen to redo input
Else
READ screen format again(this is the reason for RTNDTA)
Update file
End

No locked waits EVER,,   No blind updates by someone else in meantime EVER.

This is a system design problem.   This should have been thought of before
you get
500+ programs out there that lock a record for update and put it up on the
screen.
Shop Standards!

Person gets record,   Program puts screen up,  Person goes to lunch or 4hr
meeting.

Not Good.

John Carr

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