Duda conceptual

[jorgeABAP29]

Hola,

estoy dando mis primeros pasos con abap y se me planteo una duda...
el codigo es el siguiente:

TABLES: ztablatransparente.

LOOP at ztablatranparente.

write: / ztablatransparente-campo1,
ztablatransparente-campo2.
"el codigo de arriba es por poner algo.

ENDLOOP.

El tema es el siguiente yo cree en el diccionario abap una tabla transparente llamada ztablatransparente y con la sentencia TABLES me crea una estructura o área de trabajo (variable). Luego esta variable de encabezado o área de trabajo (objeto de dato) como quieran llamarlo me permite usarlo con el loop, yo creía que solamente con el loop se recorrían tablas internas??? alguien me podria aclarar porque puedo utilizar una variable de work area ahi!, muchas gracias.

Saludos,

Jorge.

[mysmb2]

la variable ztablatransparente que definiste con TABLES ztablatransparente, no es una tabla como bien decis y aunque te permita compilar el LOOP no vas a poder asignar mas de un registro a ztablatransparente.

Para eso defini ztablatransparente de la siguiente manera
data ztablatransparente type standard table of ztablatransparente.

[jorgeABAP29]

gracias por la respuesta...

yo no dije q habia creado una tabla con la instruccion tables, sino que cree una variable de estructura o work area.

y ya se a que queres llegar,

pero necesito otro tipo de respuesta porque me permite definir el loop asi con un work area.

[jorgeABAP29]

perdon mysmb2, leí mal la respuesta, igual no me responde mi pregunta.

igual muchas gracias.

espero por mas respuestas...

[jorgeABAP29]

para que sirve loopear un work area?

[Tu amo]

Bienvenido al mágico mundo del ABAP

No estas loopeando a una work area, lo que en realidad esta pasando es que estas usando una instrucción obsoleta que ha tenido que quedar como un vestigio para seguir manteniendo compatibilidad y confundir a los programadores.

A diferencia del "loop at itab" que hace un loop a una tabla interna, lo que tu estas haciendo es un "loop at dbtab" osea, un loop a una tabla de base de datos :confused:

Esa instrucción se usaba asi, primeramente, la work area que declaraste en tables se le introducían los campos que requirieras de la llave primaria. Por ejemplo, en la BKPF, podias solo llenar la sociedad.
El loop at dbtab entonces se iria por todos los registros que tuvieran esa llave, por ejemplo, en el caso anterior, todos los documentos financieros de una sociedad

Otra razon para dejar de usar la instruccion TABLES y solamente programar en ABAP Objects.

Dime que pasa si escribo esto en ABAP procedural?

TABLES: bseg.
LOOP AT bseg.
WRITE: / bseg-belnr.
ENDLOOP.


Ahora dime que pasa si escribo esto con clases?


TABLES: bseg.

CLASS pruebita DEFINITION.
PUBLIC SECTION.
METHODS: prueba.
ENDCLASS. "pruebita DEFINITION

CLASS pruebita IMPLEMENTATION.
METHOD prueba.
LOOP AT bseg.
WRITE: / bseg-belnr.
ENDLOOP.
ENDMETHOD. "prueba
ENDCLASS. "pruebita IMPLEMENTATION

[jorgeABAP29]

Resultados:

TABLES: bseg.
LOOP AT bseg.
WRITE: / bseg-belnr.
ENDLOOP.

no entra en el loop, lo saltea. De esta manera:


TABLES: bseg.

bseg-mandt = '800'.
bseg-bukrs = '0001'.
bseg-belnr = '0100000000'.
bseg-gjahr = 1995.
bseg-buzei = 001.

LOOP AT bseg.

WRITE: / bseg-belnr.

ENDLOOP.

Asignandole valores a los campos claves, o a la llave primaria tampoco
entra en el loop.

Y por ultimo siguiendo el paradigma OO:

CLASS pruebita DEFINITION.
PUBLIC SECTION.
METHODS: prueba.
ENDCLASS. "pruebita DEFINITION

*---------------------------------------------------------------------*
* CLASS pruebita IMPLEMENTATION
*---------------------------------------------------------------------*
*
*---------------------------------------------------------------------*
CLASS pruebita IMPLEMENTATION.
METHOD prueba.
LOOP AT bseg.
WRITE: / bseg-belnr.
ENDLOOP.
ENDMETHOD. "prueba
ENDCLASS. "pruebita IMPLEMENTATION

Al activar (análisis léxico, sintáctico y semántico) me da el siguiente
mensaje de error.

Programa Y_REPORTEPROBARLOOPWA
"LOOP AT dbtab" is not supported in the OO context. Use "SELECT ...
FROM dbtab INTO wa".

La conclusión final es que como vos bien dijiste es una instrucción obsoleta.
La cual no se ha sacado del lenguaje porque sino habría que modificar el interprete (gramática del lenguaje), pero no se ha insertado en el lenguaje modificado que permite la extensión OO del lenguaje ABAP ).

Espero por tu conclusión y muchas gracias por ayudarme.

saludos.

[Tu amo]

En la ayuda de SAP viene explicado que solo pueden ser tablas que inicien con "T" y con un maximo de cinco caracteres como la T001, si la tabla que indicas no inicia con T, la primera letra es reemplazada por T. Si la tabla no se encuentra, el loop lanza un sy-subrc = 12.

Prueba con una tabla como la T100 y veras que si entra el loop

[jorgeABAP29]

Muchas gracias, lo probé y anda como me indicaste, loopea con la tabla t001.
Con la bseg no anda (exceptions 12), ya que debe reemplazar la b por t y no encuentra la tabla.

Gracias.