Programación General > ABAP

 Programa De Ejemplo En Abap

<< < (2/4) > >>

Soultaker:
Bueno la verdad que no entiendo ni "michi" de ese codigo, sera porque no programo en cobol, parece un arañado de gato  :D  :D  bueno ya poco por poco ire entendiendo estas jeroglificos. :think:  :think:

 :comp:

Güorker:
Hola,

A mi tampoco me ha parecido tan dificil de seguir, sobre todo por los comentarios que tiene el programa, que lo estructuran muy bien.

En mi opinion tiene mucho de SQL. Supongo que será porque en SAP practicamente todo se guarda en tablas de la base de datos.
Había miles de tablas, no?

Saludos y animo!

Blag:

--- Citar ---En mi opinion tiene mucho de SQL. Supongo que será porque en SAP practicamente todo se guarda en tablas de la base de datos.
Había miles de tablas, no?

--- Fin de la cita ---

Tienes toda la razón del mundo amigo Güorker....En SAP todo se guarda en tablas, inclusive el código fuente de los programas..... :lol:

Miles??? Bueno....las tablas estandard de SAP son aproximante 23,500 tablas.......Y claro, como usuario puedes crear miles de tablas más  B)


--- Citar --- Bueno la verdad que no entiendo ni "michi" de ese codigo, sera porque no programo en cobol, parece un arañado de gato

--- Fin de la cita ---

Bueno....lo mismo me pasó a mi la primera vez que lo vi.....Y yo tampoco he programado nunca en COBOL  :hola:  Pero con el tiempo, se me hace lo más natural del mundo ver códigos como ese.....Y eso que es uno de los ejemplos más simples.....Lo hice para que entendieran  :scream: ......No quiero imaginar que pasa si les pongo que el código de un Reporte Interactivo o de un ALV....... :lol:

Bueno....ya será con el tiempo, y con la serie de tutoriales que voy a comenzar a escribir, apenas tenga un tiempo libre  :comp:

Saludos,

Blag   :smartass:

RadicalEd:

--- Cita de: "Blag" ---
"de nuestra tabla interna. El SINGLE indica que solo queremos un valor
SELECT SINGLE DMBTR
INTO T_DATOS-DMBTR
FROM BSEG
WHERE BUKRS EQ T_DATOS-BUKRS *EQ -->Que es?, Si T_DATOS-BUKRS es el dato seleccionado o no se.¿?
  AND BELNR EQ T_DATOS-BELNR
  AND GJAHR EQ T_DATOS-GJAHR.

FORM IMPRIMIR_DATOS.

"Imprimimos una pequeña cabecera con los titulos

WRITE:/1 'Sociedad',15 'Doc. Contable',30 'Año',37 'Moneda',
55 'Monto'. *1, 15, 30, 37, 55 --> Son las posiciones?

"Recorremos nuestra tabla interna e imprimimos en pantalla
"registro por registro...

LOOP AT T_DATOS.
WRITE:/1 T_DATOS-BUKRS,15 T_DATOS-BELNR,30 T_DATOS-GJAHR,
38 T_DATOS-WAERS,45 T_DATOS-DMBTR.
ENDLOOP.

ENDFORM.
 
--- Fin de la cita ---
Vuelvo a preguntar¿?

juravi:
Una pregunta, este codigo de Abap se parace bastante a las sentencias de SQL con parte de Pascal y algo de basic. Su entorno es grafico como Visual o es como pascal..????

Navegación

[0] Índice de Mensajes

[#] Página Siguiente

[*] Página Anterior

Ir a la versión completa