Need to Hold the record

, ,
1

Hi ,

I need to hold a record and try to access the same record from another program to get NAT3145.I used GET command to hold the record by one program and when i tried to update the records by another program its working fine. Can some help me on this?

Thanks,
Arun

2

Arun,

You can stay in your READ loop longer by rolling out while you have the record on hold.

Define #SECONDS to be (I2) in this example.

#SECONDS := 30
G1. GET MY-FILE #ISN
CALL ‘CMROLL’ #SECONDS
UPDATE (G1.)
END TRANSACTION

Meanwhile, run the same program from another session while this is rolled out. You will assuredly get the NAT3145 condition.

3

Thanks Brian! It is working :smiley: