P0002 consulta

[Mario23]

buenas

Soy consultor funcional y quiero armar una función para ejecutar dentro del programa HRCALC00 quisiera saber como terminarlo, o si de esta forma estaría OK.
Mi interés en P0002 es solo que me de a conocer el sexo del empleado y que me lo devuelva en el programa asi puedo ejecutar reglas propias.

las respuestas van a ser mas que agradecidas.
Saludos

*---------------------------------------------------------------------*

* FORM OPZ_SEX *

*---------------------------------------------------------------------*

* Averigua el sexo del empleado

*---------------------------------------------------------------------*

FORM opz_sex.



DATA: l_gesch TYPE PA0002-gesch.



* Busco el sexo de la persona

SELECT SINGLE GESCH

FROM PA0002

INTO l_gesch

WHERE PERNR = PERNR-PERNR.



* Salida

ot-z_sex = l_gesch.



ENDFORM

[DavidXD_XD]

Hola, lo puedes hacer de esta forma si quieres una funcion local (PERFORM)

FORM get_sex USING p_pernr TYPE pernr-pernr
             CHANGING p_sex TYPE pa0002-gesch.

  CLEAR p_sex.  

  SELECT SINGLE gesch
    INTO p_sex
      FROM pa0002
        WHERE pernr = p_pernr.

ENDFORM.

Si lo deseas como funcion global (Transaccion SE37) entonces debes definir un parametro en la pestaña Import, ahi entraria el p_pernr y otro en la pestaña Export, ahi va el p_sex y en el codigo aplicas la misma rutina que colocaste, o el que coloque, al final arroja el mismo resultado, espero te pueda ayudar

[Mario23]

David

Muchas gracias, voy a probar con esa forma. Intente de contactarte por varios medios por busquedas laborales de mi consultora para Peru.
En caso de estar interesado chequea tu skype e email.

Saludos y muchas gracias.