PDA

Ver la Versión Completa : Batch input para llenar tabla transparente...


bacha
28/02/08, 17:15:01
Hola compañeros, hoy vengo con una mas de todas mis dudas!... jeje

Alguien sabe como hacer una batch input que me guarde de la clasica base de datos de SQL (la llamada Northwind) a una tabla transparente en sap ?

Gracias.

sconoredhot
28/02/08, 17:35:22
Hola, tendrias que tratar de pasar primero los datos de Northwind a un archivo TXT, para después hacer un batch input desde SAP haciendo un gui_upload y pasando esos datos a la tabla transparente previamente creada.

bacha
28/02/08, 20:43:36
Gracias sconoredhot.... pero no tendrias informacion un poco mas grafica (manual, documento).... Estoy empezando en esto es por eso que alguna informacion no se me aclara a la primera... jeje

Saludos!

larmadovr
28/02/08, 20:59:01
El objetivo es pasar datos de una tabla SQL a una transparente(Z) en SAP?

si es así no necesitas un batch input, solo hay que cargar los datos desde un archivo plano o un excel y que los modifique en la tabla transparente. Y se puede hacer con un programa tipo reporte.

Si es así dime y te mando un ejemplo. O explicame un poco más para saber el motivo de hacer un batch input, ya que generalmente el batch se utiliza para generar un juego de datos que será ejecutado posteriormente desde la SM35 y que simulará un usuario interactuando con la operación de una transacción.

Explicame para ayudarte mejor amigo.

Saludos

bacha
28/02/08, 22:35:50
El objetivo es pasar datos de una tabla SQL a una transparente(Z) en SAP?

si es así no necesitas un batch input, solo hay que cargar los datos desde un archivo plano o un excel y que los modifique en la tabla transparente. Y se puede hacer con un programa tipo reporte.

Si es así dime y te mando un ejemplo. O explicame un poco más para saber el motivo de hacer un batch input, ya que generalmente el batch se utiliza para generar un juego de datos que será ejecutado posteriormente desde la SM35 y que simulará un usuario interactuando con la operación de una transacción.

Explicame para ayudarte mejor amigo.

Saludos


Si... mira, tengo la base de datos NORTHWIND en access, lo que quiero hacer es cargarla a una tabla Z en sap con sus mismas caracteriscatas obviamente.


GRacias por la informacion extra sobre los batch inputs... me fue muy util !!

Estoy al tanto de la respuesta!

zonanet
28/02/08, 23:59:47
Hola bacha!!

Trata con este manual, es muy sencillo de entender.

http://www.mundosap.com/foro/downloads.php?do=file&id=212

Saludos.

bacha
29/02/08, 14:07:36
Hola bacha!!

Trata con este manual, es muy sencillo de entender.

http://www.mundosap.com/foro/downloads.php?do=file&id=212

Saludos.

Gracias ZOnanet.. me podrias dar una pequeña explicacion en como usar el programa esque esta en portugues o algo asi.....

zonanet
29/02/08, 14:10:38
Gracias ZOnanet.. me podrias dar una pequeña explicacion en como usar el programa esque esta en portugues o algo asi.....


Creo que te mandé mal la dirección, si me das tu correo te lo hago llegar, es en español y viene con un ejemplo aunque sencillo bien explicado.

Saludos!

bacha
29/02/08, 14:42:00
Creo que te mandé mal la dirección, si me das tu correo te lo hago llegar, es en español y viene con un ejemplo aunque sencillo bien explicado.

Saludos!


Claro, mira es: Bachask8@gmail.com


Espero respuesta ! :)

larmadovr
29/02/08, 17:46:00
El siguiente ejemplo llena una tabla Z llamada ZRUTA_ARCH que tomé solo como un ejemplo, y te explico brevemente que hace.

