Aprende ABAP/4 con ejercicios prácticos
Marlon Falcón Hernández www.marlonfalcon.cl
6
DERECHOS DEL AUTOR
Aprende ABAP/4 con ejercicios prácticos. Copyright © 2015 by
Marlon Falcón Hernández
Todos los derechos reser!dos. "ing#n! p!rte de este tr!b!jo p#ede reprod#cirse o p#ede tr!ns$itirse en c#!l%#ier &or$#l!rio o por c#!l%#ier $edio' electr(nico o $ecánico' incl#yendo &otocopi!do' gr!b!do o por c#!l%#ier !l$!cen!$iento de in&or$!ci(n' sin el per$iso escrito !nterior del d#e)o de los derechos de propied!d liter!ri! y el p#blic!dor.
*+B", PENDIENTE
A PUBLICACION
P!r! $ás in&or$!ci(n por &!or cont!cte con el !#tor de l! obr!$edi!nte los sig#ientes correos-
Marlon Falcón Hernández
cont!cto$!rlon&!lcon.cl &!lconso&t.dg$!il.co$
Diseo de Por!ada"
!rlon !lc(n ernánde3 Person!je de port!d!- dise)!do por reepi
6
Dedicatoria
A mi hijo Marlon con todo el Amor del mundo.
6
Índice INTRODUCCION............................................................................7 CAP!"#$ % &!'$("CC)& A *AP +'P.................8 ¿QUÉ ES UN ERP?.....................................................................................................................8 ¿CUÁLES SON LOS PRINCIPALES ERP?................................................................................8 ¿QUÉ ES SAP?.........................................................................................................................8 ¿QUÉ ES ABAP/4?..................................................................................................................9 ¿QUÉ ES TIPOS DE PROGRAMAS SE PUEDEN HACER EN ABAP?.....................................9 PRIMEROS PASOS PARA CONOCER LA INTERFACE DE SAP ECC.....................................9 CONOCIENDO LA INTERFACE DE SAP................................................................................10 ¿QUÉ NECESITO PARA INSTALAR SAP?..............................................................................11 CAP!"#$ , P'$-'AMAC)& B*CA +& ABAP.12 EJERCICIO N°1 - HOLA MUNDO EN ABAP/4. SE!"#........................... ............... ........12 EJERCICIO N°$ - COMENTARIOS.........................................................................................14 EJERCICIO N°! - IMPRIMIR %ARIAS L&NEAS CON 'RITE..............................................14 EJERCICIO N°4 - TIPOS DE DATOS EN ABAP................................ ............... ............... .....14 EJERCICIO N°( - ASIGNACI)N DE %ALOR A UNA %ARIABLE............................................15 EJERCICIO N°* - CONSTANTES...........................................................................................16 EJERCICIO N°+ - %ARIABLES DEL SISTEMA. IMPRIMIR LA FECHA................................16 EJERCICIO N°" - %ARIABLES DEL SISTEMA II..................................................................16 EJERCICIO N°, - %ARIABLE S-SUBRC...........................................................................17 EJERCICIO N°1 - OPERACIONES CON CARACTERES......................................................17 EJERCICIO N°11 - EJEMPLO DE USO DE S-SUBRC............................... ............... .......19 EJERCICIO N°1$ - EJEMPLO DE USO DE L&NEAS TIPO TABLA........................................19 EJERCICIO N°1! - EJEMPLO REDONDEO %ARIOS.............................................................20 EJERCICIO N°14 - OPERACIONES MATEMÁTICA.................... ............... ............... ............20 EJERCICIO N°1( - ABAP DEBUGER............................... ............... ............... ............... ......21 CAP!"#$ $P+'A($'+* (+ C$&(C)&.........23 EJERCICIO N°1* - SENTENCIA CHEC..................................... ............... ............... ........23 EJERCICIO N°1+ - SENTENCIA IF ..ELSE.........................................................................23 EJERCICIO N°1"- SENTENCIA CASE............................... ............... ............... ................ ...24 EJERCICIO N°1,- USANDO EL OPERADOR 0 DIFERENTE.................... ............... ........24 EJERCICIO N°$- USANDO EL BET'EEN......................................................................24 EJERCICIO N°$1 - B UCLE DO...........................................................................................25 EJERCICIO N°$$ - B UCLE DO CON E2IT......................... ............... ............... ................25 EJERCICIO N°$! - B UCLE 'HILE........................................... ............... ............... ............25 CAP!"#$ 4 PA'M+!'$* 0 *"B'"!&A*.........26 EJERCICIO N°$4 - PARÁMETROS DE ENTRADAS..............................................................26 EJERCICIO N°$( - SUBRUTINAS INTERNAS......................................................................26
6
EJERCICIO N°$* - SUBRUTINAS INTERNAS CON PARÁMETROS.....................................26 EJERCICIO N°$+ - SUBRUTINAS E2TERNA CON PARÁMETROS.....................................26 EJERCICIO N°$" - PLANTILLA DE ABAP/4.......................................................................27 CAP!"#$ 1 !AB#A* &!+'&A*................................28 EJERCICIO N°$, - TABLAS INTERNAS................................................................................28 EJERCICIO N°! - TABLAS INTERNAS ESTRUCTURA GENERAL.....................................28 EJERCICIO N°!1 - TABLAS INTERNAS CON CABECERA...................................................29 EJERCICIO N°!$ - TABLAS INTERNAS CONSULTA DE USUARIOS..................................29 EJERCICIO N°!! - TABLA INTERNA SIMPLE............................. ............... ............... ..........30 EJERCICIO N°!4 - TABLAS INTERNAS CON ÁREAS DE TRABAJO..................... ..............30 EJERCICIO N°!( - TABLAS INTERNAS CON FIELD-SMBOLS...................................30 CAP!"#$ 1 (CC$&A'$ (+ (A!$*....................31 EJERCICIO N°!* - ENTRANDO AL DD SE11# ..................................... ............... ...........31 EJERCICIO N°!+ - TABLA DE UNA TRANSACCI)N.............................................................33 EJERCICIO N°!" - CONSULTA PARA UNA TABLA DE DD.................................................34 EJERCICIO N°!, - REPORTE A%L CON UNA TABLA DEL DD.........................................35 EJERCICIO N°4 - FULL REPORTE A%L DE UNA TABLA. ................................................35 EJERCICIO N°41 - CREAR UN DOMINIO........................................ ............... ............... .....37 EJERCICIO N°4$ - CREAR UN ELEMENTO DE DATO.......................... ............... ..............38 EJERCICIO N°4! - CREAR TABLA TRANSPARENTE SE11#............................................40 EJERCICIO N°44 - L LENAR UNA TABLA DE DATOS SE1*#. ......................... ............... .43 CAP!"#$ 2 $P+& *3# C$&*"#!A* ABAP........44 INTRODUCCI)N A OPEN SQL............................................................................................44 JERCICIO N°4( - CONSULTA BÁSICA DIRECTA...............................................................44 EJERCICIO E N°4* - C ONSULTA BÁSICA CON TI................................................................44 EJERCICIO N°4+ - C ONSULTA PRIMERAS 1 FILAS....................................................45 EJERCICIO N°4" - C ONSULTA CONDICI)N......................................................................45 EJERCICIO N°4, - MOSTRAR PRIMERA FILA EN UNA TABLA.........................................45 EJERCICIO N°( - SELECCIONAMOS TODOS ...................................................................45 EJERCICIO N°(1 - SELECCIONAR SIN TABLA INTERNA...................................................46 EJERCICIO N°($ - MÁ2IMO3 M&NIMO3 CANTIDAD.......................... ............... ............... ..46 EJERCICIO N°(! - SUMA PROMEDIO.......................................................................47 EJERCICIO N°(4 - BUSCANDO CADENAS QUE CONTENGAN OTRAS.............................47 EJERCICIO N°(( - BUSCANDO CADENAS CON LISTAS. IN.............................. ...............47 EJERCICIO N°(* - SELECCIONANDO UN RANGO BET'EEN.......................................47 EJERCICIO N°(+- M OSTRAR TABLA ORDENADA..............................................................48 EJERCICIO N°(" - MOSTRAR TODOS LOS ICONOS EN SAP...........................................48 EJERCICIO N°(,- C ONSULTA A DOS TABLAS EN SAP.............................. ............... .......48
CAP!"#$ 5 AMP#AC$&+* 0 &$!A*....................50 EJERCICIO N°* - HOLA MUNDO EN ABAP/4.................................................................50 6
CAP!"#$ 6 P'$-'AMAC)& $'+&!A($ A $B7+!$*. 51 ¿QUÉ ES LA PROGRAMACI)N ORIENTADO A OBJETOS ?...................................................51 EJERCICIO N°*1 - HOLA MUNDO DE POO......................................................................51 EJERCICIO N°*$ - POO CON MÉTODOS PARÁMETROS................................................51 EJERCICIO N°*! - POO H ERENCIA DE CLASES............................... ............... ............... .52 CAP!"#$ 6 P'$-'AMAC)& (+ (#$-$* .....54 EJERCICIO N°*4- MENSAJES EN ABAP............................................................................54 EJERCICIO N°*( - CREANDO UNA TRANSACCI)N EN SAP SE,!#.............................55 EJERCICIO N°** - COLORES EN UN REPORTE .......................... ............... ............... .....57 EJERCICIO N°*+ - %ARIOS COLORES EN UN REPORTE ..............................................57 CAP!"#$ 8 (0&P'$.......... .......... .......... .......... ...............58 INTRODUCCI)N A UNA DNPRO......................................................................................58 EJERCICIO N°*"- CREACI)N DE UNA DNPRO SE"#..............................................58 CAP!"#$ %9 BA!CH &P"!*.....................................61 INTRODUCCI)N A UNA BATCH INPUTS SM!(................................................................61 CAP!"#$ %% F$'M"#A'$*.....................................62 TIPOS DE FORMULARIOS EN SAP.......................................................................................62 EJERCICIO N°*, - M OSTRAR UN FORMULARIO SAPSCRIPT SE+1#........................62 EJERCICIO N°+ - COPIAR UN FORMULARIO SAPSCRIPT...................... ............... .....63 EJERCICIO N°+1 - C REAR UN FORMULARIO CON SAPSCRIPT....................................64 EJERCICIO N°(, - EJECUTAR UN FORM SAPSCRIPT..................................................67 CAP!"#$ %, $B7+C! &A:-A!$'..........................69 INTRODUCCI)N AL OBJECT NA%IGATOR SE".................................................................69 EJERCICIO N°+! - CREAR GRUPO DE FUNCIONES.................... ............... ............... ........69 CAP!"#$ % ($C* ;&!+'M+(A!+ ($C"M+&!< 70 INTRODUCCI)N A IDOCS......................................................................................................70 EJERCICIO N°+4 - HOLA MUNDO EN ABAP/4................................................................70 !'A&*ACC$&+* M* "!#=A(A* +& *AP........71 :A'AB#+* (+# **!+MA.............................................73 C$MA&($ (+ #A BA''A...............................................77 !+C&$#$-ÍA* (+ &!+'FAC+* "!#=A(A* +& *AP. 77 '56789:;< A8=>..........................................................................77
6
&!'$("CC$& E@9 865 9@ 9=5 9 @= 56= 9 ;5: 996;;5 >6;@;5 K= ;5:5;9:5 ;== >=6@9 9 = >656==;: ABAP/43 :5 9>9= ;5: @956= 9 >656==;: :5 9 ;5: >995 >=5 9 8989 K= 9:9:5@9 @55 5 9 :9;9 @= >=6= : ;=6@9 9: 9 :5 9 = >65 6==;:. E >56@=:@9 9 = :==6 ;== ;=9 = 69>@= <== 5 996;;5 >65>9@5 9: 9 865. E :K9 =9:@=6 = 9= 9 K== =K=:=5 9: 5 996;;5. T6=@= 9>69 9 9K=65 ;5:@5 >569 ;<5 >65;99:@5 :5 5 >6=;@;= 9 @9 5K=6=: = 9>69 5 >56 6969;=6. 5 >56@=:@9 >6=;@;= ;<53 >5: @5= @ K5:@= >=6= 9 >9= 9:@6=6 : >6589= = :5 =856= 9 ABAP/4 >=6= SAP.
6
CAP!"#$ % ntrod>cción a *AP +'P. ?3>@ es >n +'P U: +'P 9 : @9= 5@=69 :56@;5# 9 >=:;=;: 9 69;65 9>69=6=93 :5869 K9:9 9 = = 9: I:9 +:@96>69 '956;9 P=:::. L5 +'P 9@5:=: 9 :@96=: 5 >65;95 9 = 9>69= >96@9:5 @9:96 :56=;: =;@=== 96= >=6= @5= 9 9;5:9. U: +'P >56 5 9:96= =:@6= ;5>6=3 K9:@=3 >65;;:3 ;5:@=8= 5@;=. L5 589@K5 >6:;>=9 9 ;=96 ERP 5:
M=:@9:96 :56=;: =;@=== 9 = 9>69= ;5: =;;95 965 >=6= 5 =65. D:6 5 @9>5 9 9@: 9>69=6= 5>@=:5 @55 5 >=5.
?C>áles son los principales +'P E: 9 96;=5 9@9: K=65 ERP 9:@69 5 ;5:5;5 9 9:;9:@6=: *AP +'P / *AP +CC / *AP ' - E :5 9 5 969 9: = @= 9 5 ERP3 9@ 9:5;=5 = 6=:9 9>69=3 =:9 >99 96 >99:@=5 9: 9>69= 9 ;=96 @==53 @9:9 := 6=: 9;==8= = 9 @6=9 ABAP/4 ;55 9:=9 9 >656==;: 9 9 >96@9 >596 >656==6 9:@65 9 @9= ;=96 :9;9= 9 = 9>69=. *AP B"*&+** $&+ - E :5 9 5 ERP =5 9: = >99= 9=:= 9>69=3 9 ;69=5 9: I6=9 >5@96569:@9 9 =65 >56 SAP. Microsoft (namics - E :5 9 5 ERP =5 9: = >99= 9>69= >65>9= 9 M;655@ 9:@69 K9:@== 9@= = 6=: ;5>=@8= ;5: K=65 >5@K5. 569;9 ;=@65 >65;@5 ERP M;655@ D:=; A23 M;655@ D:=; GP3 M;655@ D:=; NA% M;655@ D:=; SL. $doo ;conocido anteriormente como $pen+'P anteriormente como !in+'P< - E : @9= 9 ERP :@96=5 9 ;5 =896@5
6
=;@=9:@9 >65;5 >56 = 9>69= 89= O55 S.A. E : >65;@5 9 ;5 =896@5. $racle +B>siness *>ite - E :5 9 5 ERP >5@9:@9 =K==5 >56 ORACLE ;5: : 96@9 9@5: 9 8=9 9 =@5. ?3>@ es *AP SAP 9 := 9>69= =9=:= 9 9 :== 9: :5 9 1,+$ = = SAP :;=: S@9=3 A>;=;5:9 P65;@5 9: P65;9=9:@5 9 D=@5 . E: 1,+! SAP 9>9= ;5: = K96: SAP R/1 :5 >=65 99 9:@5:;9 9 956=6 @9= <=@= ;5:K96@69 5 9 9 <5 9: = 9 96 9 5 5@=69 >=6= 9>69= = :K9 :=. S9 ;=;= 9 : + 9 = 6=:9 9>69= 9: 9 :5 @=: = =>;=;5:9 9 SAP.
?3>@ es ABAP/4 ABAP/4 9 : 9:=9 9 >656==;: 9 ;=6@= 9:96=;:3 :5869 K9:9 9 = = 9: I:9 AK=:;9 B:9 A>>;=@5: P656=: . E >65>9= 9 SAP 55 6K9 >=6= >656==6 9:@65 9 S@9= SAP ECC = =>;=;5:9 :9;9=6= 5 956= 9 = 9>69= :9;9@9. ABAP/4 9 9=665=5 >=6= SAP R/$ 9: 5 =5 " :5 95 9 9=665=69 <=@= ;5:K96@69 9: := >5@9:@9 <966=9:@=. ?3>@ es tipos de proramas se p>eden Dacer en ABAP ABAP/4 9 : 9:=9 9 >656==;: 9 >96@9 ;=@65 >6:;>=9 6>5 9 >656== 1- R9>56@9 ;;5 9 :@96=;@K5. $- P656==;: 9 =55. !- B=@;< :>@ 4- P656== 9 ;5:;=;5:9 Primeros pasos para conocer la interface de *AP +CC *AP +CC 9 9 = K96: 9 @=695 9: 9@9 865 >=6= =>69:96 ABAP/4 9 : >656== ;9:@9 96K563 9 :@== 9: : 96K56 9 :5 ;5: := 8=9 9 =@5 9 O6=;9. A 9@9 96K56 9 9 :@== 969:@9 =:=:@9 9 :5 5: 9 9@6;@6= 9 =@5 >65;99:@5 9 := 9>69=. A:5 =:=:@9 K:9: >69:@==5 9: SAP ;55 5:
6
Mandante 999 E@9 =:=:@9 9 9 9 69969:;= 9: 9 @9= :5 >99 8566=69 :5 ;=8=6 :== 9: V3 :5 ;5:@9:9 ::W: =@5 9 P=6=9@6=;:. Mandante 99% E@9 =:=:@9 9 9 9 99>5 9 >99 8566=6 5 9:=6 = 969:;= ;5: 9 9 5 ;=8=5 :55@65. Mandante 922 E@9 9 9 M=:=:@9 9 96K;5 E=6'=@;< 9@9 =:=:@9 :5 >99 96 8566=5 : ;=8=5 9 @=5 >=6= 9@9:;: 9 >6589= :5 =6=:@= = >65@9;;: 9 :9@65 =@5 = 9 9@9 : >6589= 9: SAP = 9>69= 9 ;5:9;@=6 = ** :5 @9:6 =;;95 = :9@65 =@5 9>69=6=9. L5 5@65 =:=:@9 9 >99: ;69=6 5 >99: K9:6 :@==5 ;55 9 9 ;=5 9 9 =:=:@9 " 9: 9 SAP IDES 9 >56 = 9: I:9 I:@96:9@ D95:@6=@5: =: EK==@5: S@9 9 9 9 SAP 9 >698= 9 @= SAP >=6= 5 ;5:@569 9 :9;9@=: 9:@69:=9:@5. Conociendo la interface de *AP SAP ECC 9 : ERP 9 @9:9 : 9:W =@96= 5:9 9 9:;9:@6= : 685 ;5: @5= = @6=:=;;5:9 56=:== >56 5 ;5: := 9;6>;: @=:@5 9 ;5 ;55 9 = :;: 9 99;@= ;== := 9 9@= @6=:=;;5:9.
6
?3>@ necesito para instalar *AP P=6= >596 @6=8==6 ;5: SAP :9;9@= 5 ;5= % SAPGUI 9 9 ;9:@9 GUI SAP R/! 9 =6@9;@6= 9 ! :K99 9 96K56 9 =>;=;5:93 9 8=9 9 =@53 ;9:@9. E : 5@=69 9 9 99;@= 9: M;655@ ':53 A>>9 M=;:@5< 5 9: 9 9;6@565 U:3 >96@9 = =65 =;;996 = = :;5:== 9 SAP 9: =>;=;5:9 SAP3
6
;55 SAP ERP SAP B:9 I:56=@5: '=69<59 =<56= ==5 SAP B:9 I:@99:;9#. E = >=@=56= @== >=6= 9 =;;95 695@5 = 96K56 ;9:@6= SAP 9: := 69 9 9>69=. P=6= :@==65 @9:95 9 8;=6 9 =6;<K5 9 9@= 9: = ;=6>9@= 9 :@==;: 9: 9 9:@9 ;=:5 E CA'P+!A / S=>XGUIX+!/ N'X+.XP699:@=@5:X/ PRES1/ GUI/ 'INDO'S/ 'IN!$/ S=>GS9@>.99. , N9;9@= 5 =@5 9 =;;95 = : 96K56 9 >698= 9@5 5: =:5 9 5 @5 9 >99 ;5:@6=@=6 : >=: 9 : 96K56 9 9 :5 @9:9 =;;95 9: @ @6=8=5. .=6==@@9;<:559.: .9=;;9.;5 .96>@6=::7.;5
CAP!"#$ , Proramación Gásica en ABAP. +jercicio &% Hola M>ndo en ABAP/4. ;*+6< E: 9@9 :9@65 >696 >656== @9 9:9=69 ;55 ;69=6 : 9=6655 3 5=9:@9 @=695 = :;: 9 >66 9: >=:@==.
6
E:@6=5 = = @6=:=;;: SE!" 9: >656== ;55;=5 zIDolaIm>ndo @= ;55 9@65 9: = 9:@9 =9:.
E: = >6= K9:@=:= 9: 9 @@5 9 ;55;=5 := 9;6>;: ;56@= = >656== >=5 C69=6.
E: = >6= K9:@=:= >=5 9 85@: O89@5 L5;= @= ;55 9 9@6=.
6
S @55 5 <;@9 ;5669;@=9:@9 K96= 9 9@56 ABAP 5:9 ;55;=695 9 9:@9 ;5 REPORT Z_HOLA_MUNDO. WRITE: 'HOLA MUNDO'.
U:= K9 9 9;685 9 ;5 9: 9 9@56 ABAP =6=5 5 ;=85 9: 9 9:W >96563 =;@K=5 99;@=5 = =>;=;:. N5 =6 = 9:@9 K9:@=:=3 5:9 K9695 9 9:=9 9 =;=8=5 9 @9;9=6 9: 9 ;5. C5: 9@5 = @9:95 :9@65 >696 >656== 9: =8=>. S9 @5 9 ;5=:5 'RITE >=6= >66 : @9@5 9: = >=:@==.
E: 9@= ;=9 =>69:5 = ;69=6 : >656== 3 @=8V: =>69:5 9 5 >656== 9: =8=> ;59:=: ;5: = >==86= 6996K== '+P$'!
6
9 9 @= = >==86= 6996K== J'!+ >=6= >66 : @9@53 9 @5= = :9= 9: ABAP/4 @96:=: ;5: >:@5 9 9695 >66 := ;=9:= 9 ;=6=;@969 @=5 ;5= >9.
+jercicio &, Comentarios. E: ABAP/4 5 ;59:@=65 9 >99: <=;96 9 5 56=. S 9 <=;9 : ;59:@=65 99 9 :;5 9 >656== 9 @= Y 9 ;59:@=65 9>9= 9:@65 9 @9@5 9 @= . REPORT Z_COMENTARIO. *Comentario en ABAP WRITE: 'HOLA MUNDO'. "Otro comentario en ABAP
+jercicio & mprimir Karias lLneas con J'!+. P99 96 9 9: =W: >656== :9;9@=6= >66 K=6= :9= : @9:96 9 69>9@6 = >==86= 'RITE K=6= K9;93 >=6= 95 9 @= = ;5= >=6= 9>=6=6 = 9:@9:;= ;55 9 9@6= 9: 9 99>5 !IMPRIMIR!!# . REPORT Z_IMPRIMIR_3_A. WRITE: 'TE$TO %&'. WRITE: 'TE$TO %&'. WRITE: 'TE$TO %'. REPORT Z_IMPRIMIR_3_B. WRITE: ('TE$TO %&') ('TE$TO %&') ('TE$TO %'.
+jercicio &4 !ipos de datos en ABAP. E: ABAP/4 @9:95 5 9:@9 @>5 9 =@5 >6=65 T>5
D9;6>;:
L5:@ >56 99;@5
L5:@ =
%=56 :;=
C
A=:V6;5
1
1*((!(
SPACE
D
F9;<=D=@9#
"
"
Z Z
F
F5@=:@9F5=@#
"
"
.
6
I
E:@965I:@996#
4
4
N
NV6;5
1
1-*((!(
Z...Z
P
E>=9@=5
"
1-1*
T
H56=T9#
*
*
ZZ
2
H9=9;=9
1
1-*((!(
2ZZ
REPORT Z_DATOS_01. * Decaramo+ o+ ,ato+ en ABAP con DATA. DATA: MiEntero%& T-PE I. DATA: MiEntero% T-PE I. DATA: MiEntero% T-PE I ALUE &. " Le coocamo+ & * A/ora im0rimiremo+ WRITE: 'EL NUMERO :' ) MiEntero%.
+jercicio &1 Asinación de Kalor a >na KariaGle E@9: 5 56= >=6= =:=6 := K=56 = := K=6=89 9: ABAP3 >56 =:=;: >9 5 69;@=. REPORT Z_ASIGNACION_SIMPLE. * Decaramo+ a 1aria#e DATA: MiEntero%& T-PE I. * Le a+i2namo+ 3n 1aor MiEntero%& 4 &. * Im0rimimo+ e 1aor WRITE: MiEntero%&.
M9=:@9 = 9:@9:;= M$:+ REPORT Z_ASIGNACION_MOE. * Decaramo+ a 1aria#e DATA: MiEntero%& T-PE I ALUE &) MiEntero% T-PE I. * Le a+i2namo+ 3n 1aor MOE MiEntero%& TO MiEntero%. * Im0rimimo+ e 1aor WRITE: MiEntero%.
+jercicio &2 Constantes L= ;5:@=:@9 5: K=6=89 9 ::;= ;=8=: K=56 9: @5= = 99;;: 9 >656==3 = 9:;: 9 %ALUE 9 58=@565. REPORT
!CON5TANTE5.
6
* Decaramo+ 3na con+tante ,e ti0o ca,ena CON5TANT5: MONEDA67 T-PE C ALUE 'EUR'. WRITE: MONEDA.
+jercicio &5 :ariaGles del sistema. mprimir la fecDa. E @9= 9:9 : ;5::@5 9 K=6=89 9 5: W@9 >=6= 5 >656==569 ABAP/4 9:@69 9= 9 9:;9:@6= S-DATUM 9 :5 :56= 9 = 9;<= 9 @9=. S 969 K96 5@6= K=6=89 69K= = := 9 865 = @= 9 = @==. REPORT Z_!ECHA. * Im0rimimo+ e 1aor WRITE: S"#DATUM.
+jercicio &6 :ariaGles del sistema . E: 9@9 996;;5 K9695 5@6= K=6=89 9 @9= @==. REPORT -TE$T. DATA TEMP T-PE I. WRITE: ('EL MANDANTE:')5-8MANDT. WRITE: ('U5UARIO:')5-8UNAME. WRITE: ('IDIOMA:')5-8LAN9U. WRITE: ('HORA LOCAL:')5-8UEIT. WRITE: ('TRAN5ACCION:')5-8TCODE. WRITE: ('PRO9RAMA ACTUAL:')5-8REPID. DO &% TIME5. TEMP 4 TEMP &. " SY-INDEX guarda el contador del LOOP I; 5-8INDE$ 4 <. WRITE: ('E+ <'. EL5E. WRITE: ( 5-8INDE$. ENDI;. ENDDO.
+jercicio &8 :ariaGle *0*"B'C I:;= 9 = 9:@9:;= =:@9656 = = === 9 9@= K=6=89 9 99;@5 5 :5.
6
REPORT Z_S"#SUBRC. $ S%&%''()*+,)- &+ /+*-+''(* SE11 TABLES TSTC. SELECT SINGLE $ !ROM TSTC HERE ')% E SE11. ( -#-/' : 0. RITE S% %*'%*/+ &+ /+*-+''(*. %&-%. RITE N) -% %*'%*/+. %*(.
+jercicio &%9 $peraciones con caracteres. E: ABAP = K9;9 :9;9@=5 5;=6 = == 9 =@5 56=@9=:5 = ;=9:= 9 @9@5 9@= 5>96=;5:9 :5 ==6=: ;5: 95. C$&CA!+&A!+ E @=5 >=6= :6/;5:;=@9:=6 ;=>5 ==:V6;5. U: 99>5 9 9695 :6 = K=6=89 K=6=8913 K=6=89$ 9: = K=6=89 K=6=89. REPORT !OPERACIONE5!CONCATENATE. DATA m=1aria#e%& T-PE T$T ALUE '5E&&'. DATA m=1aria#e% T-PE T$T ALUE '5E&'. DATA m=1aria#e T-PE T$T ALUE '5E&'. CONCATENATE m=1aria#e%& m=1aria#e% INTO m=1aria#e 5EPARATED B* Im0rimimo+ e 1aor WRITE: m=1aria#e.
'8'.
C$&(+&*+ E:= @55 5 9>=;5 9: 8=:;5 9 >5:95 NOGAPS 9: := ;=9:= :;9:5 5 9>=;5 = = 96=. S :5 9 >5:95 = 9:@9:;= NO-GAPS 55 9:=6 5 9 = 96=. REPORT Z_OPERACIONES_CONDENSE. DATA ARIABLE;10< ALUE E U R. CONDENSE ARIABLE NO#GAPS. $ I,=/(,(,)- %& >+&)/ RITE ARIABLE. $ E& >+&)/ ?% (,=/(,(/@ -%/ EUR
'+P#AC+ S9 @= >=6= 69>==6 := >=6@9 9 = ;=9:= >56 5@6=. 6
REPORT !OPERACIONE5!REMPLACE. DATA: ARIABLE& T-PE T$T ALUE 'MI NOMBRE E5 $'. REPLACE '$' WITH 'MARLON' INTO ARIABLE&. * Im0rimimo+ e 1aor WRITE: ARIABLE&.
*+A'CH S9 @= >=6= 8;=6 := ;=9:= 9:@65 9 5@6= ;=9:=3 9695 8;=6 9 :5869 ;8= 9:@65 9 := 56=;: = :;: 9:;9:@6= 9 K=56 9K5K96 = K=6=89 9 @9= S-SUBRC = 3 9: ;=5 9 :5 = 9:;9:@69 9K5K96 4. REPORT !OPERACIONE5!5EARCH. DATA: ORACION6<%7 ALUE 'CUB A E5 LINDA'. 5EARCH ORACION ;OR 'CUB*'. WRITE: 5-85UBRC. "Im0rimir> % 0or?3e e@i+te. 5EARCH ORACION ;OR 'CUBA' ABBREIATED. WRITE: 5-85UBRC. "%:I2nora e e+0acio 1aco. 5EARCH ORACION ;OR 'CUBA' 5TARTIN9 AT . WRITE: 5-85UBRC. ":Inicia en a 0o+icin .
*HF! S9 @= >=6= 9>==6 : ;5::@5 9 ;=6=;@969 9:=:5 5 9 :5 9 :9;9@9:. REPORT !OPERACIONE5!5HI;T. DATA: ARIABLE6&7 ALUE 'MI NOMBRE E5 M'. 5HI;T ARIABLE B- PLACE5. * Imprimimos el valor WRITE: ARIABLE. "Eliminara los 3 primeros
*P#! S9 @= >=6= >=6@6 := ;=9:= 9: >99= >=6@9. REPORT !OPERACIONE5!5PLIT. DATA: ARIABLE6&7 ALUE 'MI)NOMBRE)M') ARIABLE&&67) ARIABLE&67) ARIABLE&67. 5PLIT ARIABLE AT ')' INTO ARIABLE&& ARIABLE& ARIABLE&. * Imprimimos el valor WRITE: ( ARIABLE&&. WRITE: ( ARIABLE&. WRITE: ( ARIABLE&.
!'A&*#A!+ S9 @= >=6= ;5:K96@6 @9@5 = =W;=
6
REPORT !OPERACIONE5!5PLIT. DATA: ARIABLE6&7 ALUE '/oa m3n,o'. TRAN5LATE ARIABLE TO UPPER CA5E. * Imprimimos el valor WRITE: ARIABLE.
*!'#+& D9@96:= 9 @==5 9 := ;=9:=. REPORT -TE$T. DATA: A T-PE 5TRIN9 ALUE 'HOLA MUNDO'. DATA M- T-PE I. M- 4 5TRLEN6 A 7. WRITE: ( M-.
+jercicio &%% +jemplo de >so de *0*"B'C E: 9@9 99>5 K9695 969:@9 56= 9 :56=6 9 9@=5 9 *0 *"B'C = K=6=89 :@96:= 9 @9= 9 9 @= >=6= ;<99=6 9 99;@= ;5669;@=9:@9 : V@55 5 :;:. REPORT !5-85UBRC. * Imprimir! un teto si la condici#n es $alsa WRITE: 'te+t'. i +=8+3#rc 4 %. WRITE:( 'OF'. en,i. * %ostrar! un mensa&e si la condici#n es $alsa i +=8+3#rc G %. ME55A9E 'No +e encontr' T-PE 'I'. en,i.
+jercicio &%, +jemplo de >so de lLneas tipo taGla. E: 9@9 99>5 K9695 ;5 =6 9 ;5=:5 :@96: 5
sy-vline 0ara
crear co3mna+ +im0e+ ?3e no+ +ir1en 0ara ,eimitar 3n te+to en 3n re0orte. REPORT COLOR. DATA i T-PE I ALUE %. WHILE i G . WRITE: ('Co3mna &') +=81ine) 'Co3mna ') +=81ine. i 4 i &. ENDWHILE.
6
+jercicio &% +jemplo redondeo Karios. P=6= 695:9=6 : :965 @9:95 K=6= 5>;5:9 ;55 9 9@6= = ;5:@:=;:. REPORT TRAN5A. DATA N T-PE P DECIMAL5 . DATA M T-PE P DECIMAL5 ALUE '8&&.<&<&<'. * AB56A#+o3to7: <.<< N 4 AB56 M 7. WRITE: 'AB5: ') N. * 5I9N65i2no7: &.%%8 N 4 5I9N6 M 7. WRITE: ( '5I9N: ') N. * CEIL6Re,on,eo arri#a7: &&.%%8 N 4 CEIL6 M 7. WRITE: ( 'CEIL: ') N. * ;LOOR6Re,on,eo a#aJo7: &.%%8 N 4 ;LOOR6 M 7. WRITE: ( ';LOOR:') N. * TRUNC6Parte entera7: &&.%%8 60arte entera7 N 4 TRUNC6 M 7. WRITE: ( 'TRUNC:') N. * ;RAC6Parte ,ecima7: %.<8 N 4 ;RAC6 M 7. WRITE: ( ';RAC: ') N.
+jercicio &%4 $peraciones matemática. A:= 9 = 5>96=;5:9 =@9@;= == 9: ABAP. REPORT OPERACIONE5. DATA: A T-PE ; ALUE &. DATA: B T-PE ; ALUE &&. DATA: R T-PE ;. R 4 A B. WRITE (: R. " Suma R 4 A 8 B. WRITE (: R. " 'esta R 4 A ( B. WRITE (: R. " Division R 4 A * B. WRITE (: R. " %ultiplicacion R 4 A DI B. WRITE (: R. " Division Entera R 4 5IN6 A 7. WRITE (: R. " Seno R 4 CO56 B 7. WRITE (: R. " (oseno R 4 5KRT6 B 7. WRITE (: R. " 'ai)
6
R 4 LO96 B 7. WRITE (: R. " logaritmo neperiano R 4 LO9&%6 B 7. WRITE (: R. " logaritmo +
+jercicio &%1 ABAP (eG>er. S 9695 69K=6 9 ;5 >=5 = >=5 9 >656== >=6= K96 9 K=569 @5=: = K=6=89 @=5 9 ABAP D9896 9 9 := <966=9:@= 9 K96;=;: >56@=:@9 9 @6=9 9 @9=. =;@K=6= =695 9@5 >=5.
P=6=
P=5 1 M=6;=5 5 BreaNpoint 9: 9 >656== =:5 : ;;7 5869 = :9= 5:9 9695 9 9 >656== <== := >== 5 99;@=5 ;5: [ F" \.
S >=5 [ F( \ 695 >=5 = >=5 ;5>658=:5 5 K=569 9 = K=6=893 >=6= ;5:5;96 9@5 K=569 <= 5 56= 1- P=6:5:5 ;5: 9Mo>se 5869 = K=6=89. $- D=:5 589 ;;7 965 = K=6=89 >==6=: = = K9:@=:= 9 = 969;<= 9 =;@==6=: 9: ;== >=5 9 = 99;;: 9 >656==.
6
S 9695 =6 9 55 9 9896 >=5 M9: >9656 [ P==6 = \ [ N=K9=6 = ;5 9:@9 \.
6
CAP!"#$ $peradores de condición. +jercicio &%2 *entencia CH+CO L= 9:@9:;= CH+CO 9 @= >=6= =896 := ;5:;: 9 K96=96= REPORT !COND!CHECF. * (ompro,amos ue la varia,le SY-S.'( / + WRITE: 'o(&'. CHECF 5-85UBRC EK %. WRITE: 'o'.
+jercicio &%5 *entencia F ..+#*+ L= 9:@9:;= F..+#*+ 9 := 9 = @== 9: ABAP/4 ;5: 9= 9 ;5>=6= : K=56 ;>9 := ;5:;: 99;@= : ;5. REPORT Z_I!_ESLE. DATA: AUTO&6&%7 T-PE C ALUE 'CAMARO') AUTO6&%7 T-PE C ALUE 'CRUE'. I; AUTO& 4 'CAMARO'. WRITE: 'MI AUTO ;AORITO E5 UN CAMARO'. EL5EI; AUTO& 4 'CRUE'. WRITE: 'MI AUTO ;AORITO E5 UN CRUE' . EL5E. WRITE 'MI AUTO ACTUAL E5 UN CRUE'. ENDI;.
L@=5 9 5>96=569 ;5. O>96=56 O>96=56 D9;6>;: ]
EQ
GT
M=56 9
0
LT
M9:56 9
]
GE
M=565=9
0]
LE
M9:565=9
0
NE
D969:@9
BET'EEN %=561 =:
= E
E:@69
%=56 $ IS INITIAL
E ;5:@9:5 :5 <= ;=8=5
IS NOT INITIAL
E ;5:@9:5 <= ;=8=5
6
+jercicio &%6 *entencia CA*+ L= 9:@9:;= CA*+ 9 @= ;=:5 := K=6=89 @9:9 W@>9 5>;5:9 = ;== := 9 = 5>;5:9 9 9 969 =6 := :;:. REPORT !CA5E. DATA: MiEntero%& T-PE I ALUE &. CA5E MiEntero%&. WHEN &. WRITE: 'MI AUTO ;AORITO E5 UN CAMARO'. WHEN . WRITE: 'MI AUTO ;AORITO E5 UN CRUE'. ENDCA5E.
+jercicio &%8 "sando el operador Q diferente. E 5>96=56 Q 9 @= ;=:5 9695 ;5>=6=6 5 K=569 >=6= ;5:5;96 : 5: 969:@9. REPORT !DI;ERENTE. DATA: MiEntero%& T-PE I ALUE &) MiEntero% T-PE I ALUE . I; MiEntero%& G MiEntero%. WRITE: 'Lo+ nmero+ no +on i23ae+'. EL5E. WRITE: 'Lo+ nmero+ +on i23ae+'. ENDI;.
+jercicio &,9 "sando el B+!J++& E 5>96=56 B+!J++& 9 @= ;=:5 9695 =896 := K=6=89 9 9:;9:@6= 9: : 6=:5. REPORT !BETWWEEN. DATA: MiEntero%& T-PE I ALUE &. I; MiEntero%& BETWEEN % AND . WRITE: 'Mi entero e+t> entre e &..'. ENDI;.
6
CAPITULO B3ce+.
+jercicio &,% B>cle ($ E 8;9 (o 9 @= >=6= 99;@=6 := :;: 9:@6= 9@= ;>9 := ;5:;:. REPORT !DO!E&<. DATA: Entero T-PE I ALUE &. DO &% TIME5. Entero 4 Entero &. WRITE: ('E n3mero e+') Entero. ENDDO.
+jercicio &,, B>cle ($ con +R! E 8 ;9 (o = K9;9 9 ;58:= ;5: : E2IT >=6= =6 9 8;9 9@96:== ;5:;: 9 ;>9. REPORT !DO!E&. DATA: Entero T-PE I ALUE &. DO &% TIME5. I; Entero 4 <. E$IT. ENDI;. Entero 4 Entero &. WRITE: ('E n3mero e+') Entero. ENDDO.
+jercicio &, B>cle JDile E 8;9 JDile 9 @= >=6= 99;@=6 := :;: 9:@6= 9 ;>= := ;5:;:. REPORT !WHILE!E&. DATA: Entero T-PE I ALUE &. WHILE Entero LT &%. Entero 4 Entero &. WRITE: ('E n3mero e+') Entero. ENDWHILE.
6
CAP!"#$ 4 Parámetros s>Gr>tinas. +jercicio &,4 Parámetros de entradas. E: 5;=5:9 :9;9@=5 9:@6=6 : K=56 >=6= >65;9=65 >=6= 95 9 @= 5 >=69@65 9 9:@6== 9 9 :586=: ;5: = >==86= 6996K== PARAMETERS. REPORT !PARAMETRO5!E&. PARAMETER5: N3mero& T-PE I. PARAMETER5: N3mero T-PE I. DATA: RE5ULTADO T-PE I. RE5ULTADO 4 N3mero& N3mero. WRITE: RE5ULTADO.
+jercicio &,1 *>Gr>tinas nternas. L= 86@:= 5: @== >=6= 6=9:@=6 9 ;5 9 @= 56= 9 9= ;<5 ; =:@9:9:@53 >=6= ;69=6 := 86@:= 5 <=;95 ;5: = >==86= 6996K== PERFOM. REPORT Z_SUBRUTINAS_E19. PER;ORM M5UBRUTINA. * Im0ementacin ,e a +3#r3tina. ;ORM M5UBRUTINA. WRITE: 'E+to e+ 3n eJem0o ,e +3#r3tina interna'. END;ORM.
+jercicio &,2 *>Gr>tinas nternas con parámetros. L= 86@:= >96@9: >==6 >=69@65 = 9 = :;5:9. REPORT Z_SUBRUTINAS_E19. DATA: Entero T-PE I ALUE &. PER;ORM M5UBRUTINA U5IN9 ENTERO. * Im0ementacin ,e a +3#r3tina. ;ORM M5UBRUTINA U5IN9 ENTERO. WRITE: 'Im0rimira e Entero:') ENTERO. END;ORM.
+jercicio &,5 *>Gr>tinas +Sterna con parámetros. L= 86@:= @=8V: >99: 9@=6 8;== 9: ;<965 9@96:5 >=6= <=;96 9 @6=8=5 56=:=5 9 := 9 = 89:= >6;@;= 9 >656==;: ABAP/4. 1 . C69=5 9 >696 >656== 9 9 ==695 XDB REPORT DB. DATA: Entero T-PE I ALUE &. PER;ORM M5UBRUTINA U5IN9 ENTERO. * Im0ementacin ,e a +3#r3tina.
6
;ORM M5UBRUTINA U5IN9 ENTERO. WRITE: 'Im0rimira e Entero:') ENTERO. END;ORM.
$ . C69=5 9 9:5 >656== XCALCULO 9 ==6 = 86@:= REPORT !CALCULO. PER;ORM M5UBRUTINA U5IN9 ENTERO6!DB7 U5IN9 ENTERO.
+jercicio &,6 Plantilla de ABAP/4 E >56@=:@9 9: = >656==;: =:@9:96 : 569: >=6= 9 9 ;5 9= 989 >56 ;=96 5@65 >656==5 >=6= 95 9 @= = >=:@=. E@5 9 : 99>5 9 := >=:@= 9>9. *888888888888888888888888888888888888888 * Nom#re Re0orte: !PLANTILLA!E * A3tor: MARLON * ;ECHA: .&.&< *8888888888888888888888888888888888888888 * Mo,iicacione+: 5e a2re2aron o+ Dato+ * ;ec/a: .&.&< *8888888888888888888888888888888888888888 REPORT !PLANTILLA!E. ******************************************* * DATO5 ******************************************* DATA: Entero T-PE I ALUE &. ******************************************* * 5ALIDA DE DATO5 ******************************************* WRITE: 'Im0rimir>'.
6
CAP!"#$ 1 !aGlas internas. +jercicio &,8 !aGlas internas. E: ABAP/4 = K9;9 :9;9@=5 >65;9= K=65 69@65 9: @9>5 9 99;;:3 >=6= 95 9 @=: = @=8= :@96:=3 5: 9@6;@6= 9 8=9 9 =@5 9 >99 @9:96 = = 9@6;@6= 9 = @=8= 9:@9 5 >99 @9:96 9@6;@6= >65>=. L= >==86= 6996K== $CC"'* 9>9;;= = ;=:@= 9 69@65 9 ;=96 9 =6=;=:@= 9: = 956=3 ;=:5 9 K=56 9 :;= 9 >99 @9:96 9 69@65. REPORT HOLAMUNDO. * Decaramo+ 3na ta#a interna DATA: BE9IN O; INT!ALUMNO5 OCCUR5 %) Nom#re6<7 T-PE C) A0ei,o+6<7 T-PE C) EDAD67 T-PE I) ;ECHA T-PE D) END O; INT!ALUMNO5. * Lenamo+ a ta#a interna INT!ALUMNO58Nom#re 4 'Maron'. INT!ALUMNO58A0ei,o+ 4 ';acon'. INT!ALUMNO58EDAD 4 '<'. * Act3aiQamo+ o+ ,ato+ APPEND INT!ALUMNO5. * Recorremo+ a ta#a interna me,iante LOOP LOOP AT INT!ALUMNO5. WRITE: ( INT!ALUMNO58NOMBRE) INT!ALUMNO58A0ei,o+. ENDLOOP.
+jercicio &9 !aGlas internas estr>ct>ra eneral. E@= 9 = 9@6;@6= 9:96= 9 := @=8= :@96:=. REPORT ZEEMPLO1. TABLE5: T&)T. DATA: BE9IN O; GNom#re ,e a ta#a interna. CAMPO%& T-PE I) CAMPO% T-PE C. END O; INTERNAL GNom#re ,e a ta#a interna.
E: 9 :5869 9 = @=8= :@96:= 9 ;55;= ;=96 ;=9:= 9 ;=6;@96 >965 ;55 >=@6: 9>69 9 89:5 9>9= 6 ;5: &!IT 9 9;6 = @=8= 9
6
== CA*A = @=8= :@96:= 9 ==6 &!ICA*A. E: 9 9:@9 99>5 K9695 ;5 =;5:=6 69@65 = := @=8= :@96:=. +jercicio &% !aGlas internas con caGecera. S 89: 9 >99 :5 :;6 = ;=89;96= 9 = @=8= :@96:= 9>69 9 69;59:=89 ;55;=6=3 9: 9@9 99>5 K9695 ;5 <=;965. C55 ;5:;9>@5 = ;=89;96= 9 9 W:;5 69@65 9 9 @= >=6= =69=6 69;56696 =@5 9 ;96>5 9 = @=8= :@96:=. REPORT Ta#a+!Interna+!E. * (reamos la estructura de la ta,la interna * utili)amos la ta,la 0N1 maestro de clientes T-PE5: BE9IN O; +t!FNA&) NAME& LIFE FNA&8NAME&) " Nom,re TEL;& LIFE FNA&8TEL;&) " 2ele$ono LAND& LIFE FNA&8LAND&) "Pais END O; +t!FNA&. * (reamos la ta,la interna IN20N1 DATA: INT!FNA& T-PE 5TANDARD TABLE O; +t!FNA& WITH HEADER LINE. * (ampo para ue el usuario entre un valor * .S-Partner PARAMETER5: 0!NAME& LIFE FNA&8NAME&. * Llenamos la ta,la 5ELECT NAME& TEL;& LAND& ;ROM FNA& INTO TABLE INT!FNA& WHERE NAME& 4 0!NAME&. *Imprimimos los datos de la ta,la interna LOOP AT INT!FNA&. WRITE: ( INT!FNA&8NAME&) INT!FNA&8TEL;&) INT!FNA&8LAND&. ENDLOOP.
+jercicio &, !aGlas internas cons>lta de >s>arios. E: 9@9 99>5 K9695 ;5 >56@=6 = 9@6;@6= 9 := @=8= 9 SAP3 9 99>5 9@6= 9 :58693 =:=:@9 @= 9;<= 9 9:@6== = @9= 9 : =65 9: SAP. P=6= 95 @=695 = @=8= USR$. *8888888888888888888888888888888888888* * REPORT U5ER& * A3tor MARLON ;ALCON *8888888888888888888888888888888888888888* REPORT U5ER&. * Creamo+ a e+tr3ct3ra ,e a ta#a U5R% TABLE5: U5R%. DATA: BE9IN O; 5T!U5UARIO5. INCLUDE 5TRUCTURE U5R%. DATA END O; 5T!U5UARIO5.
6
* Creamo+ a ta#a interna con ca#ecera DATA INT!U5UARIO5 LIFE TABLE O; 5T!U5UARIO5 WITH HEADER LINE. * Entramo+ e U+3ario ?3e ?3eremo+ con+3tar PARAMETER5: PU5UARIO LIFE U5R%8BNAME. * Hacemo+ 3na con+3ta a a ta#a U5R%& = enamo+ a ta#a interna. * Im0rimimo+ en 0antaa o+ 1aore+. 5ELECT * ;ROM U5R% INTO CORRE5PONDIN9 ;IELD5 O; TABLE INT!U5UARIO5 WHERE BNAME 4 PU5UARIO. LOOP AT INT!U5UARIO5. WRITE: ( INT!U5UARIO58BNAME) INT!U5UARIO58MANDT) INT!U5UARIO58TRDAT. ENDLOOP.
+jercicio & !aGla interna simple. E@9 9 : 99>5 >;=5 9 : @=8= :@96:=. REPORT 5KL&. TABLE5: MARA. DATA: INT!MARA LIFE MARA OCCUR5 &%%% WITH HEADER LINE. 5ELECT * ;ROM MARA INTO TABLE INT!MARA UP TO &%% ROW5.. LOOP AT INT!MARA. WRITE:( INT!MARA8MANDT. ENDLOOP.
+jercicio &4 !aGlas internas con reas de traGajo. E@9 9 : 99>5 K9695 ;5 @6=8==6 ;5: =V69= 9 @6=8=5 @=8= : ;=89;96=. E: 9 99>5 9 5@6=6 9 >696 69@65 9 := @=8=. REPORT ZOPERACIONES. * Declaro el área de trabajo. DATA A_ICON LIE ICON. * Declaro el parametro de entrada. PARAMETER PA_NAME LIE ICON#NAME DE!AULT ICON_TOTAL_LE!T. * Selecciono el primer valor SELECT SINGLE NAME ID !ROM ICON INTO CORRESPONDING!IELDS O! A_ICON HERE NAME : PA_NAME. RITE A_ICON#ID A_ICON#NAMECOLOR CO&_E".
6
+jercicio &1 !aGlas internas con F+#(*0MB$#* E@9 9 : 99>5 K9695 ;5 @6=8= =6 ;5: F+#(*0MB$#* 9 :5 5: 9 >:@965 9: ABAP. U: >:@965 9 ;5:5;9 ;55 := K=6=89 9 <=;9 69969:;= = := 69;;: 9 956= 9: : >656==. REPORT ZOPERACIONES. * Creamos la estructura de la tabla. T"PES BEGIN O! ST_ICON ID LIE ICON#ID NAME LIE ICON#NAME END O! ST_ICON. * Creamos el parámetro de entrada. PARAMETER PA_NAME &(% ICON#NAME DE!AULT ICON_TOTAL_LE!T. * Declaro la tabla interna si cabecera DATA TI_ICON T"PE STANDARD TABLE O! ST_ICON. * Declaro el FIELD-SYM!LS !IELD#S"MBOLS F!S_ICON LIE LINE O! TI_ICON. * "acemos la consulta SELECT NAME ID !ROM ICON INTO TABLE TI_ICON HERE NAME : PA_NAME. * #ecorremos la tabla interna LOOP AT TI_ICON ASSIGNING F!S_ICON. RITE F!S_ICON#ID F!S_ICON#NAME. ENDLOOP.
CAP!"#$ 1 (iccionario de datos +jercicio &2 +ntrando al (( ;*+%%< E: 9 ;;5:=65 9 =@5 9@: @5= = @=8= 9 9;689: 9 @9= SAP. P=6= 9:@6=6 9 ;;5:=65 5 <=;95 9=:@9 9 M+&"/H+''AM+&!A*/ J$'OB+&CH ABAP/(+*A''$##$/*+%% (C!$&A'0 ABAP ) +,(* -( >+,)- (/%') + &+ /+*-+''(* SE11.
6
E* %& '+,=) T+&+ % +-% +)- %*/+,)- &+ +&+ ?% ?%/%,)- ')*-&+/ %* %-% %J%,=&) -+/%,)- &+
USR02
?% ,%-/+ %& &(-+) % -+/()- %* SAP. U*+ >%K -%&%''()*++ &+ +&+
=&-+,)- %& )* (*%/()/ (-+&(K+/. " >%/%,)- &+ %-/'/+ % &+ +&+ ')*-&++. P+/+ >(-+&(K+/ &)- D+)- %*%,)- ?% =&-+/ &+ '),(*+'(* % %'&+)* C)*%*().
6
Ctrl + Shif + F10)
=&-+,)- %&
N)- -+&/@ *+ >%*+*+ % =&-+,)- !8 ) %& )* %J%'+/.
U*+ %J%'++ *)- ,)-/+/@ ))- &)- /%(-/)- % &+ +&+ ')*-&++ USR02.
+jercicio &5 !aGla de >na transacción. L= @6=:=;;5:9 9: SAP 9@: ;5>9@= >56 969:@9 =@53 >=6= =896 9 :9 SAP @5= 5 =@5 @9:9 9 96 9@5 >=5. 1- E9;@=5 = @6=:=;;: 9 9695 69K=6 9: 9@9 99>5 @=69 = %A1 - C69=6 596@= 9 K9:@=. S5869 9 ;=>5 56=:=;: 9 K9:@= >695:=5 = @9;= F1 A=.
6
$- E: = K9:@=:= 9 == >=5 I:56=;: @V;:;=.
!- E: = K9:@=:= datos t@cnicos =@9 9 @9 9@6= 9 :5869 9 = @=8= 9: 9@9 ;=55==@5 @=8= 9 9 =>99 :BAO.;5:@=69 A<56= K= = =ABAP. *+%% 8;= 9 = ;=>53 @=8= K96= @55 99
6
+jercicio &6 Cons>lta para >na taGla de ((. E@= >=:@= @9 96K6 >=6= := K9 9 @9:= := @=8= 9 DD D;;5:=65 9 D=@5# 96= ;5:@=6 @55 ;5:@9:5 99 ABAP 5 >9= <=;963 =695 = = @=8= 9 99>5 =:@9656. $###########################################$ $ R%=)/ ZO!ERTAS $ A)/ MARLON !ALCON $###########################################$ REPORT ZO!ERTAS. $ C/%+,)- &+ %-/'/+ % &+ +&+ (*%/*+ ')* &+ +&+ BA TABLES BA. DATA BEGIN O! ST_BA. INCLUDE STRUCTURE BA. DATA END O! ST_BA. $ C/%+,)- &+ +&+ (*%/*+ ')* '+%'%/+ DATA INT_BA LIE TABLE O! ST_BA ITH HEADER LINE. $ I,=/(,(,)- %* =+*+&&+ &)- >+&)/%-. SELECT $ !ROM BA INTO CORRESPONDING !IELDS O! TABLE INT_BA. LOOP AT INT_BA. RITE INT_BA#ORG O/+*(K+'(* %%*+ INT_BA#TEG C+*+& % (-/('(* INT_BA#SPART. S%')/ ENDLOOP.
+jercicio &8 'eporte A:# con >na taGla del ((. E@= >=:@= @9 96K6 >=6= := K9 9 @9:= := @=8= 9 DD D;;5:=65 9 D=@5# 96= ;5:@=6 9=:@9 : R9>56@9 AL% REPORT AL%&. * Car2amo+ o+ ,ato+ ti0o +i+ T-PE8POOL5 5LI5. DATA: 9!INT!ie,cat T-PE +i+!t!ie,cat!a1) 9!5T!ie,cat T-PE +i+!ie,cat!a1. * Creamo+ a e+tr3ct3ra ,e a ta#a interna con a ta#a MARA TABLE5: MARA. DATA: BE9IN O; 5T!MARA. INCLUDE 5TRUCTURE MARA. DATA END O; 5T!MARA. * Creamo+ a ta#a interna con ca#ecera DATA INT!MARA LIFE TABLE O; 5T!MARA WITH HEADER LINE. * Co0iamo+ o+ ,ato+ ta#a MARA a a ta#a interna INT!MARA 5ELECT * ;ROM MARA INTO TABLE INT!MARA. * Im0rimimo+ en 0antaa o+ 1aore+. ;ie,cat 9!5T!ie,cat8ie,name 4 'MANDT'. "Nom#re ,e cam0o ,e a ta#a 9!5T!ie,cat8+ete@t!m 4 'Man,ante'. "De+cri0cin me,iana 9!5T!ie,cat8+ete@t!+ 4 'Man.'. "De+cri0cin corta APPEND 9!5T!ie,cat TO 9!INT!ie,cat.
6
9!5T!ie,cat8ie,name 4 'MTART'. 9!5T!ie,cat8+ete@t!m 4 'Ti0o ,e materia'. 9!5T!ie,cat8+ete@t!+ 4 'Ti0.'. APPEND 9!5T!ie,cat TO 9!INT!ie,cat. * ;3ncin 0ara mo+trar e AL CALL ;UNCTION 'REU5E!AL!9RID!DI5PLA-' E$PORTIN9 it!ie,cat 4 9!INT!ie,catS I!9RID!TITLE 4 'AL%&(Ta#a81i+ta 0ara BD 2ica M9M' TABLE5 t!o3tta# 4 INT!MARAS E$CEPTION5 0ro2ram!error 4 & OTHER5 4 .
+jercicio &49 F>ll 'eporte A:# de >na taGla. E@= >=:@= @9 96K6 >=6= := K9 9 @9:= := @=8= 9 DD D;;5:=65 9 D=@5# 96= ;5:@=6 9=:@9 : R9>56@9 AL%. REPORT AL%. * Car2amo+ o+ ,ato+ ti0o +i+ T-PE8POOL5 5LI5. DATA: 9!INT!ie,cat T-PE +i+!t!ie,cat!a1) 9!5T!ie,cat T-PE +i+!ie,cat!a1. * Creamo+ a e+tr3ct3ra ,e a ta#a MARA TABLE5: MARA. DATA: BE9IN O; 5T!MARA. INCLUDE 5TRUCTURE MARA. DATA END O; 5T!MARA. * Creamo+ a ta#a interna con ca#ecera DATA INT!MARA LIFE TABLE O; 5T!MARA WITH HEADER LINE. * Co0iamo+ o+ ,ato+ ta#a MARA a a ta#a interna INT!MARA 5ELECT * ;ROM MARA INTO TABLE INT!MARA UP TO &%% ROW5. * Lamamo+ a 3ncin 0ara +a#er to,o+ o+ cam0o+ ,e a ta#a. DATA: BE9IN O; INT!TAB OCCUR5 &%%. INCLUDE 5TRUCTURE D;IE5. DATA: END O; INT!TAB. ca 3nction 'DDI;!;IELDIN;O!9ET' e@0ortin2 ta#name 4 'MARA' * ;IELDNAME 4 ' ' LAN9U 4 5-8LAN9U * L;IELDNAME 4 ' ' * ALL!T-PE5 4 ' ' * IMPORTIN9 * $%%L!WA 4 WATAB * *
DDOBT-PE D;IE5!WA
4 4
6
*
LINE5!DE5CR 4 TABLE5 D;IE5!TAB 4 INT!TAB * ;I$ED!ALUE5 4 E$CEPTION5 NOT!;OUND 4 & INTERNAL!ERROR 4 OTHER5 4 . i +=8+3#rc G %. WRITE:( 'No +e enc3entra o+ cam0o+'. en,i. * Im0rimimo+ en 0antaa o+ 1aore+. ;ie,cat LOOP AT INT!TAB. 9!5T!ie,cat8ie,name 4 INT!TAB8;IELDNAME. 9!5T!ie,cat8+ete@t!m 4 INT!TAB8;IELDTE$T. 9!5T!ie,cat8+ete@t!+ 4 INT!TAB8;IELDNAME. APPEND 9!5T!ie,cat TO 9!INT!ie,cat. ENDLOOP. * ;3ncin 0ara mo+trar e AL CALL ;UNCTION 'REU5E!AL!9RID!DI5PLA-' E$PORTIN9 it!ie,cat 4 9!INT!ie,catS I!9RID!TITLE 4 'AL%&(Tit3o AL' TABLE5 t!o3tta# 4 INT!MARAS E$CEPTION5 0ro2ram!error 4 & OTHER5 4 .
+jercicio &4% Crear >n (ominio. E 5:5 9: SAP 9 9 == = 9 6=:5 9 K=569 9 >99 @9:96 : ;=>5 9 = @=8=. E9>5 9 5:5 C$#$'IA"!$ >99 @9:96 R553 %9693 A3 9@;.#. E 5:5 :5 =6= :56=;: 9 @==5 53 @>5 9 :56=;: 9 9 ;55;=695. P=6= ;69=6 : 5:5 695 = = @6=:=;;: *+%% ;69=695 9 5:5 =(IC$#$'IA"!$.
6
E:@6=5 = K=6=89 (escripción GreKe P595 >5:96 : @9@5 9 9;68= 9 ;=>5. !ipo de datos S99;;5:=5 CHAR >=6= 9;6 9 9 := ;=9:=. Ctd. posiciones 1 #onit>d de salida 1
%=5 = = >9@== Á8@5 K= 9:5 5 K=569 9 >99 @5=6 9 ;=>5 9 9@9 ;=5 5: 5 >589 ;5569.
6
P56 W@5 G=6=53 =5 := 569: 9 @6=:>56@9 =;@K=5. +jercicio &4, Crear >n +lemento de dato. L5 999:@5 9 =@5 ;5:@9:9: 9 ;5::@5 9 = 9;6>;: 9 ;=>5 9 5:5. P=6= ;69=6= 5 <=695 @=8V: ;5: = @6=:=;;: SE11. E: @>5 9 =@5 ;55;=5 EDXCOLORXAUTO.
E: = >6= K9:@=:= 99;;5:=5 E9.=@5 >=5 ;5:@:=6.
6
C69=5 := 9;6>;: 869K9 9 999:@5 9 =@53 ;55;=5 9 5:5 9 9695 9 ;5:@9:=.
E: = >9@== (enom.campo ;55;=695 = 969:@9 9;6>;: 9 =>=69;96 9: = = @=8= 9: 9>9:9:;= 9 @==5 9 9 9@69. D9>V =6=5 =;@K=5.
6
+jercicio &4 Crear taGla transparente ;*+%%<. P=6= ;69=6 := @=8= @6=:>=69:@9 9:@6=695 = = @6=:=;;: SE11 ;5: T=8= 9 8=9 9 =@5 99;;5:=5 9:@6=5 9 :5869 9 99>5 9 =695 9 9 =!!P$*IA"!$* >=5 9 85@: ;69=6.
C55;=5 5 9:@9 =@5 (escripción GreKe D9;6>;: 9 = @=8= Clase de entrea A P569 ==;9:=6= =@53 @=8= 9 =>;=;:. Browser datos %=./A;@=.>96@=.
( >=5 9 85@: TIPOS INSTALADOS 8;=5 INT1 M$(+#$ 8;=5 9 999:@5 9 =@5 AL%XCHAR4. C$#$' 8;=5 9 999:@5 9 =@5 9 ;69=5 9 9 == EDXCOLORXAUTO.
6
D9:5 ;= 96 9 K=56 ;=K9 9: 9@9 ;=5 @=695 9>69 = >696= = 9 = @=8= >56 5 9 9: = ;5:= ClK = =6;5. G=6=5 9: = >6= K9:@=:= ;=:5 :5 >= = C=9 9 =@5 ;55;=5 APPLO 9 :;= =@5 =9@653 Cate.tamaUo >5:95 9 969 9;6 =@5 9:@69 ...* 69@65.
%=5 = 9:W D9@=9/C=@956= 9 =>=;: 99;;5:=5 A>=89 9 ;=96 =:96=. G6=8=5 =;@K=5.
6
+jercicio &44 #lenar >na taGla de datos ;*+%2<. P=6= 9 9:=5 9 = @=8= 9 @= = @6=:=;;: SE1*3 8;=5 9 :5869 9 = @=8= 9 <=8=5 ;69=5 9: 9 99>5 =:@9656 >=5 E:@96.
6
CAP!"#$ 2 $P+& *3# Cons>ltas ABAP ntrod>cción a $P+& *3#. E ;5:5;5 9: ABAP $P+& *3# = = 9:@9:;= SQL S@6;@69 Q96 L=:=9 9 5: @== >=6= @6=8==6 ;5: @=8= 9 8=9 9 =@5. E: 9@9 ;=>@5 K9695 5 1 99>5 @=5. L= 9:@9:;= ;5: - SELECT S99;;: 9 =@5# - INSERT I:96@=5 =@5# - UPDATE A;@==5 =@5# - OPEN CURSOR A869 : ;656# - FETCH AK=:= := >5;: 9 ;656# - CLOSE CURSOR C966= 9 ;656# - COMMIT 'OR A;@== 5 =@5 9: = @=8=# - ROLLBAC 'OR D9<=;96 ;=85 9: = @=8=# +jercicio &41 Cons>lta Gásica directa. E@9 99>5 9@6= := ;5:@= 8;= 5:9 9 99;;5:=695 @55 5 ;=>5 9 = @=8= @=695 := @=8= :@96:= 9 9 <=695 : ;5:;: IF >=6= >6=;@;=6 5 ;5:;9>@5. REPORT ZSL1. TABLES MARA. SELECT SINGLE $ !ROM MARA. I! S"#SUBRC :0. RITE MARA#MATNR. ELSE. RITE ERROR. ENDI!.
+jercicio &42 Cons>lta Gásica con !. E@9 99>5 9@6= := ;5:@= 8;= 5:9 9 99;;5:=695 @55 5 ;=>5 9 = @=8= @=695 := @=8= :@96:= 9 9 <=695 : ;5:;: IF >=6= >6=;@;=6 5 ;5:;9>@5. REPORT ZSL01. $ C/%+,)- &+ %-/'/+ % &+ +&+ MARA
6
TABLES MARA. DATA BEGIN O! ST_MARA. INCLUDE STRUCTURE MARA. DATA END O! ST_MARA. $ C/%+,)- &+ +&+ (*%/*+ ')* '+%'%/+ DATA INT_MARA LIE TABLE O! ST_MARA ITH HEADER LINE. $ OPEN SL BASICO SELECT $ !ROM MARA INTO TABLE INT_MARA. $ I,=/(,(,)- &)- D+)LOOP AT INT_MARA. I! INT_MARA#NTGE F 0. RITE INT_MARA#MANDT-#>&(*% INT_MARA#MAT-#>&(*% INT_MARA#NTGE-#>&(*%. ENDI!. ENDLOOP. RITE C)&,*+ 1 -#>&(*% C)&,*+ 2 -#>&(*%. ( : ( 1.
+jercicio &45 Cons>lta primeras %99 filas. P=6= 9@9 99>5 @=695 9 99>5 =:@9656 55 5;=695 = 9:@9 :9=. S9 5@6=6 55 = 1 >696= =. $ OPEN SL ?% ,%-/+ &+- =/(,%/+- 100 !(&+SELECT $ !ROM MARA INTO TABLE INT_MARAUP TO &%% ROW5.
+jercicio &46 Cons>lta condición. P=6= 9@9 99>5 @=695 9 99>5 =:@9656 55 5;=695 = 9:@9 :9=. $ OPEN SL -)&) ')=(+ &)- ?% ',=&%* &+ ')*('(* S%')/ 00.
5ELECT * ;ROM MARA INTO TABLE INT!MARA WHERE 5PART 4 '%%'.
+jercicio &48 Mostrar primera fila en >na taGla S99;;5:=695 = >696= = 9 = @=8= 9 ;>= = ;5:;: 9:@9. REPORT ZSL1. TABLES MARA. SELECT SINGLE $ !ROM MARA HERE MATNRE 000000000000000023. I! S"#SUBRC :0. RITE MARA#MATNR. ELSE.
6
RITE ERROR. ENDI!.
+jercicio &19 *eleccionamos todos . E: 9@9 99>5 :5 =695 @=8= :@96:= :5 9 9: ;5: 9 SELECT 695 >69:5 5 K=569. REPORT ZSL1. TABLES MARA. SELECT $ !ROM MARA. RITE MARA#MATNR. ENDSELECT. I! S"#SUBRC NE 0. RITE ERROR. ENDI!.
+jercicio &1% *eleccionar sin taGla interna. E: 9@9 99>5 :5 =695 @=8= :@96:= :5 9 9: ;5: 9 SELECT 695 >69:5 5 K=569. REPORT ZSL1. TABLES MARA. SELECT $ !ROM MARA. RITE MARA#MATNR. ENDSELECT. I! S"#SUBRC NE 0. RITE ERROR. ENDI!.
+jercicio &1, MáSimoV MLnimoV Cantidad. S @9:95 := @=8= 9695 =896 = ;=:@= 9 69@65 =5 C$"&!. REPORT ZSL1. TABLES MARA. DATACONTADOR T"PE I. SELECT COUNT;$< !ROM MARA INTO CONTADOR. RITE CANTIDADCONTADOR.
P=6= =896 9 5 K=56 9 := ;5:= =5 MAR REPORT ZSL1. TABLES MARA. DATA MAIMO LIE MARA#BRGE. SELECT MA; BRGE < !ROM MARA INTO ;MAIMO<. RITE MA PESO MAIMO .
P=6= =896 9 9:56 K=56 9 := ;5:= =5 M&
6
REPORT ZSL1. TABLES MARA. DATA MAIMO LIE MARA#BRGE. SELECT MIN; BRGE < !ROM MARA INTO ;MAIMO<. RITE MINIMO PESO MAIMO .
+jercicio &1 *"MA 0 P'$M+($. S @9:95 := @=8= 9695 =6 @5= = ;5:= =5 *"M. REPORT ZSL1. TABLES MARA. DATA SUMA T"PE !. SELECT SUM; BRGE
P=6= =896 9 P6595 @=5 A:REPORT 5KL&. TABLE5: MARA. DATA: PROMEDIO T-PE ;. 5ELECT A96 BR9EW 7 ;ROM MARA INTO 6PROMEDIO7. WRITE: ( 'EL PROMEDIO:')PROMEDIO.
+jercicio &14 B>scando cadenas W>e contenan otras. P=6= 8;=6 5 69>5:=89 9 =@96=9 9 ;59:=: ;5: = 9@6= M 5 <=;95 =. REPORT 5KL&. TABLE5: MARA. 5ELECT * ;ROM MARA WHERE AENAM LIFE 'M'. WRITE: ( MARA8AENAM. END5ELECT.
+jercicio &11 B>scando cadenas con listas. & P=6= 8;=6 5 =@96=9 9 ;>=: ;5:;5:9 9 >99: 96 @= =5 = 9:@9:;= IN 9 ;55 =6 9 AND >965 >96@9 ;5:6=6 K=65 K=569. REPORT 5KL&. TABLE5: MARA. 5ELECT * ;ROM MARA WHERE BR9EW IN 6&%)&%%)&%%%)%%%7.
6
WRITE: ( MARA8BR9EW. END5ELECT.
+jercicio &12 *eleccionando >n rano B+!J++&. S @9:95 9 9: : ;=>5 :V6;5 8;=6 5 9 9 9:;9 :@69: 9:@69 5 K=569 5 <=;95 =. E: 9@9 99>5 5 =@96=9 9 @9:=: >95 9: 1 1. REPORT 5KL&. TABLE5: MARA. 5ELECT * ;ROM MARA WHERE BR9EW BETWEEN &%% AND &%%%. WRITE: ( MARA8BR9EW. END5ELECT.
+jercicio &15 Mostrar taGla ordenada. S 9695 := ;=>5 569:=:5 @=5 = 9:@9:;= $'(+' B0. REPORT 5KL&. TABLE5: MARA. 5ELECT * ;ROM MARA ORDER B- AENAM. WRITE:( MARA8AENAM. END5ELECT.
+jercicio &16 Mostrar todos los iconos en *AP S 9695 >99:@=6 9: :9@6= >=:@== 9 99;;: ;5:5 >595 @9:96 : @=5 ;5>9@5 9 ;5:5. REPORT ICO. TABLE5: ICON. 5ELECT * ;ROM ICON. WRITE :( ICON8name) 'V') ICON8i,&67) '') % ICON8i,. END5ELECT.
+jercicio &18 Cons>lta a dos taGlas en *AP. S 9695 <=;96 := ;5:@= 9 9 9@69 ;=>5 9 5 @=8= 9: SAP @=5. U=695 = @=8= !'(' 9 ;5:@9:9 @55 5 >656== = @=8= !*!C 9 ;5:@9:9 @5= = @6=:=;;5:9 9: B0.
6
REPORT TRAN5A. * Declaraci#n de la estructura T-PE5: BE9IN O; T!TRAB) NAME LIFE TRDIR8NAME) "(1%PO DE 2'DI' 5UBC LIFE TRDIR85UBC) "(1%PO DE 2'DI' P9MNA LIFE T5TC8P9MNA) "(1%PO DE 2S2( TCODE LIFE T5TC8TCODE) "(1%PO4 DE 2S2( END O; T!TRAB. * Declaraci#n de la ta,la interna DATA: IT!TRAB T-PE TABLE O; T!TRAB WITH HEADER LINE. 5ELECT TRDIRNAME TRDIR5UBC T5TCP9MNA T5TCTCODE INTO TABLE IT!TRAB ;ROM TRDIR INNER OIN T5TC ON 6 TRDIRNAME 4 T5TCP9MNA 7 WHERE TRDIRNAME LIFE '-' OR TRDIRNAME LIFE '' AND TRDIR5UBC EK '&'. LOOP AT IT!TRAB. WRITE : ( IT!TRAB8NAME) IT!TRAB8TCODE. ENDLOOP.
6
CAP!"#$ 5 Ampliaciones &otas +jercicio &29 Hola M>ndo en ABAP/4. E: 9@9 :9@65 >696 >656== @9 9:9=69 ;55 ;69=6 : 9=6655 3 5=9:@9 @=695 = :;: 9
6
CAP!"#$ 6 Proramación $rientado a $Gjetos. ?3>@ es la proramación orientado a oGjetos L= >656==;: 569:@=5 = 589@5 P$$ 9 : >=6== 9 >656==;: 9 = ;=9 589@5 9;689:5 9 56= 69= = =>;=;5:9. CLASE 569:@=5 = 589@5 P$$ 9 : >=6== 9 >656==;: +jercicio &2% Hola M>ndo de P$$. E: 9@9 99>5 <=695 : 69>56@9 569:@== = 589@5 9: ABAP3 ;5: : V@55 >W8;5 9 >66 : 9:=9 9: >=:@==. REPORT POO. * De$inimos la clase CLA55 C!MICLA5E DE;INITION. PUBLIC 5ECTION. METHOD5: IMPRIMIR. PRIATE 5ECTION. DATA: CONTADOR T-PE I ALUE &. ENDCLA55. * Hacemo+ a im0ementacin CLA55 C!MICLA5E IMPLEMENTATION. METHOD IMPRIMIR. CONTADOR 4 CONTADOR &. WRITE :( 'E 1aor e+:' ) CONTADOR. ENDMETHOD. ENDCLA55. * In+tanciamo+ a ca+e * Bo?3e ?3e +e eJec3tar> tra+ 0antaa ,e +eeccin 5TART8O;85ELECTION. DATA: M-CLA5E T-PE RE; TO C!MICLA5E. CREATE OBECT M-CLA5E. CALL METHOD M-CLA5E8IMPRIMIR. END8O;85ELECTION.
+jercicio &2, P$$ con m@todos parámetros E: 9@9 99>5 <=695 : 69>56@9 ;5: V@55 >=69@65 >56 5 ;=9 ;5>=6@695 =@5. REPORT POO&. * De$inicion de clase CLA55 C!5UMA DE;INITION. PUBLIC 5ECTION.
6
CLA558METHOD5: ca++!con+tr3ctor. METHOD5:5UMAR IMPORTIN9 ALUE6ALOR7 T-PE I) RE5TAR!DO5) E5TADO) RE5ULTADO E$PORTIN9 ALUE6ALOR7 T-PE I. PRIATE 5ECTION. DATA: AR& T-PE I ALUE &%) AR T-PE I ALUE &%. ENDCLA55. * Implementamos el m5todo de la clase CLA55 C!5UMA IMPLEMENTATION. METHOD ca++!con+tr3ctor. WRITE: ( 'E+to e+ 3n eJem0o ,e ca+e+'. ENDMETHOD. METHOD 5UMAR. AR& 4 AR& ALOR. AR 4 AR ALOR. ENDMETHOD. METHOD E5TADO. WRITE: ( AR&)AR. ENDMETHOD. METHOD RE5TAR!DO5. AR& 4 AR& 8 . ENDMETHOD. METHOD RE5ULTADO. ALOR 4 AR& AR. WRITE: ( ALOR. ENDMETHOD. ENDCLA55. * (reamos la instancia de la clase 5TART8O;85ELECTION. DATA: M-CLA5E T-PE RE; TO C!5UMA. CREATE OBECT M-CLA5E. CALL METHOD M-CLA5E8E5TADO. CALL METHOD M-CLA5E8RE5TAR!DO5. CALL METHOD M-CLA5E8E5TADO. CALL METHOD M-CLA5E85UMAR6 & 7. CALL METHOD M-CLA5E8E5TADO. CALL METHOD M-CLA5E8RE5ULTADO. END8O;85ELECTION.
+jercicio &2 P$$ Herencia de clases. E: 9@9 99>5 K9695 ;5 <=;96 <969:;= 9 ;=9 9: ABAP. REPORT ZPO02. CLASS PAPADE!INITION. PUBLIC SECTION. METHODS ESTADO. PRIATE SECTION.
6
DATA AR1 T"PE I ALUE 10. ENDCLASS. * Implementamos el m$todo de la clase CLASS PAPAIMPLEMENTATION. METHOD ESTADO. AR1 : AR1 2. RITE AR1. ENDMETHOD. ENDCLASS. * Creamos la clase "I%! &ue 'ereda de ()() CLASS HIO DE!INITION INHERITING !ROM PAPA. ENDCLASS. * Creamos la instancia de la clase START#O!#SELECTION. DATA M"CLASE T"PE RE! TO HIO. CREATE OBECT M"CLASE. CALL METHOD M"CLASE#ESTADO. CALL METHOD M"CLASE#ESTADO. END#O!#SELECTION.
6
CAP!"#$ 6 Proramación de diáloos +jercicio &24 Mensajes en ABAP L5 9:=9 9: ABAP/4 9 @=: >=6= :56=6 = =65 9 =W : =@5 699K=:@9 9 @9:9 9 =896 9@9: 969:@9 @>5 9 9:=9. T=8= 9 @>5 9 9:=9 9: ABAP. T
D9;6>;:
L5:@ >56 99;@5
A
C=:;9=;:
E 9:=9 =>=69;9 9: : ;=65 9 =55 9 >656== @96:=.
E
E6656
E 9:=9 =>=69;9 9: : ;=65 9 =55 9 >656== ;5:@:=
I
I:56=;:
S9 9@6= : ;=65 9 =55 9 :56=;:.
S
E@=5
E 9:=9 9 9@6= 9: = 8=66= 9 9@=5 9 >656== ;5:@:=.
'
AK96@9:;=
D9>9:9 9 ;5:@9@5 : 9:=9 9 96656 =>=69;9 9 >656== >99 @96:=6
2
S=6
N5 9@6= ::W: 9:=9 9 >656== @96:=.
REPORT !MEN5AEA!A. ME55A9E 'Men+aJe ,e ;inaiQacion' T-PE 'A'.
REPORT !MEN5AEA!E. ME55A9E 'Men+aJe ,e Error' T-PE 'E'.
6
REPORT !MEN5AEA!I. ME55A9E 'Men+aJe ,e Inormacion' T-PE 'I'.
REPORT !MEN5AEA!5. ME55A9E 'Men+aJe ,e Inormacion' T-PE '5'.
REPORT !MEN5AEA!5. ME55A9E 'Men+aJe ,e A,1ertencia' T-PE 'W'.
+jercicio &21 Creando >na transacción en *AP ;*+8< P=6= ;69=6 := @6=:=;;: 9 @= = @6=:=;;: *+83 9 ;55;=5 9 ;5 9 = @6=:=;;: 9 9695 ;69=63 9@9 ;5 9>69 @9:9 9 9>9=6 >56 99>5 9: 9@9 ;=5 ;69=695 = MFH. E: 9 ;=>5 9 @9@5 C5 9 = @6=:=;;: ;55;=5 :9@65 ;5 >=5 9 85@: ;69=6.
6
E: = >6= K9:@=:= :5 >96 9 9 >5:=5 : @9@5 869K9 9 9;68= = @6=:=;;:.
E: = >6= 9:=6 5 9:@9 =@5 >=6 =6=6.
6
E: = >6= K9:@=:= 99;;5:=5 589@5 5;=. U:= K9 69==5 9@9 ;=85 <95 @96:=5 9 ;69=6 = @6=:=;;: =MFH 5 969 >658=6 9:@6= = @6=:=;;: ;5>698= ;55 =869 9 >656== 9:==5.
+jercicio &22 Colores en >n reporte =. E: 9@96:== 5;=5:9 9 :9;9=65 969:;= ;5: ;5569 = :9= 9 : 69>56@9. REPORT COLOR&. ;ORMAT INTEN5I;IED COLOR 4 <. WRITE: 'Coor er,e:'.
6
+jercicio &25 :arios colores en >n reporte =. E: 9@96:== 5;=5:9 9 :9;9=65 969:;= ;5: ;5569 = :9= 9 : 69>56@9. REPORT COLOR. DATA: MCOLOR T-PE I. DO TIME5. ;ORMAT INTEN5I;IED COLOR 4 MCOLOR. MCOLOR 4 MCOLOR &. WRITE: ('Coor:')MCOLOR. ENDDO.
6
CAP!"#$ 8 (0&P'$ ntrod>cción a >na (0&P'$ U:= (0&P'$ 9 : 69;65 @9;:5;5 9 ABAP/4 >=6= ;69=6 = ;=>= 9 >699:@=;: 9 : >656==.
+jercicio &26 Creación de >na (0&P'$ ;*+69< P=6= ;69=6 := (0&P'$ 695 = = @6=:=;;: *+69 9 9 9 $Gject &aKiator 9=:@9 = 8=66= 9 ;5=:5. S99;;5:=5 P656== ;55;=5 9 :5869 DNPRO3 >=5 E:@96 9: = >6= K9:@=:= :5 >69:@=6 9 99=5 ;69=6 9 >656== >=5 SI 5 =6=5.
%=5 = 9:W >=:5 ;;7 969;<5 K=5 = ;69=6 99;;5:=5 D:>65. N5 >69:@=6 >56 9 :965 >5:95 1.
E: = 9:@9 K9:@= :5 >69:@=6 >56 := 9;6>;: 869K9 9 = D:>65 9 ;55;=695 M :9K= :>65 99;;5:=5 9: @>5 9 D:>65 :56=. C=:5 9:95 9@5 =@5 = =6=5 9: 9 =685 9 = 96= >56 =>69;=6 9 =>=69;9 := ;=6>9@= === D:>65 9:@65 9 9= 9 :W965 9 @ D:>65.
6
!ipos de (npros &ormal E = :>65 9@=:=6 *>Gscreen C=:5 9 := K9:@=:= 9 9 =869 99 5@6= D:>65. :entana dialoo modal E := >=:@== 9 9 @= >=6= 5@6=6 9:=9. (npro selección S5: 5 9 9 9;=6=: ;=:5 <=;95 : 99;@5:;699:. C=:5 9@95 9: 9 $Gject &aKiator >=5 9: 9 85@5: >9656 9 ;9 L=5@ 9 :5 =866= 9 *creen Painter 9 5 @=695 >=6= =;5:=6 ;5>5:9:@9 = :9@6= D:>653 @5=5 5 ;5>5:9:@9 9 = 96= 5 =66=@6=5 ;55;:59 : :5869 := 9;6>;:3 >56 W@5 =6=5 99;@=5 :9@65 >656== 9 5@6=6 @55 5 999:@5 K=9 9 =66=@6=5 =:@96569:@9 9: 9 569: ;55;=5.
6
6
CAP!"#$ %9 BatcD np>ts ntrod>cción a >na BatcD np>ts *M1 U:= BatcD np>ts 9 : 69;65 @9;:5;5 9 >96@9 6=8=6 5 >=5 9 := @6=:=;;: >=6= >596 9:@6=69 K=569 9 56= =K= >=6= <=;96 := B=@;< I:>@ @9:95 9 6 = @6=:=;;: SM!( >5:95 = 6=8=6 =6;=:5 := @6=:=;;: ;55 589@K53 := K9 9 :=;9 @9 5@6=6= : >65;95 9@==5 9 @55 5 >=5 9 >99 99;@=6.
6
CAP!"#$ %% Form>larios. !ipos de form>larios en *AP E: SAP 9@9: @69 @>5 9 56= 9 <=;96 56=65 9= 5: *ap*cript E = 56= =:@= 9 <=;96 56=65 9 @= 99 = >696= K965:9 9 SAP. S9 =;;99 = 9= 99 = @6=:=;;: SE+1. *AP*cript 9 : 9:=9 9 9 @= >=6= K96= :;5:9 9: SAP 9:@69 9= ;69=6 56=65. *martForms E ;<5 ; 9 @6=8==6 9 5 =:@9 65693 9@ >5:89 99 = K96: 4.+ 9 SAP. AdoGeForms E 5 W@5 9: @9;:55= 9 56=65 9 SAP3 69 >56 := ==:= 9@6=@V;= 9:@69 = 9>69= A589 SAP. +jercicio &28 Mostrar >n form>lario *AP*cript ;*+5%<. P=6= 5@6=6 : 56=65 695 = = @6=:=;;: *+5% 5 9:@6=5 = = 6@= M9:W SAP / H966=9:@= / I>66 F56=65 / SAP;6>@ / SE+1 F56=65. C55;=5 MEDRUC >=5 9 85@: %==6.
E: 9 M9 :W X "tilidades YX mpresión test Y <=;95 := >698= 9 >69: 9 56=65.
6
U:= K9 9 9:5 = >6956= LOCL I>6956= 5;=# >595 K96 := K@= >69K= 9 ;5:6=;: 9 56=65.
+jercicio &59 Copiar >n Form>lario *AP*cript. P=6= ;5>=6 : 56=65 695 = = @6=:=;;: *+5% 9: F56=65. C55;=5 MEDRUC 9: 9 ;=>5 56=65. E: 9 M9:W >9656 99;;5:=5 X "tilidades YX Copiar de mandeante Y
6
E: 56=65 ;55;=5 9 :5869 9 56=65 9 9695 ;5>=6 9: 9 9@:5 9 :9K5 :5869 9: 9@9 ;=5 9 ;55;=6V 1MEDRUC .
S @55 = 89: =6 9 9:@9 9:=9 .
+jercicio &5% Crear >n Form>lario con *AP*cript. P=6= ;69=6 :9@65 >696 56=65 695 = = @6=:=;;: *+5% 5 9:@6=5 = = 6@= M9:W SAP / H966=9:@= / I>66 F56=65 / SAP;6>@ / SE+1 F56=65. C=:5 9@95 9: = @6=:=;;: 99;;5:=5 9: O89@5 >=6;=9 = 5>;: 9 ;=89;96=. C55;=5 9 :5869 9 56=65 Z=MP'M+'F$'MZV 9:5 9 5= Z+*Z >=5 9 85@: ;69=6.
6
#os $Gjetos parciales W>e aparecen aGajo son CaGecera S9 9:9 5 =@5 9 ;5:6=;: 9 56=65 ;55 5: 9:@93 56=3 @==5. Pás S9 9:9 = >:= 9 @9:6 9 56=65. :entanas S9 9:9 = K9:@=:= 9 ;== >:= :56=;: 9 5@6=695 9:@65 9 = >:=.
;55;=695 =
Formatos de párrafos S9 9:9 9 56=@5 9 @9:6 9 >66=5 9 69>56@9. E: = >6= K9:@=:= :5 :56= 9 9 56=65 :5 9@9: =;9>@=5. E: 9 :;=5 ;55;=5 := 9;6>;: 9 56=65 5 =6=5 ;55 589@5 5;=.
6
L5 9:@9 9 ;69=6 = >=:= K=5 = 85@: P:= 5 >=5 F2. A<56= ;69=695 = >696= >:= 9 56=65 9: 9 9: >965 X !ratar YX Crear +lemento Y3 9: =@68@5 9 9@:=6 ;55;=6 P:= PAGINA1 9: S:;=5 PAGINA PRINCIPAL DEL FORM =6=5 5 ;=85 9: 9 85@: 9 =6=6 >9656.
A<56= 695 = 85@: >9656 99;;5:=5 %9:@=:= 5 >=5 = @9;= F+. L= K9:@=:= = =695 >=6= 5@6=6 5 ;=>5 9 :9;9@95 ;55 >99 963 T@53 F9;<= A;@= 5@6=. P=6= ;69=6 = K9:@= 9: = >=6@9 :9656 5:9 ;9 A@68@5 9@:=6 <= 9 =;5:=6 9@5 ;=>5 MA&
6
9: = 9;6>;: >5:95 @= ;55 9 9@6= 9: = 9:@9 =9: :entana pral. D9>V 9 69==6 9@5 ;=85 =6=5 9 56=65.
E 9:@9 >=5 9 ;69=6 5 F$'MA!$* (+ PA''AF$* 5:9 9:695 9 56=@5 9 >66=5 9 @=695 9: 9 69>56@9. P=6= ;69=6 : >66=5 K=5 = 9:W >9 656 [ !ratar \ / [ Crear +le mento \ 5 >=5 *Dift [ F2. L9 >5:95 9: F56=@5 9 >66=5 T1 9: S:;=5 P66=5 9 9@6=.
%=5 = >=6=9@6=;5:9 8;= 9:=5 P=:= :;= 9 >66=5 >56 99;@5.
6
L5 W@5 9 <=;95 9 =6=65 =;@K=65 9: 9:W >9656 X Form>lario YX ActiKar Y 3 9695 K==6 9 56=65 @9:95 9 6 = 9:W >9656 X "tilidades YX mpresión test Y ;5>658=5 9 :5 @9:= 966569 @9:9 9 =6 9 56=65 9: 8=:;5. +jercicio &18 +jec>tar >n Form *AP*cript. L5 F56=65 9 =869: = >=6@6 9 : >656== ABAP/4 9 @= = :;: OPENXFORM >=6= 9@9 99>5 @=695 5 =@5 9 996; =:@9656 5:9 ;69=5 : 56=65 9: 8=:;5. D=@5 MIPRIMERFORM PAGE: PAGINA1 E!"A!A: MAIN PARRAFO: T1 E#EME!"O: E1 FORM:
C69=5 :9@65 >656== ;5: = @6=:=;;: SE!" 9 ;55;=5 ;55 :5869 9 >656== RUNFORM1.
6
6
CAP!"#$ %, $Gject &aKiator ntrod>cción al $Gject &aKiator *+69 E $Gject &aKiator 9 9 @=96 9 9=665= 9 SAP3 9 >99 =6 S;699: P=:@963 M9: P=:@963 F:;@5: B963 C= B963 9@56 9 ABAP3 ;;5:=65 9 ABAP 5@6= <966=9:@= 9 >656==;:.
+jercicio &5 9 Crear r>po de=6>= f>nciones. U: 6>5 :;5:93 :;5:9 9 @9:9: =6 ;5>56@=9:@5 5 5: 69=;5:== >56 9 =@56 5 >656== 9 @=:3 9: 9 ;=5 9 5 6>5 9 :;5:9 9 9 ;69=: 989: ;59:=6 9>69 ;5: . P=6= ;69=6 : 6>5 9 :;5:9 5 <=695 ;5: = @6=:=;;: SE".
6
CAP!"#$ % (ocs ;ntermediate (oc>ment< ntrod>cción a (ocs U: (ocs 9 : =6;<K5 9 @9@5 >=:5 ;5: 69@65 9 >96@9 :@96;=8=6 :56=;: 9:@69 969:@9 @9=3 >=6= =896 = :56=;: 9 5 (ocs 9 >99 <=;96 K@=:5 = @=8= EDIDC 9 ;;5:=65 9 =@53 9 :W965 9 DOCNUM.
+jercicio &54 Hola M>ndo en ABAP/4. E: 9@9 :9@65 >696 >656== @9 9:9=69 ;55 ;69=6 : 9=6655 3 5=9:@9 @=695 = :;: 9
6
!ransacciones más >tilizadas en *AP. F F*99 RO9 R(9
D=@5 =9@65 C9:@= D=@5 =9@65 9 >65K9956 D=@5 =9@65 9 ;9:@9
FB29 F=;@6= = >65K9956 A;69956# FB9 %==;: 9 69@65 ;5:@=89 FB#%& C9:@= ;5669:@9 9 >65K9956 F16 P=5 = >65K9956 F44 C5>9:=6 FB96 A:=;: 9 69@65 FB59 F=;@6=6 = ;9:@9 FB#1& C9:@= ;5669:@9 956 F,6 P=5 = D956 FB51 N5@= 9 ;6V@5 FB19 C5:@=8=;: L865 =56 FB9 %==;: 9 69@65 ;5:@=89 F*%9& %==;: 9 =5 $B1, C9669 >9655 ;5:@=89 *IA#'I659%,,48 I:569 865 =56 F,6 P=5 = ;9:@9 C$ OA9 C=9 9 ;5@5 O*9 C9:@65 9 ;5@5 *IA#'I659%2%% R9>56@9 9 ;9:@65 9 ;5@5 MM MM9 M+,%& M-$ M'$ *(
D=@5 =9@65 9 =@96=9 C69=;: 9 : >95 9 ;5>6= E:@6== 9 96;=:;= F=;@6=;: P65K9956
6
:A9% :A9 :#9%& :F9% BA**
C69=;: 9 : >95 9 K9:@= %96 9 >95 S== 9 96;=:;= F=;@6=;: = C9:@9
*P'$ *"9% PFC-
P=6=9@6=;: 9 @9= A:@6=;: 9 =65 C69=6 >965 >=6= 5 =65
A#96 *M94 PM
M5@6=6 =65 ;5:9;@=5 = =:=:@9 M5@6=6 =65 ;5:9;@=5
*P'$
P=6=9@6=;: 9 @9=
6
:ariaGles del *istema +,ABC67 C8"+TA"T- Al&!beto 9A'B'C':; +,APP<* Aplic!ciones +AP +,BATC B!tch !ctio 9=; +,BAT>6 +?B*T &ondo- 6i!rio +,BAT> +?B*T &ondo- ens#!l +,BAT>8 +?B*T &ondo- ?nico +,BAT>+ +,BAT>@ +,B*"PT +,B7P4 +,B+P<6 +,CA<<6 +,CA<< +,CC?+ +,CC?T +,C6AT7 +,C8<"8 +,CPAD7 +,CP8D +,CTAB< +,CTP7
+?B*T b!tch- *n$edi!t!$ente +?B*T &ondo- +e$!n!l B!tch inp#t !ctio 9=; +?B*T &ondo- "o$bre de r!3 del report de ll!$!d! +?B*T &ondo- +!lid! de list! en +P88< C!ll $odo !ctio 9=; *P**- *6 p!r! &#nciones de diálogo Tipo c!$bio/C!$po res#lt!do C?7"C C8"7T Tipo de c!$bio en t!bl! de !plic!ci(n C?7"C C8"7+*8" ech! de tipo de c!$bio de C?7"C C8"+. Col#$n! !ct#!l en l! cre!ci(n de l! list! "E$ero de págin! !ct#!l ?"T*7- Progr!$! princip!l T!bl! de tipo de c!$bio en C?7"C C8"7+*8" Tipo de c!$bio FG'GBG'GDGde C?7"C C8"7+*8"
+,C?C8< +,C?8@ +,6ATA +,6AT<8 +,6AT? +,6AT?T +,6A+T +,6BC"T +,6B"A +,6B++ +,6C++ +,6+"A +,6"D +,6"" +,6A@ +,6P8+
Posici(n del c#rsor 9col#$n!; Posici(n del c#rsor 9lne!; *ndic!dor- 6!tos recibidos ech! loc!l' en rel!ci(n con el #s#!rio ++T7- ech! del d! ech! glob!l' en rel!ci(n con ?TC H or!rio de er!no !ctio I C!ntid!d ele$entos en conj#nto tr!t!do p!r! oper!ciones B6 B!se de d!tos l(gic! en report ABAP/4 ++T7- +iste$! de b!se de d!tos ++T7- +iste$! de diálogo ?"T*7- "o$bre del set de d!tos p!r! s!lid! en +P88< Dr#po de dynpros del dynpro !ct#!l "E$ero de l! i$!gen en p!nt!ll! !ct#!l 6! de se$!n! en el c!lend!rio de &ábric! <#g!r de h!ll!3go de #n string
+,*<7 *"T7"8- l!t&ile 9?+*"D/D7"7AT*"D 6ATA+7T; +,<7"D ?tili3!ci(n intern! 9longit#d de c!$po;
6
+,J7 enE de c(digos de &#nciones !ct#!l +,867C ?tili3!ci(n intern! 9c!$po posiciones deci$!les; +,8<7" ?tili3!ci(n intern! 9longit#d de s!lid! de c!$po; +,TP7 ?tili3!ci(n intern! 9tipo de c!$po; +,D8?P *"T7"8- Conc!ten!ci(n +,8+T "o$bre de l! $á%#in! +,*"67= C!ntid!d de repeticiones de b#cles +,
6
+,PJ7 ?"T*7- +t!t#s de tecl!s, !ct#!l +,P<*+T *P7+*8"- "o$bre de l! orden +P88< 9no$bre de list!; +,PABT *P**- 6ep!rt!$ento en l! port!d! +,PB*D *P**- Port!d! de selecci(n +,PC8P *P**- C!ntid!d de eje$pl!res +,P6+" *P**- "o$bre del set de d!tos +P88< +,P7= Pre&ijo ABAP/4 p!r! jobs b!tch +,P* *P7+*8"- +!lid! in$edi!t! +,P"7@ *P7+*8"- "#e! orden +P88< 9list!; +,P7C *P**- 6estin!t!rio +,P7< *P7+*8"- Borr!r tr!s s!lid! +,PT=T *P**- TeKto p!r! port!d! +,7P*2 ?tili3!ci(n intern! +,7P*6 P8DA- "o$bre de #n progr!$! ABAP/4 +,+TT ?tili3!ci(n intern! +,T*T< *P**- Tt#lo de report del progr!$! de i$presi(n +,+AP< +*+T7A- ele!se +AP +,+C8<+ Col#$n!s en l! p!nt!ll! +,+<+7T "o$bre de +7<7CT8",+7T+ +,+P8"8 ?"T*7- "E$ero +P88< p!r! s!lid! de #n! list! +,+P8" ?"T*7- "E$ero +P88< de instr#cci(n TA"+7 +,+8@+ <ne!s en l! p!nt!ll! +,+TAC8 *"T7ACT.-
*"T7"8- +t!t#s c!ll del report !lor de retorno tr!s deter$in!d!s sentenci!s ABAP/4 ABAP- or$! de ll!$!d! en +?B*T ++T7- *denti&ic!dor del +iste$! +AP ?tili3!ci(n intern! ?"T*7- <ne! !ct#!l de #n! t!bl! intern! +7++*8"- C(digo de tr!ns!cci(n !ct#!l ?"T*7- "o$bre del set de d!tos p!r! eKtr!ctos de d!tos C!ntid!d !ct#!l de entr!d!s en l! t!bl! intern! or! loc!l' en rel!ci(n con el #s#!rio or! glob!l' en rel!ci(n con ?TC P8DA- Tt#lo del progr!$! ABAP/4 T!$!)o de l! lne! de #n! t!bl! intern! C!ntid!d $áKi$! de entr!d!s en l! t!bl! intern! "o$bre de l! t!bl! intern! desp#Ls de #n !cceso P!rá$etro occ#rs en t!bl!s intern!s *ndic!dor p!r! !l$!cen!r t!bl! intern! en blo%#e p!ging
6
+,T+T<8 Crono$!rc!dor 9&ech! y hor!;' en rel!ci(n con el #s#!rio +,T+T?T Crono$!rc!dor 9&ech! y hor!;' en rel!ci(n con ?TC +,TTABC "E$ero de l! Elti$! lne! de t!bl! intern! led! +,TTAB* 8&&set de t!bl!s intern!s en el áre! de roll +,T>8"7 6i&erenci! de tie$po con For! $edi! de DreenMichG 9?TC; +,?C8 *"T7ACT.- *ndic!r &#nci(n en el c(digo 8J +,?<*"7 C8"+TA"T- <ne! de s#br!y!do 9NNNNNNNNNNNN:; +,?"A7 +7++*8"- "o$bre de #s#!rio segEn entr!d! ! +AP +,?>7*T ++T7- or! +,<*"7 C8"+TA"T- r!y! ertic!l +,@A7+ T001- oned! de socied!d tr!s leer seg$ento B +,@*<<* "E$ero de l! lne! de ent!n! !ct#!l +,@*"C8 Posici(n de c#rsor en l! ent!n! 9col#$n!; +,@*"6* *ndice de l! lne! de ent!n! !ct#!l +,@*"8 Posici(n de c#rsor en l! ent!n! 9lne!; +,@*"+< *"T7ACT.- <ne! en ent!n! seleccion!d! +,@*"=1 Coorden!d! de ent!n! 9col#$n! i3%#ierd!; +,@*"=2 Coorden!d! ent!n! 9col#$n! derech!; +,@*"1 Coorden!d! ent!n! 9lne! i3%#ierd!; +,@*"2 Coorden!d! de ent!n! 9lne! derech!; +,@T*T< *ndic!dor p!r! c!becer! estánd!r de págin! +,=C867 C(digo 8J !$pli!do +,>8"<8 #so hor!rio del #s#!rio
6
Comando de la Garra /nend /neK /n
+!lir del siste$!. +!lir del siste$! y se pierde l!s entr!d!s %#e no h! gr!b!do. C!ncel!$os l! tr!ns!cci(n !ct#!l. /nXXXX
/o /i
is#!li3! el res#$en de tr!ns!cciones. borr! l! secci(n !ct#!l.
!ecnoloLas de interfaces >tilizadas en *AP. A<7- Applic!tion
JorNGencD AGap. Editor ABAP p!r! tr!t!r el c(digo &#ente Dictionary ABAP p!r! tr!t!r de&iniciones de t!bl! de b!se de d!tos' tipos de d!tos centr!les' etc. Screen Painter p!r! con&ig#r!r p!nt!ll!s 9p!nt!ll!s j#nto ! &#nciones p!r! diálogos de #s#!rio; Menu Painter p!r! dise)!r inter&!ces de #s#!rio 9b!rr! de $enEs' b!rr! de herr!$ient!s estánd!r' b!rr! de herr!$ient!s de !plic!ciones' p!r!$etri3!ciones de tecl!s de &#nci(n; Function Builder p!r! !ct#!li3!r $(d#los de &#nciones Generador de clases p!r! !ct#!li3!r cl!ses e inter&!ces glob!les
6
:isLtenos en la weG www.%,sap.cl
6
