Re: User space

   This will probably work for me.  I will need to read without lock to
   display, and with lock to update.
   For the user space I just need to set the pointer in the *inzsr.  Once I
   learned how to use it, it is very simple, even easier than the data area.

   Buck wrote:

 Raul wrote:

  

    I did use a data area before, but I had problems because it got locked
    while an user updated it.
    

 Hm.  I've used data areas in very high volume situations and not had that
 problem.  Here is code that works for me.

 D SWTEND          S              1
 C     *DTAARA       DEFINE                  SWTEND
 C     *LOCK         IN        SWTEND
 C                   MOVE      '0'           SWTEND
 C                   OUT       SWTEND

 To read the data area without locking it, I just do an IN operation.

 How did you have the data area defined?
   --buck



 _______________________________________________
 This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
 To post a message email: RPG400-L@xxxxxxxxxxxx
 To subscribe, unsubscribe, or change list options,
 visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
 or email: RPG400-L-request@xxxxxxxxxxxx
 Before posting, please take a moment to review the archives
 at http://archive.midrange.com/rpg400-l.