change value of toggle box using button

[urikoa]

Hi

I need to check all toggle boxes using my check all button.
following my code, but it still won`t update my toggle-box when clicking the buttons.
What do I need to do in order to change the toggle box value when pushing the button ?




DEFINE VARIABLE doc AS LOGICAL VIEW-AS TOGGLE-BOX LABEL "documentation" .
DEFINE BUTTON selectall LABEL "Select All".
DEFINE BUTTON clearall LABEL "Clear All".

FORM
doc COLON 15
selectall COLON 10
clearall COLON 25 SKIP
with frame a width 80 attr-space side-labels NO-BOX THREE-D .

ENABLE selectall WITH FRAME a.

ON CHOOSE OF selectall

DO:
doc = YES .

END.

ON CHOOSE OF clearall

DO:

doc = NO .
END.


UPDATE selectall clearall doc WITH FRAME a.

 

[sphipp]

Try:

ON CHOOSE OF selectall

DO:
doc = YES .
DISPLAY doc WITH FRAME a.
END.

 

[urikoa]

Thanks , it`s working .