MUNDOSAP

Regresar   MUNDOSAP > DESARROLLO > Programación ABAP IV
Nombre de Usuario
Contraseña
Home Descargas Registrar FAQ Miembros Calendario Buscar Temas de Hoy Marcar Foros Como Leídos




 
Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Viejo 01/10/09, 16:44:13
Hugo355 Hugo355 is offline
Junior Member
 
Fecha de Ingreso: sep 2009
Mensajes: 28
Question Implementacion de ALSM_EXCEL_TO_INTERNAL_TABLE

Hola, que tal!

me pasaron un exel, con datos que deben ir en una tabla. la tabla a la que debo meter los datos, tiene actualizador, pero no me piermite hacer modificaciones, pone un mensaje que dice : ATENCION, LA TABLA ES VALIDA EN TODOS LOS MANDANTES. Entonces leyendo en el foro encontre la siguiente funcion: ALSM_EXCEL_TO_INTERNAL_TABLE. he estado buscando como se utiliza, pero no la encuentro, por favor si alguien me pudiera decir como puedo implementar esta funcion, para meter en una tabla toda mi info de exel.

Muchas gracias!!
Responder Con Cita
  #2  
Viejo 01/10/09, 17:55:58
Hugo355 Hugo355 is offline
Junior Member
 
Fecha de Ingreso: sep 2009
Mensajes: 28
Question resp:

Ya encontre un ejemplo para utilizar ALSM_EXCEL_TO_INTERNAL_TABLE, lo que no me queda claro es, donde debo poner mi archivo de exel, si tengo que subirlo alguna parte, como lo ligo al codigo??

Muchas gracias de ante mano.
Responder Con Cita
  #3  
Viejo 01/10/09, 18:51:59
jeanficetola jeanficetola is offline
Member
 
Fecha de Ingreso: sep 2007
Localización: Venezuela
Mensajes: 64
Como almacenar el archivo Excel a una Tabla Interna

DATA: i_excel TYPE alsmex_tabline OCCURS 0 WITH HEADER LINE. -> en esta tabla se cargaran los datos de la tabla excel.

DATA: BEGIN OF i_interna OCCURS 0, -> almacenaremos los datos de la i_excel
clave TYPE char3,
compania TYPE char3,
idvuelo TYPE char3,
precio TYPE char3,
ciu_sal TYPE char3,
ciu_lleg TYPE char3.
DATA: END OF i_interna.

CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'
EXPORTING
filename = p_fich
i_begin_col = '1'
i_begin_row = '1'
i_end_col = '6' -> numero de columnas de la hoja excel
i_end_row = '3' -> numero de filas de la hoja excel
TABLES
intern = i_excel . -> la tabla interna para la excel.
EXCEPTIONS
inconsistent_parameters = 1
upload_ole = 2
OTHERS = 3.
IF sy-subrc <> 0.
EXIT.
ENDIF.

IF i_excel[] IS INITIAL.
EXIT.
ENDIF.

con esta funcion rellenamos la tabla i_excel que recoge los datos de la escel.

LOOP AT i_excel. -> cargaremos los datos de la hoja excel a nuestra tabla iterna.

IF i_excel-col EQ 1. -> uno por cada columna
MOVE i_excel-value TO i_interna-clave. -> insertamos el valor de la cabecera de la i_excel en la cabecera de la tabla i_interna.
ENDIF.
copiaremos esto tantas veces como columnas tenga la Excel
….
AT END OF row.
APPEND i_interna. -> insertamos lo que hay en la cabecera en la i_interna.
ENDAT.
ENDLOOP.
__________________
Jean Carlos Hernandez Ficetola

Consultor ABAP
INFOGESA S.A , Venezuela
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Reglas de Mensajes
no puedes crear nuevos temas
no puedes responder temas
no puedes adjuntar archivos
no puedes editar tus mensajes

El código vB está On
Las caritas están On
Código [IMG] está On
Código HTML está Off
Saltar a Foro


Husos Horarios son GMT. La hora en este momento es 20:58:10.


www.mundosap.com 2006 - Spain
software crm, crm on demand, software call center, crm act, crm solutions, crm gratis, crm web