Hi there,
i try to change a little program wich is not written by me.
In this Procedure a Radio-Set is created.
Now my question : How can i make a choose of trigger for one of this radio buttons.
* Radio-buttons*/
create radio-set whRS
assign row = (6.7)
column = (13.14)
height-chars = 0.77
width-chars = 2.0
frame = frame {&FRAME-NAME}:handle
horizontal = false
bgcolor = 8
auto-resize = true
.
i = 0.
whRS
RIVATE-DATA = "".
for each rbdok where rbdok.typ = sh_cStTyp no-lock:
i = i + 1.
lDummy = whRS:add-last(rbdok.titel, i).
whRS
RIVATE-DATA = whRS
RIVATE-DATA + (if whRS
RIVATE-DATA <> "" then "," else "") + string(rowid(rbdok)).
end. /* for each rbdok where ... */
-----------------------------------------------------------------------------------
in one case the screen-value of one Radio-button is "sales", comes from rbdok
Here is my first try to make a choose of trigger, but it doesent work.
ON CHOOSE OF whRS
DO:
if whRS:screen-value ="Sales" then do:
message " Sales is chosen" view-as alert-box.
end.
END.
Thanks for your help.
make
i try to change a little program wich is not written by me.
In this Procedure a Radio-Set is created.
Now my question : How can i make a choose of trigger for one of this radio buttons.
* Radio-buttons*/
create radio-set whRS
assign row = (6.7)
column = (13.14)
height-chars = 0.77
width-chars = 2.0
frame = frame {&FRAME-NAME}:handle
horizontal = false
bgcolor = 8
auto-resize = true
.
i = 0.
whRS

for each rbdok where rbdok.typ = sh_cStTyp no-lock:
i = i + 1.
lDummy = whRS:add-last(rbdok.titel, i).
whRS



end. /* for each rbdok where ... */
-----------------------------------------------------------------------------------
in one case the screen-value of one Radio-button is "sales", comes from rbdok
Here is my first try to make a choose of trigger, but it doesent work.
ON CHOOSE OF whRS
DO:
if whRS:screen-value ="Sales" then do:
message " Sales is chosen" view-as alert-box.
end.
END.
Thanks for your help.
make