Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

valid in a get

106 views
Skip to first unread message

Marco Boschi

unread,
Apr 14, 2022, 9:28:30 AM4/14/22
to
Hi,
I have some GETS
LOCAL nOne, nTwo , nThree nFour, nFive , nSix

STORE 0 TO nOne, nTwo , nThree nFour, nFive , nSix
CLEAR GETS

@ 10 , 10 GET nOne VALID myval()
@ 10 , 10 GET nTwo
@ 10 , 10 GET nThree VALID myval()
@ 10 , 10 GET nFour
@ 10 , 10 GET nFive VALID myval()
@ 10 , 10 GET nSix

READ
after some calculations I want to refresh only the GET that have myval() as postblock

FOR i := 1 TO LEN( GETLIST )
IF getlist[ i ]:postblock = ???? which is the conditions
oMyGet:display()
ENDIF
NEXT i

Marco Boschi

unread,
May 11, 2022, 10:47:54 AM5/11/22
to
Here's a little workaround:

I use the "message" clause improperly

vtn := "myval()"

@ vt + tr[i_say] - 1, vl + tc[i_say] -1 GET &ntn ;
PICTURE tp[i_say] ;
WHEN &wtn ;
VALID &vtn ;
MESSAGE vtn

in refresh function

FOR iCal := 1 TO LEN( GETLIST )
IF GETLIST[ iCal ]:message = "myval()"
GETLIST[ iCal ]:display()
ENDIF
NEXT iCal


0 new messages