CheckBox en Form con SUBMIT

[gabriel.martinez]

Buenos días, estoy intentado recibir el valor de un Checkbox que está en un Form, después de pulsar en el botón SUBMIT y no aparece en la lista de parametros.
He modificado tutor12.prg, añadiendo un CHECKBOX con ID 'mycheck', al pulsar en botón Enviar debería aparecer en la respuesta de tutor12_srv.prg, pero no lo hace.

Código: Seleccionar todo

// {% LoadHrb( 'lib/tweb/tweb.hrb' ) %}

#include {% TWebInclude() %}

function main()

   LOCAL o, oWeb
   
   DEFINE WEB oWeb TITLE 'Tutor 12' INIT
   
   DEFINE FORM o ACTION 'tutor12_srv.prg'
   
   INIT FORM o 
 
      ROWGROUP o
         GET ID 'myid' VALUE '123' GRID 4 LABEL 'Id.' OF o
         GET ID 'myphone' VALUE '567' GRID 4 LABEL 'Phone' OF o
	CHECKBOX ID 'mycheck' ON GRID 1 LABEL 'Check' OF o
      ENDROW o
      ROWGROUP o
         BUTTON LABEL 'Enviar' GRID 4 SUBMIT OF o 
      ENDROW o
   END FORM o
retu nil

Debería aparecer una línea con mycheck ON, pero el resultado es

Parameters


myid 123
myphone 567

[gabriel.martinez]

He solucionado el problema con un poco de código Javascript y añadiendo un GET oculto para guardar el valor del checkbox.

function main()

LOCAL o, oWeb

DEFINE WEB oWeb TITLE 'Tutor 12' INIT

DEFINE FORM o ACTION 'tutor12_srv.prg'

INIT FORM o

ROWGROUP o
GET ID 'myid' VALUE '123' GRID 4 LABEL 'Id.' OF o
GET ID 'myphone' VALUE '567' GRID 4 LABEL 'Phone' OF o
CHECKBOX ID 'mycheck' ON GRID 1 LABEL 'Check' ACTION 'MyCheck()' OF o
GET ID 'valorcheck' VALUE 'on' TYPE 'hidden' OF o
ENDROW o

ROWGROUP o
BUTTON LABEL 'Enviar' GRID 4 SUBMIT OF o
ENDROW o

HTML o
<script>
function MyCheck() {

$('#valorcheck').val( $('#mycheck').prop('checked') ? 'on' : 'off')
}
</script>
ENDTEXT
END FORM o

retu nil

He optado por usar la opción "Citar Texto" del foro, porque con la opción "Mostrar código" no aparece completo el código, sólo se puede ver lo que muestra la ventana.

El resultado de ejecutar tutor12.prg modificado

Parameters


myid 123
myphone 567
valorcheck off

[ramirezosvaldo]

Gracias!!!
Saludos