Es un
Image Control Kuk, y en el evento
MouseDown que tengo, vienen éstas variables:
Código COBOL:
01 POW-ARG-BUTTON PIC S9(4) COMP-5.
01 POW-ARG-SHIFT PIC S9(4) COMP-5.
01 POW-ARG-X PIC S9(9) COMP-5.
01 POW-ARG-Y PIC S9(9) COMP-5.
PROCEDURE DIVISION USING POW-ARG-BUTTON POW-ARG-SHIFT POW-ARG-X POW-ARG-Y.
Supongo que será algo así como
Código COBOL:
IF POW-ARG-BUTTOM = ?????????
Pero no sé exactamente con qué compararla :confused: :confused:
Un saludo.-