Oracle Form Check Box
queria saber si hay alguna funcion que devuelva el valor que tiene un checkbox en la propiedad "Valor si está comprobado" para asignarlo a una variable y cambiar dicho checkbox desde otro check box.
Pongo el codigo que utilizo y os explico lo que hace: son tres checkbox, MEMORIA, DISCO_DURO y MICRO, quiero que cuando este marcado memoria me sume al total solo memoria, cuando marque disco_duro, desabilitar y dejar marcado el checkbox de memoria y que lo sume al total.
No se si me he explicado bien...
Gracias de antemano y aqui os dejo el ejemplo
DECLARE
BEGIN
:BLOCK10.IMPORTE := 1000;
IF CHECKBOX_CHECKED ('BLOCK10.DISCO_DURO') THEN
:BLOCK10.IMPORTE := :BLOCK10.IMPORTE + :BLOCK10.DISCO_DURO;
SET_ITEM_PROPERTY ('BLOCK10.MEMORIA', ENABLED, PROPERTY_FALSE);
-- aqui quiero activar memoria
ELSE
:BLOCK10.IMPORTE := :BLOCK10.IMPORTE + :BLOCK10.DISCO_DURO;
SET_ITEM_PROPERTY ('BLOCK10.MEMORIA', ENABLED, PROPERTY_TRUE);
END IF;
IF CHECKBOX_CHECKED ('BLOCK10.MEMORIA') THEN
:BLOCK10.IMPORTE := :BLOCK10.IMPORTE + :BLOCK10.MEMORIA;
ELSE
:BLOCK10.IMPORTE := :BLOCK10.IMPORTE + :BLOCK10.MEMORIA;
END IF;
IF CHECKBOX_CHECKED ('BLOCK10.DISCO_DURO') THEN
:BLOCK10.IMPORTE := :BLOCK10.IMPORTE + :BLOCK10.MICRO;
ELSE
:BLOCK10.IMPORTE := :BLOCK10.IMPORTE + :BLOCK10.MICRO;
END IF;
END;
Pongo el codigo que utilizo y os explico lo que hace: son tres checkbox, MEMORIA, DISCO_DURO y MICRO, quiero que cuando este marcado memoria me sume al total solo memoria, cuando marque disco_duro, desabilitar y dejar marcado el checkbox de memoria y que lo sume al total.
No se si me he explicado bien...
Gracias de antemano y aqui os dejo el ejemplo
DECLARE
BEGIN
:BLOCK10.IMPORTE := 1000;
IF CHECKBOX_CHECKED ('BLOCK10.DISCO_DURO') THEN
:BLOCK10.IMPORTE := :BLOCK10.IMPORTE + :BLOCK10.DISCO_DURO;
SET_ITEM_PROPERTY ('BLOCK10.MEMORIA', ENABLED, PROPERTY_FALSE);
-- aqui quiero activar memoria
ELSE
:BLOCK10.IMPORTE := :BLOCK10.IMPORTE + :BLOCK10.DISCO_DURO;
SET_ITEM_PROPERTY ('BLOCK10.MEMORIA', ENABLED, PROPERTY_TRUE);
END IF;
IF CHECKBOX_CHECKED ('BLOCK10.MEMORIA') THEN
:BLOCK10.IMPORTE := :BLOCK10.IMPORTE + :BLOCK10.MEMORIA;
ELSE
:BLOCK10.IMPORTE := :BLOCK10.IMPORTE + :BLOCK10.MEMORIA;
END IF;
IF CHECKBOX_CHECKED ('BLOCK10.DISCO_DURO') THEN
:BLOCK10.IMPORTE := :BLOCK10.IMPORTE + :BLOCK10.MICRO;
ELSE
:BLOCK10.IMPORTE := :BLOCK10.IMPORTE + :BLOCK10.MICRO;
END IF;
END;