• valid in a get

    From Marco Boschi@21:1/5 to All on Thu Apr 14 06:28:29 2022
    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

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)
  • From Marco Boschi@21:1/5 to All on Wed May 11 07:47:53 2022
    Il giorno giovedì 14 aprile 2022 alle 15:28:30 UTC+2 Marco Boschi ha scritto:
    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
    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

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)