We are running universe 10.2.10 in pick flavor.

 

I have a program (part of a 4gl subroutine) that simplified does the
following:

 

CITEM = ""

READU CITEM FROM F.FILE, CID THEN

END ELSE

  IF CITEM # "" THEN PRINT "CITEM IS NOT NULL!"

END

 

According to the documentation, when running in pick flavor, the value
of CITEM is unchanged if the read fails.

 

What happens is that CITEM is sometimes assigned to a random value and
not NULL.   Right now it is being assigned to zero.  Last week, this
same CITEM was being assigned to an escape sequence (about 8 characters
long) when the read failed. 

 

CITEM is a non-named common variable.   This issues does NOT happen if
CITEM is not a common variable. 

 

The result also has varied if I use READU vs READ.   Clearly there is a
bug here in retaining the value of CITEM with a READ statement in pick
flavor.   Unfortunately, I have not been able to create a simple example
to reproduce this problem outside of the 4gl.   And this does not happen
in all the code, only in one section so far and IS reproducible in this
one case from logon session to logon session.

 

Any ideas?

 

-Troy

 

_______________________________________________
U2-Users mailing list
[email protected]
http://listserver.u2ug.org/mailman/listinfo/u2-users

Reply via email to