viernes, 27 de marzo de 2009

Reloj de progreso ABAP

REPORT Z_PROGRESS_CLOCK.

DATA: A LIKE SY-UCOMM.




DO 100 TIMES.
 DO 300 TIMES.
 GET TIME.
 ENDDO.

 A(3) = SY-INDEX.A+3 = '%'.

 CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR'
 EXPORTING
 PERCENTAGE = SY-INDEX
 TEXT = A.
ENDDO.

Chicharos magicos

Esta chica si que sabe hacer gestos muy divertido ella es Kimmy.

La quinta montaña Cohelo Paulo

hoy lei este libro esta bastante corto, cosa buena porque no soy muy devoto a leer me gusto aunque lei criticas de que eno es una buena obra del autor me logro cautivar, el tema es religioso y aun asi facinante.

una historia chida si quieres bajate el libro y hechale una leida rapida aunque no creo que lo dejes a medias.

Ahora voy a leer el Alquimista del mismo autor según comentarios la mejor obra de este autor.

Descarga la quinta montaña de Paulo Cohelo.

jueves, 26 de marzo de 2009

Sentencia Like en ABAP

cuando queremos seleccionar de una tabla los campos que empiecen con tal palabra 

ejemplo seleccionamos de una tabla todos los campos que empiecen por 'credito'

REPORT Zsql .
tables zcatalogo.
data begin of ti_catalogo occurs 0.
include structure zcatalogo.
data end of ti_catalogo.

select * from zcatalogo into table ti_catalogo where concepto LIKE 'Credito%'
.
loop at ti_catalogo.
write: / ti_catalogo-concepto.
endloop.