Mensaje status del sistema activo

[marianoboni]

Bueno días:
Probando un programa que hace uso de la BAPI :
al ejecutarse en forma anormal, ejemplo tonto no fue suministrado un dato, el sistema informa el resultado en la forma estandard, ahora una ves echa la corrección o al volver a entrar al programa y ejecutarlo me informa el siguiente mensaje:

EBS 013El status del sistema ALMA está activo (EQU 10000282)

Y no me permite continuar!
Se agredace cualquier ayuda!!!!!

[DavidXD_XD]

Hola ... puedes usar la SE37 y colocar los parametros que colocas en programa, lo unico que queda para hacer funcionar una BAPI (a esperiencia propia) son las siguientes formas:

1. Buscar en la web algun ejemplo para esa BAPI
2. Debuggear la BAPI e irse de frente al mensaje de error y retroceder (metodo cangrejo ), cuando estas en modo debugg realiza lo siguiente

breakpoints->Breakpoints en->Sentencia

Dentro de la sentencia coloca la sentencia MESSAGE y dale ENTER y despues F8, el programa parará dentro de la primera sentencia MESSAGE que encuentre ... ahi deberás ver porque la BAPI no corre ...

3. Postear la BAPI para que podamos ver de cual se trata, tal vez sea una conocida

[marianoboni]

Disculpen me comí el nombre de la bapi, todo funciona perfecto hasta que por ejemplo me salta alguna validación en el cuerpo de la BAPI, entonces por mas q la corrija es como que queda en un estado en q no me permite seguir y no me reinicia el estado interno de la transacción, acá va el procedimiento

FORM persistirMovimiento.

DATA:
posActual TYPE I,
e_Error like bapiret2,
mensage TYPE STRING,
loc_e_lineas LIKE e_LINEA_DOCU ,
loc_e_serials LIKE e_nrosDeSerie ,
sel_rows TYPE lvc_t_roid,
sel_row TYPE lvc_s_roid,
e_serial LIKE e_LINEA_SERIAL .

REFRESH sel_rows.
CLEAR sel_row.

IF e_LINEAS IS INITIAL.
MESSAGE ID 'ZMIGO_EXCEPCIONES' TYPE 'S' NUMBER '002'.
EXIT.
ENDIF.

posActual = 0.

CLEAR t_mensages.

CLEAR l_goodsmvt_header.

l_goodsmvt_header-pstng_date = FE_FECHACONT.
l_goodsmvt_header-doc_date = FE_DOCUMENTO .
l_goodsmvt_header-pr_uname = sy-uname.
l_goodsmvt_header-header_txt = TXT_TEXTOCAB.
l_goodsmvt_header-ref_doc_no = ''.

* Tipo de movimiento
l_goodsmvt_code = '01'.

* Posiciones
CLEAR i_goodsmvt_item.

* recorro cada linea del pedido
LOOP AT e_LINEAS INTO loc_e_lineas.

* verifico si se encuentra marcado como OK
IF loc_e_lineas-OK = 'X'.

CLEAR loc_e_serials.

posActual = posActual + 1.
cantRecepcionada = 0.
loc_e_serials = loc_e_lineas-NROS .
DESCRIBE TABLE loc_e_serials.
cantRecepcionada = SY-TFILL.


i_goodsmvt_item-plant = TXT_IDCENTRO .
i_goodsmvt_item-stge_loc = loc_e_lineas-ALMAC.
i_goodsmvt_item-VENDOR = loc_e_lineas-NROPRO.
i_goodsmvt_item-move_type = TXT_IDMOV .
i_goodsmvt_item-MVT_IND = 'B'.
i_goodsmvt_item-PO_NUMBER = loc_e_lineas-NROPO.
i_goodsmvt_item-po_item = loc_e_lineas-POSPO.
i_goodsmvt_item-ENTRY_QNT = cantRecepcionada .
APPEND i_goodsmvt_item.

* Numeros de serie
LOOP AT loc_e_serials INTO e_serial.
i_goodsmvt_serial-MATDOC_ITM = posActual.
i_goodsmvt_serial-SERIALNO = e_serial-NRO.
append i_goodsmvt_serial.
ENDLOOP.


ENDIF.

ENDLOOP.

IF posActual = 0.
MESSAGE ID 'ZMIGO_EXCEPCIONES' TYPE 'S' NUMBER '010'.
EXIT.
ENDIF.


CLEAR i_return.

* Persistencia del documento de ingreso

CALL FUNCTION 'BAPI_GOODSMVT_CREATE'
EXPORTING
goodsmvt_header = l_goodsmvt_header
goodsmvt_code = l_goodsmvt_code
testrun = ''
IMPORTING
goodsmvt_headret = l_goodsmvt_headret
materialdocument = l_materialdocument
matdocumentyear = l_matdocumentyear
TABLES
goodsmvt_item = i_goodsmvt_item
GOODSMVT_SERIALNUMBER = i_goodsmvt_serial
return = i_return .
break-point.

IF SY-SUBRC = 0.
describe table i_return lines sy-tfill.

append i_return to t_mensages.

IF i_return-TYPE <> 'E'.
if sy-tfill = 0.
COMMIT WORK.
MESSAGE ID 'ZMIGO_EXCEPCIONES' TYPE 'S' NUMBER '006' WITH
l_materialdocument.
PERFORM reiniciarMovimiento.
endif.
ELSE.
CALL SCREEN 001 starting at 15 10 ENDING AT 70 15 .

ENDIF.

ENDIF.

ENDFORM.

[DavidXD_XD]

Hola ... bueno personalmente no he realizado ningun ingreso de mercancias utilizando esa BAPI, pero si he realizado otras cosas ... lo primero que t aconsejo es esto ...

Dentro de la tabla interna i_goodsmvt_item colocale tbm el codigo del material ya que internamente realiza una comparacion entre ambas tablas internas por dicho codigo (i_goodsmvt_serial)

Nos cuentas como te fue ...

[marianoboni]

Muchas grácias por la sugerencia, para resolver este tema, hice algo tan simple como restringir por GUI los datos escenciales a obligatorios ( jua q tonto! ), por lo que no volvi a tener el mismo problema!
Creo poder dar como cerrado este tema.
Gracias!

[eetejada]

Buenos dias marianoboni,

Acutalmente tengo ese mismo problema y me esta volviendo loco, podrias por favor ser mas especifico en cuanto al proceso que realizaste para resolver este punto???

Muchas gracias y feliz dia.