Autor Tema: Select's En Abap (Leído 14164 veces)

Blag · « **en:** Martes 22 de Marzo de 2005, 17:06 »

En ABAP, se pueden utilizar muchos tipos de selects.....o maneras de acceder a datos en tablas.....

Para esto, crearemos primero una simple tabla interna....

Código: Text

 
*---Occurs 0 --&#62; Indica que nuestra tabla interna puede almacenar todos los datos.
DATA: BEGIN OF TABLE T_TAB OCCURS 0,
          BUKRS LIKE BKPF-BUKRS, &#34;Sociedad
          BELNR LIKE BKPF-BELNR,  &#34;Número de un documento contable
          GJAHR LIKE BKPF-GJAHR, &#34;Ejercicio o Año Contable
          END OF T_TAB.
 
 

Ahora, podemos hacer nuestros selects.....

Select

Código: Text

 
SELECT *  &#34;Seleccionamos todos los datos
*Los almacenamos en los campos correspondientes de nuestra tabla interna
INTO CORRESPONDING-FIELDS OF T_TAB 
*de la tabla BKPF
FROM BKPF
*donde el ejercicio es &#34;2005&#34;
WHERE GJAHR EQ '2005'.
 
 

Otro tipo de Select

Código: Text

 
*Elegimos solamente los campos que queremos obtener
SELECT BUKRS BELNR GJAHR
*Se guardan en la tabla en el mismo orden
INTO T_TAB
*de la tabla BKPF
FROM BKPF
*donde el ejercicio es &#34;2005&#34;
WHERE GJAHR EQ '2005'.
 
 

En algunos casos, necesitaremos solamente un registro...así que hacemos esto

Select Single

Código: Text

 
*Elegimos solamente los campos que queremos obtener de la primera coindencia
SELECT SINGLE BUKRS BELNR GJAHR
*Se guardan en la tabla en el mismo orden
INTO T_TAB
*de la tabla BKPF
FROM BKPF
*donde el ejercicio es &#34;2005&#34;
WHERE GJAHR EQ '2005'.
 
 

Otro Select Single

Código: Text

 
SELECT SINGLE *  &#34;Seleccionamos todos los datos, de la primera coincidencia
*Los almacenamos en los campos correspondientes de nuestra tabla interna
INTO CORRESPONDING-FIELDS OF T_TAB 
*de la tabla BKPF
FROM BKPF
*donde el ejercicio es &#34;2005&#34;
WHERE GJAHR EQ '2005'.
 
 

Ahora bien....supongamos que tenemos llena nuestra tabla interna....

Citar

BUKRS BELNR GJAHR
ENER 200000001 2005
TBLP 200000005 2005
TSIP 200000025 2005

Ahora bien....a una tabla interna no podemos hacerle un select...así que tenemos que recurrir a un READ TABLE

Código: Text

 
*Leemos un registro de la tabla interna, donde la sociedad sea &#34;ENER&#34;.
READ TABLE T_TAB WITH KEY BUKRS = 'ENER'.

También podemos leer por número de registro.....

Código: Text

 
*Leemos un registro de la tabla interna, que tenga el índice 2.
READ TABLE T_TAB INDEX 2.

Con lo cual tendríamos.....

Citar

BUKRS BELNR GJAHR
TBLP 200000005 2005

Si necesitamos leer todos los registros.....podríamos utilizar un loop. Pero primero deberemos de crear una variable, que almacene el valor del índice

Código: Text

 
*Declaramos una variable que tiene como tipo, la variable del sistema SY-TABIX.
*SY-TABIX, almacena el valor del índice a través de un LOOP.
DATA: W_TABIX LIKE SY-TABIX.

Código: Text

 
*Leemos todos los registros de la tabla interna, uno por uno.
LOOP AT T_TAB.
*Almacenamos el valor de SY-TABIX en nuestra variable.
WA_TABIX = SY-TABIX.
*Leemos nuestra tabla interna por cada indice.
READ TABLE T_TAB INDEX WA_TABIX.
*XXX --&#62; Hacemos algo con los valores leídos.....
ENDLOOP.
 
 

Saludos,

Blag

RadicalEd

Pregunta?
Por que las variables y las tablas en ABAP tienen nombre tan raros, por ejemplo

Código: Text

DATA: BEGIN OF T_DATOS OCCURS 0,
     BUKRS LIKE BKPF-BUKRS,
     BELNR LIKE BKPF-BELNR,
     GJAHR LIKE BKPF-GJAHR,
     BLART LIKE BKPF-BLART,
     WAERS LIKE BKPF-WAERS,
     DMBTR LIKE BSEG-DMBTR,
     END OF T_DATOS.
 
 
 

Esos campos ni idea que son, no podrian tener nombre como "ID, NOMBRE", o algo asi.
Por que nombres tan raros, jejeje es una pregunta tonta pero me gustaria saber

Blag

