PDA

Ver la Versión Completa : Ayuda para ejecutar funcion


Irua
09/08/07, 19:58:34
:) Hola necesito por favor que me oriente con lo siguiente:

Tengo el siguiente codigo el cual me crea cuentas de red, pero necesito verificar que antes que cree la cuenta esta exista, si es asi dar un mensaje de que la cuenta ya existe sino que se cree.

Para verificar la existencia de la cuenta o no tengo otro comando y utilizando la misma funcion con la misma tabla, pero esto me da error :(

CALL FUNCTION 'SXPG_COMMAND_EXECUTE'
EXPORTING
COMMANDNAME = 'z_verifica'
ADDITIONAL_PARAMETERS = T_PA0002-vl_usua
IMPORTING
STATUS = vl_status
* EXITCODE =
TABLES
EXEC_PROTOCOL = T_PA0002
IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.


CALL FUNCTION 'SXPG_COMMAND_EXECUTE'
EXPORTING
COMMANDNAME = 'Z_CREARUSUARIO'
ADDITIONAL_PARAMETERS = T_PA0002-VL_PARAMETRO
IMPORTING
STATUS = MSJ
* EXITCODE =
TABLES
EXEC_PROTOCOL = T_PA0002
IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.

saludos