1.- Tienes que tener un excel con los datos que deseas llenar en la tabla Z
2.- Tienes que tener tu tabla Z ya previamente creada con los tipos de datos homologados a tu access(como sabemos no son iguales, pero no pasa nada, por que el excel lo toma como cadena, solo ten cuidado que en la tabla Z haya numericos, char, string, package o N, de acuerdo a la necesidad)
3.- Modifica la tabla interna que hay en el programa de acuerdo a tus necesidades de campos
4.- La estructura tienes que hacer referencia a tu tabla Z
5.- Ya que esta llena la tabla interna hace un loop para empezar a pasar datos de la tabla interna a la estructura, esto para no tener problemas por compatibilidad de datos
6.- Hace un modify para que no haya duplicados, en el insert podria marcar error.
7.- Hace el commit work
8.- Listo, ve a ver tu tabla Z para que confirmes los registros que acabas de meter.


Empezamos.

REPORT zpruebas_lavr MESSAGE-ID zttl LINE-SIZE 130.

*---------------------------------------------------------------------*
* INCLUDE PARA DEFINICIÓN DE DATOS *
*---------------------------------------------------------------------*
INCLUDE zpruebas_lavr_t001.

*---------------------------------------------------------------------*
* INCLUDE PARA DEFINICIÓN SUBRUTINAS *
*---------------------------------------------------------------------*
INCLUDE zpruebas_lavr_f001.

*---------------------------------------------------------------------*
* EVENTO START-OF-SELECTION *
*---------------------------------------------------------------------*
START-OF-SELECTION.

* Lee un archivo xls y lo carga en una tabla interna
PERFORM f_lee_archivo.

* Recorre tabla interna y va cargando datos en tabla Z
PERFORM f_modifica_tabla_z.


*----------------------------------------------------------------------*
* ZPRUEBAS_LAVR_T001 *
*----------------------------------------------------------------------*


*----------------------------------------------------------------------*
* Definición de parámetros de entrada *
*----------------------------------------------------------------------*
SELECTION-SCREEN BEGIN OF BLOCK param WITH FRAME TITLE text-001.

PARAMETERS: ruta LIKE rlgrap-filename OBLIGATORY DEFAULT
'C:\CARPETA\ARCHIVO.XLS' LOWER CASE.

SELECTION-SCREEN END OF BLOCK param.

*----------------------------------------------------------------------*
* Definición de tablas internas *
*----------------------------------------------------------------------*

* Tabla que almacena los registros de las filas y columnas de xls
DATA: BEGIN OF i_excel OCCURS 0,
fila LIKE alsmex_tabline-row,
columna LIKE alsmex_tabline-col,
valor LIKE alsmex_tabline-value,
END OF i_excel.

* Tabla que almacena los campos que vienen del archivo
* Estos pueden variar de acuerdo a la tabal que deseamos llenar
DATA: BEGIN OF ti_archivo OCCURS 0,
mandt LIKE zruta_arch-mandt,
id LIKE zruta_arch-id,
progname LIKE zruta_arch-progname,
ruta LIKE zruta_arch-ruta,
END OF ti_archivo.

*----------------------------------------------------------------------*
* Definición de estructuras *
*----------------------------------------------------------------------*
* Se crea una estructura para poder hacer el modify directo a la tabla Z
* y evitar errores por tipos de datos
DATA: BEGIN OF s_zruta_arch.
INCLUDE STRUCTURE zruta_arch.
DATA: END OF s_zruta_arch.

*----------------------------------------------------------------------*
* ZPRUEBAS_LAVR_F001 *
*----------------------------------------------------------------------*


*&---------------------------------------------------------------------*
*& Form F_LEE_ARCHIVO
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
FORM f_lee_archivo.

* Función que descarga datos desde archivo excel
CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'
EXPORTING
filename = ruta
i_begin_col = '1'
i_begin_row = '1'
i_end_col = '4' " NUMERO DE CAMPOS DE ARCHIVO
i_end_row = '65000'
TABLES
intern = i_excel
EXCEPTIONS
inconsistent_parameters = 1
upload_ole = 2
OTHERS = 3.

IF sy-subrc EQ 0.
* Función para llenar datos descargados en tabla interna
PERFORM f_llena_tabla.
ELSE.
MESSAGE i001 WITH text-002.
ENDIF.