Citar

DATA: BEGIN OF T_DATOS OCCURS 0,
BUKRS LIKE BKPF-BUKRS, --> Sociedad
BELNR LIKE BKPF-BELNR, --> Documento Contable
GJAHR LIKE BKPF-GJAHR, --> Ejercicio o Año Contable
BLART LIKE BKPF-BLART, --> Clase de Documento
WAERS LIKE BKPF-WAERS, --> Moneda
DMBTR LIKE BSEG-DMBTR, -->Importe o Monto
END OF T_DATOS.

Tienen esos nombres extraños....Pues porque.....SAP es alemán....Y esos nombres de tablas y campos, son supuestamente nemónicos en alemán

Cuando uno programa en ABAP, es....aunque no parezca...más sencillo llamar a sus variables o campos de tablas internas, igual como se llaman originalmente....Es por eso, que siempre las llamos así.....

Código: Text

 
BUKRS LIKE BKPF-BUKRS
DMBTR LIKE BSEG-DMBTR

Con la práctica te acostumbras y llegas a aprederte de memoria el significado de muchos de los campos, ya que los utilizas todos los días

Saludos,

Blag

RadicalEd

mmm Gracias Blag, pero no lo debieron haber hecho en ingles que es un lenguaje universal?, o es que no pensaron que se les iba a crecer el negocio?

Gracias por la explicacion

Blag

Citar

mmm Gracias Blag, pero no lo debieron haber hecho en ingles que es un lenguaje universal?, o es que no pensaron que se les iba a crecer el negocio?

Jajaja

Lo mismo digo.....Y eso que no has visto los programas standard.......En muchos de ellos, los comentarios están en alemán

Te imaginas lo que es tratar de entender un programa que tiene documentación en alemán???

Pues es bastante feo....Sobre todo porque no se nada de alemán

Aunque por supuesto.....cabe aclarar que el entorno, se puede configurar para que los menús y los textos de IDE aparezcan en Español, Alemán, Inglés,Portugues, etc....Así que por ese lado, no hay tanto problema

Saludos,

Blag

Soultaker

Tengo una duda, segun lo que entendi es que primero creas la tabla interna, pero esta tabla interna esta sin datos

entonces cuando hago el select que me muestra.

Citar

Ahora bien....a una tabla interna no podemos hacerle un select...así que tenemos que recurrir a un READ TABLE

Si para leer una tabla interna se usa el READ TABLE.

Tonces para que es el Select ¿Que hace?

Blag

Citar

Tengo una duda, segun lo que entendi es que primero creas la tabla interna, pero esta tabla interna esta sin datos entonces cuando hago el select que me muestra.

Claro....cuando creas una tabla interna, defines solamente la estructura....Entoces, está sin datos.

Cuando haces el select, llenas esta estructura con datos

Código: Text

 
SELECT *  &#34;Seleccionamos todos los datos
*Los almacenamos en los campos correspondientes de nuestra tabla interna
INTO CORRESPONDING-FIELDS OF T_TAB
*de la tabla BKPF
FROM BKPF
*donde el ejercicio es &#34;2005&#34;
WHERE GJAHR EQ '2005'.
 
 

Citar

Si para leer una tabla interna se usa el READ TABLE.
Tonces para que es el Select ¿Que hace?

Lo que pasa es que con el select, seleccionas los datos de una tabla standard que se van a almacenar en la tabla interna. Pero si quieres o necesitas leer los datos que están almacenados en esa tabla interna, debes de utilizar un read table.

Las tablas internas se utilizan para no recargar de trabajo a la base de datos.

Al comenzar el programa, haces todos los selects necesarios y llenas tu tablas internas....Luego cuando están llenas, puedes hacer lo que quieras con ellas, sin necesitar volver a acceder a la base de datos o hacer nuevamente un select.

Saludos,

Blag

Soultaker

Ahhhhhhhhh

ya lo entendi, osea el Select lo haces a la tabla estandar y con el INTO recien lo ingresas a la tabla INTERNA.

Gracias por aclararme las dudas. Realmente ya me quedo muy claro todo.

Blag

Citar

Ahhhhhhhhh ya lo entendi, osea el Select lo haces a la tabla estandar y con el INTO recien lo ingresas a la tabla INTERNA.

Exactamente

Citar

Gracias por aclararme las dudas. Realmente ya me quedo muy claro todo.

Cuando quieras

Es un placer ayudar a la comunidad.

Saludos,

Blag

SoloCodigo

Autor Tema: Select's En Abap (Leído 14164 veces)

Blag

Select's En Abap

RadicalEd

Re: Select's En Abap

Blag

Re: Select's En Abap

RadicalEd

Re: Select's En Abap

Blag

Re: Select's En Abap

Soultaker

Re: Select's En Abap

Blag

Re: Select's En Abap

Soultaker

Re: Select's En Abap

Blag

Re: Select's En Abap