Re: Radio Button Cluster Tile

#20
The basic functionality is now there and working.

However I am now looking to refine some areas.
When the user selects radio button RB31 I want to only turn on the next level or radio buttons (L5_ON)
if the local variable flg is set to wn_
Here is where flg is set to wn_

Code: Select all

	(defun RB11_FLAG ()
	(setq flg "wn_")					;store flange type
	);end rb11_flag
.

And here is the original code for RB_31

Code: Select all

(action_tile "rb31"				 	;toggle #150 option
	"(L5_ON)(RB31_FLAG)"				;"(SET_WLRE90_IMAGE)"
	); END ACTION TILE
.

This is what I have tried, but it does not work!

Code: Select all

	(action_tile "rb31"			;toggle #150 option
	(if 
		(= flg wn_)			;if variable weldneck flange selected do this 
		(progn
		(L5_ON)
		(RB31_FLAG)
		);end progn
;---------------------------;			;otherwise  if ANY of bl/so/scr/sl are set do this
      (progn
		(setq newtile $key)
		(RB31_FLAG)
		(F_NAME)
		(READ_DIM_FILE)
		)
	) ;_ end of if	
	); END ACTION TILE
.
Having selected RB11 (Weldneck Flanges)
When I select RB31 none of the radio buttons in L5 turn on??

Any hints at where I'm going wrong?
S.

Re: Radio Button Cluster Tile

#21
Now resolved:

Code: Select all

(action_tile "rb31"			;toggle #150 option
	"(if 
		(= flg \"wn_\")			;if variable weldneck flange selected do this 
		(progn
		(L5_ON)
		(RB31_FLAG)
		);end progn
;---------------------------;			;otherwise  if ANY of bl/so/scr/sl are set do this
      (progn
		(setq newtile $key)
		(RB31_FLAG)
		(F_NAME)
		(READ_DIM_FILE)
		)
	)" ;_ end of if	
	); END ACTION TILE
.

S.