We are on an IBM AIX 5.3 box with 32 CPU and 32GB of memory running
Universe 10.2.4 As we've increased our user count I'm noticing several
applications that use the INPUTIF statement coming to the top of CPU
usage. We have users that go into a product record, lock it, and then
leave their desk or go onto something else leaving the lock and
therefore keeping other people out of updating that record. We use the
INPUTIF with a timer loop to gracefully exit the program and release the
record if there hasn't been activity in 10 minutes.
In testing, it's the INPUTIF statement that's utilizing the CPU, not the
timer calculation.
Is there a better, less CPU intensive way to do this?
Thanks in advance.
Here's the code we currently employ:
OK = 0 ; START.DT = DATE() ; START.TM = TIME(); TIME.OUT = 900 LOOP
INPUTIF PSN THEN OK = @TRUE ELSE
OK = ((DATE()-START.DT)*86400)+TIME()-START.TM > TIME.OUT
IF OK THEN
IF EDIT.FLG THEN PSN = '' ELSE PSN = 'Q'
END
END
UNTIL OK DO
REPEAT
Eric Rosenzweig
[email protected]
_______________________________________________
U2-Users mailing list
[email protected]
http://listserver.u2ug.org/mailman/listinfo/u2-users