ENDFORM. " F_LEE_ARCHIVO
*&---------------------------------------------------------------------*
*& Form f_llena_tabla
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
FORM f_llena_tabla.

LOOP AT i_excel.
CASE i_excel-columna.
WHEN '1'.
MOVE i_excel-valor TO ti_archivo-mandt.
WHEN '2'.
MOVE i_excel-valor TO ti_archivo-id.
WHEN '3'.
MOVE i_excel-valor TO ti_archivo-progname.
WHEN '4'.
MOVE i_excel-valor TO ti_archivo-ruta.
ENDCASE.
AT END OF fila.

APPEND ti_archivo.
CLEAR ti_archivo.
ENDAT.
ENDLOOP.

ENDFORM. " f_llena_tabla
*&---------------------------------------------------------------------*
*& Form F_MODIFICA_TABLA_Z
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
FORM f_modifica_tabla_z.

LOOP AT ti_archivo.
IF sy-subrc EQ 0.
* Se mueven el registro de la tabal interna a la estructura
MOVE-CORRESPONDING ti_archivo TO s_zruta_arch.
* Se utiliza el modify en lugar de inser, para que haya problemas si se
* duplica algun registro por error, o por que lo ejecutes N veces
MODIFY zruta_arch FROM s_zruta_arch.
* Graba en tabla transparente
COMMIT WORK.
CLEAR: ti_archivo, s_zruta_arch.
ENDIF.
ENDLOOP.

ENDFORM. " F_MODIFICA_TABLA_Z

Listo, si tienes alguna duda, estoy para servirte.

Saludos.

bacha
29/02/08, 18:07:43
larmadovr MUCHAS GRACIAS... voy a probar este ejemplo !!!
:D

larmadovr
29/02/08, 20:23:19
Saludos desde Mexico, no se donde estes tu.

"El conocimiento es como el fuego, que tiene que ser encendido por un agente externo, pero se propaga por si solo"

bacha
29/02/08, 21:05:38
Saludos desde Mexico, no se donde estes tu.

"El conocimiento es como el fuego, que tiene que ser encendido por un agente externo, pero se propaga por si solo"


Gracias, oie tambien soy de Mexico, de muy certa de tu estado de TAmaulipas !.


Oie larmadovr, fijate que ya lo intente y solo me mete un registro y dentro de el solo el mandante esta escrito... ningun campo mas se escribio, nose que estoy haciendo mal..... te dejo mi codigo para ver si le puedes hechar un vistaso:


*&---------------------------------------------------------------------*
*& Report ZVACIAR_A_TABLA_Z
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*

REPORT ZVACIAR_A_TABLA_Z.
**---------------------------------------------------------------------*
** INCLUDE PARA DEFINICIÓN DE DATOS *
**---------------------------------------------------------------------*
*INCLUDE zpruebas_lavr_t001.
*
**---------------------------------------------------------------------*
** INCLUDE PARA DEFINICIÓN SUBRUTINAS *
**---------------------------------------------------------------------*
*INCLUDE zpruebas_lavr_f001.

*---------------------------------------------------------------------*
* EVENTO START-OF-SELECTION *
*---------------------------------------------------------------------*
START-OF-SELECTION.

* Lee un archivo xls y lo carga en una tabla interna
PERFORM f_lee_archivo.

* Recorre tabla interna y va cargando datos en tabla Z
PERFORM f_modifica_tabla_z.


*----------------------------------------------------------------------*
* ZPRUEBAS_LAVR_T001 *
*----------------------------------------------------------------------*


*----------------------------------------------------------------------*
* Definición de parámetros de entrada *
*----------------------------------------------------------------------*
SELECTION-SCREEN BEGIN OF BLOCK param WITH FRAME TITLE text-001.

PARAMETERS: ruta LIKE rlgrap-filename OBLIGATORY DEFAULT
'C:\Documents and Settings\kayros FI\Escritorio\BDD NORTHWIND\customers.xlsx' LOWER CASE.

SELECTION-SCREEN END OF BLOCK param.

*----------------------------------------------------------------------*
* Definición de tablas internas *
*----------------------------------------------------------------------*

