• Jueves 25 de Abril de 2024, 11:15

Autor Tema:  Problemas en Batch Input con el Scroll  (Leído 4085 veces)

kroatonthejoker

  • Nuevo Miembro
  • *
  • Mensajes: 1
    • Ver Perfil
Problemas en Batch Input con el Scroll
« en: Miércoles 23 de Julio de 2008, 17:13 »
0
Buenas,

Estoy programando un Batch Input para la transacción 9KE0,  y tengo que meter un número elevado de registros en la tabla de la transacción.

El problema lo tengo porque soy incapaz de avanzar registros mediante el scroll. Si hago una grabación el código que me devuelve es '/00', el mismo que dándole al intro... sin embargo con este código lo único que se consigue es sobreescribir de nuevo la primera línea, en el caso en el que escribo de línea en línea. Si realizo la copia de 15 registros de golpe pues se sobreescriben los 15 registros, pero sigo sin avanzar la página.


Os muestro el trozo de código donde lo realizo línea a línea:
Código: Text
  1.  
  2.   PERFORM inserta USING :   'X' 'SAPLPCPP   '      '1000',
  3.                             ' ' 'RKB1S-FORM'    '8A-001',
  4.                             ' ' 'RPCAP-PLDAT'   l_fecha,
  5.                             ' ' 'RPCAP-DOCTY'   'A0',
  6.                             ' ' 'RPCAA-BUDAT'   l_fecha,
  7.                             ' ' 'BDC_OKCODE'    '=SPLN'.
  8.  
  9.   PERFORM inserta USING :   'X' 'SAPLKPP0'      '1000',
  10. *                            ' ' 'BDC_SUBSCR'    c_subscreen,
  11.                             ' ' 'KPP0B-VALUE(01)' '1000',
  12.                             ' ' 'BDC_OKCODE'    '=CSUB'.
  13.  
  14.   PERFORM inserta USING :   'X' 'SAPLKPP2'      '0103',
  15.                             ' ' 'BDC_CURSOR'    'Z-BDC02(01)',
  16.                             ' ' 'BDC_OKCODE'    '/00'.
  17.  
  18. * Introducir cada dato de la tabla en el Scroll de pantalla.
  19.   CLEAR: l_numero.
  20.   LOOP AT t_file.
  21.     PERFORM inserta USING :   'X' 'SAPLKPP2'      '0103'.
  22.     CLEAR: l_cadena.
  23.  
  24.     PERFORM inserta USING :   ' ' 'Z-BDC02(01)'   t_file-cebe.
  25.  
  26.     PERFORM inserta USING :   ' ' 'Z-BDC03(01)'   t_file-col1.
  27.  
  28.     PERFORM inserta USING :   ' ' 'Z-BDC04(01)'   t_file-col2.
  29.  
  30.     PERFORM inserta USING :   ' ' 'BDC_OKCODE'    '/00'.
  31.   ENDLOOP.
  32.  
  33.   PERFORM inserta USING :   'X' 'SAPLKPP2'      '0103'.
  34.   PERFORM inserta USING :   ' ' 'BDC_OKCODE'    '=CBUC'.
  35.  
  36.   data: itab type BDCMSGCOLL occurs 0 with header line.
  37.   CALL TRANSACTION '9KE0' USING i_bdc_tab MODE 'A'
  38.                           MESSAGES INTO itab.
  39.  
  40.  
  41. *----------------------------------------------------------------------
  42. *   FORM inserta
  43. *----------------------------------------------------------------------
  44. *   Introduce una entrada en la tabla I_BDC_TAB
  45. *----------------------------------------------------------------------
  46. FORM inserta  USING dynbegin name value.
  47.   IF dynbegin = 'X'.
  48.     CLEAR i_bdc_tab.
  49.     i_bdc_tab-program = name.
  50.     i_bdc_tab-dynpro = value.
  51.     CONDENSE i_bdc_tab-dynpro NO-GAPS.
  52.     i_bdc_tab-dynbegin = 'X'.
  53.     APPEND i_bdc_tab.
  54.   ELSE.
  55.     CLEAR i_bdc_tab.
  56.     i_bdc_tab-fnam = name.
  57.     i_bdc_tab-fval = value.
  58.     CONDENSE i_bdc_tab-fval NO-GAPS.
  59.     APPEND i_bdc_tab.
  60.   ENDIF.
  61. ENDFORM.                    "inserta
  62.  
  63.  

¿Qué solución le daríais?

Un saludo.
PD: También he probado con P+ y nada :(

Luar23

  • Nuevo Miembro
  • *
  • Mensajes: 3
    • Ver Perfil
Re:Problemas en Batch Input con el Scroll
« Respuesta #1 en: Jueves 28 de Julio de 2011, 16:56 »
0

Hola,

       kroatonthejoker, oye yo tambien tengo el mismo, problema tambien quiero insertar varios registros en una tabla, para la transaccion VL02N, pero esta pantalla solo llega a 20 posiciones, tu pudistes resolver este problema de avanzar pagina para insertar los nuevos registros, si la encontrastes no me puedes orientar como hacerle, ta anexo mi correo.

raul2330@hotmail.com

Saludos y gracias.