* Tabla que almacena los registros de las filas y columnas de xls
DATA: BEGIN OF i_excel OCCURS 0,
fila LIKE alsmex_tabline-row,
columna LIKE alsmex_tabline-col,
valor LIKE alsmex_tabline-value,
END OF i_excel.

* Tabla que almacena los campos que vienen del archivo
* Estos pueden variar de acuerdo a la tabal que deseamos llenar
DATA: BEGIN OF ti_archivo OCCURS 0,
mandt LIKE sy-mandt,
customerid LIKE ZNW_CUSTOMERS-ZNW_CUSTOMERID,
companyname LIKE znw_customers-znw_companyname,
contactname LIKE znw_customers-znw_contactname,
contacttitle LIKE znw_customers-znw_contacttitle,
address LIKE znw_customers-znw_address,
city LIKE znw_customers-znw_city,
region LIKE znw_customers-znw_region,
postalcode LIKE znw_customers-znw_postalcode,
country LIKE znw_customers-znw_country,
phone LIKE znw_customers-znw_phone,
fax LIKE znw_customers-znw_fax,
END OF ti_archivo.

*----------------------------------------------------------------------*
* Definición de estructuras *
*----------------------------------------------------------------------*
* Se crea una estructura para poder hacer el modify directo a la tabla Z
* y evitar errores por tipos de datos
DATA: BEGIN OF s_zruta_arch.
INCLUDE STRUCTURE znw_customers.
DATA: END OF s_zruta_arch.

*----------------------------------------------------------------------*
* ZPRUEBAS_LAVR_F001 *
*----------------------------------------------------------------------*


*&---------------------------------------------------------------------*
*& Form F_LEE_ARCHIVO
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
FORM f_lee_archivo.

* Función que descarga datos desde archivo excel
CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'
EXPORTING
filename = ruta
i_begin_col = '1'
i_begin_row = '1'
i_end_col = '4' " NUMERO DE CAMPOS DE ARCHIVO
i_end_row = '65000'
TABLES
intern = i_excel
EXCEPTIONS
inconsistent_parameters = 1
upload_ole = 2
OTHERS = 3.

IF sy-subrc EQ 0.
* Función para llenar datos descargados en tabla interna
PERFORM f_llena_tabla.
ELSE.
*MESSAGE i001 WITH text-002.
ENDIF.

ENDFORM. " F_LEE_ARCHIVO
*&---------------------------------------------------------------------*
*& Form f_llena_tabla
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
FORM f_llena_tabla.

LOOP AT i_excel.
CASE i_excel-columna.
WHEN '1'.
MOVE i_excel-valor TO ti_archivo-mandt.
WHEN '2'.
MOVE i_excel-valor TO ti_archivo-CUSTOMERID.
WHEN '3'.
MOVE i_excel-valor TO ti_archivo-companyname.
WHEN '4'.
MOVE i_excel-valor TO ti_archivo-contactname.
WHEN '5'.
MOVE i_excel-valor TO ti_archivo-contacttitle.
WHEN '6'.
MOVE i_excel-valor TO ti_archivo-address.
WHEN '7'.
MOVE i_excel-valor TO ti_archivo-city.
WHEN '8'.
MOVE i_excel-valor TO ti_archivo-region.
WHEN '9'.
MOVE i_excel-valor TO ti_archivo-postalcode.
WHEN '10'.
MOVE i_excel-valor TO ti_archivo-country.
WHEN '11'.
MOVE i_excel-valor TO ti_archivo-phone.
WHEN '12'.
MOVE i_excel-valor TO ti_archivo-fax.
ENDCASE.
AT END OF fila.

APPEND ti_archivo.
CLEAR ti_archivo.
ENDAT.
ENDLOOP.

ENDFORM. " f_llena_tabla
*&---------------------------------------------------------------------*
*& Form F_MODIFICA_TABLA_Z
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
FORM f_modifica_tabla_z.

LOOP AT ti_archivo.
IF sy-subrc EQ 0.
* Se mueven el registro de la tabal interna a la estructura
MOVE-CORRESPONDING ti_archivo TO s_zruta_arch.
* Se utiliza el modify en lugar de insert, para que haya problemas si se
* duplica algun registro por error, o por que lo ejecutes N veces
MODIFY znw_customers FROM s_zruta_arch.
* Graba en tabla transparente
COMMIT WORK.
CLEAR: ti_archivo, s_zruta_arch.
ENDIF.
ENDLOOP.

ENDFORM. " F_MODIFICA_TABLA_Z

larmadovr
29/02/08, 21:20:22
Hay varias cosas por las cuales puede estar fallando.

Pon un break point en LOOP AT TI_Archivo y te fijas si los datos estan almacenados correctamente en la tabla interna, despues te sigues al paso donde hace el move-corresponding a la estructura y de igual manera revisa que la estructura se haya cargado antes del modify.

NOTA 1: Si no estan en el mismo orden el move-corresponding no pasa bien los datos de la ti a la estructura.

NOTA 2: La tabla z debe tener llaves primarias, checa que no estes repitiendo la clave para todos los registros en tu archivo

NOTA 3: si el move-corresponding no le esta pasando bien los datos entonces has un move individual, es decir:

move:
ti-campo1 to estructura-campo1.
ti-campo2 to estructura-campo2.
ti-campo...N to estructura-campo N....


Prueba y me dices que pasa.

Saludos, yo ahorita estoy en mty, voy a estar al pendiente si queires lo resolvemos de una vez, por que dispongo de una hora mas...

bacha
29/02/08, 21:38:35
Gracias larmadovr !!!

Me tengo que acostumbrar a usar el debuger.... no lo uso mucho, pero creo que es vital !!....

Mi ERROR era que mis campos de la TI no tenian el mismo nombre que los de la estructura y pues a la hora de buscar el CORRESPONDING pues no encontraba un campo correspondiente y no movia mas que el mandante .....

maldita programacion !, jaja.

MUCHAS GRACIAS, EXCELENTE AYUDA Y APORTACION !

larmadovr
29/02/08, 21:42:38
Pues sabes mi cuate, algunas herramientas no nos gustan por que tenemos miedo de usarlas, pero no te preocupes sientete tranquilo y comienza a familiarizarte con el debuggin por que vaya que en ABAP si es vital. Y bueno en todos los lenguajes facilita la existencia.

Y recuerda que echando a perder se aprende.... Jejeje

jorgeaguilarv
21/04/08, 14:31:31
Estoy tratando de hacer un Batch para poder llenar una tabla transparente con la información de un Excel no sé si me puedan ayudar con algún ejemplo o algún manual.
Saludos.

zonanet
21/04/08, 14:47:59
Estoy tratando de hacer un Batch para poder llenar una tabla transparente con la información de un Excel no sé si me puedan ayudar con algún ejemplo o algún manual.
Saludos.


Yo te puedo mandar un manual, dame tu dirección y te lo hago llegar.

Saludos

jorgeaguilarv
21/04/08, 17:08:25
Muchas gracias, mi mail es jorgeaguilarv@gmail.com

Hatenas
16/05/08, 13:43:16
Hola a todos...

Zonanet, por favor me puedes enviar a mi tambien el manual para Crear Batch Input. mi direccin es talico2@gmail.com

Gracias..

phlypi
10/11/11, 03:59:10
Creo que te mandé mal la dirección, si me das tu correo te lo hago llegar, es en español y viene con un ejemplo aunque sencillo bien explicado.

Saludos!

hola soy phlypi y estoy comenzando con el mundo sap, solo que tengo la misma duda, me podrias mandar la URL del manual por favor.
mi correo es phlypi_97@hotmail.com te le agradeceria.

y.velasco
16/04/12, 19:13:16
Hola, mi caso es que tengo que hacer lo mismo pero guardar el batch input en la tabla mara. Como hago eso?

Verónica Cons. junior
11/01/13, 18:11:40
Hola!

Se logró solucionar el tema? ya hice el codigo pero no se llena la tabla interna :/
saludos!