SAP ABAP DYNAMIC - Revision history

WikiSysop at 22:25, 6 September 2021

2021-09-06T22:25:12Z

WikiSysop: /* Ejemplos Varios */

2021-09-06T22:21:15Z

Ejemplos Varios

WikiSysop: /* Ejemplos */

2021-09-06T22:20:59Z

Ejemplos

WikiSysop: /* Ejemplos Varios */

2021-09-06T22:20:29Z

Ejemplos Varios

WikiSysop: /* Saber si un dato es de tipo moneda, EX02 */

2021-09-06T22:18:45Z

Saber si un dato es de tipo moneda, EX02

WikiSysop at 22:17, 6 September 2021

2021-09-06T22:17:48Z

Show changes

WikiSysop: /* Ejemplos Varios */

2021-09-06T22:15:37Z

Ejemplos Varios

WikiSysop: /* Ejemplos Varios */

2021-09-06T01:09:23Z

Ejemplos Varios

WikiSysop: /* Ejemplo 02: leer archivo desde servidor separado por tabs, independiente del tipo */

2021-09-03T23:08:57Z

Ejemplo 02: leer archivo desde servidor separado por tabs, independiente del tipo

WikiSysop at 20:49, 23 June 2020

2020-06-23T20:49:14Z

@@ Line 267: / Line 267: @@
 ENDTRY.</nowiki>
-==Ejemplos Varios==
+==Saber si un dato es de tipo moneda==
   <nowiki>
 TYPES: BEGIN OF ty_pernr,
@@ Line 367: / Line 366: @@
 ENDDO.</nowiki>
-===Crear tabla===
+==Crear tabla==
   <nowiki>FORM form01 USING p_tabla TYPE STANDARD TABLE.
    FIELD-SYMBOLS <work_tab> TYPE ANY TABLE.
@@ Line 436: / Line 435: @@
 ENDFORM.</nowiki>
-Combine
+==Combine==
   <nowiki>form combine_recs_by_key using
                             it_keys type abap_keydescr_tab
@@ Line 481: / Line 480: @@
 endform.                    " combine_recs_by_key</nowiki>
-===Ejemplos===
+==Ejemplos Varios==
   <nowiki>DATA l_matnr type matnr VALUE '100'.
 DATA dref TYPE REF TO data.

← Older revision		Revision as of 22:21, 6 September 2021
Line 481:		Line 481:

	endform. " combine_recs_by_key</nowiki>		endform. " combine_recs_by_key</nowiki>
		+	===Ejemplos===
		+	<nowiki>DATA l_matnr type matnr VALUE '100'.
		+	DATA dref TYPE REF TO data.
		+	FIELD-SYMBOLS <fs> TYPE any.
		+	GET REFERENCE OF l_matnr into dref.
		+	ASSIGN dref->* TO <fs>.
		+	WRITE <fs>.
		+	***********************************************************************
		+	FIELD-SYMBOLS <fs> TYPE DATA.
		+	DATA dref TYPE REF TO DATA.
		+	CREATE DATA dref TYPE i.
		+	ASSIGN dref->* TO <fs>.
		+	<fs> = 5.
		+	***********************************************************************
		+	TYPES: ty_type TYPE p DECIMALS 2.
		+	DATA: v_data TYPE ty_type,
		+	r_typedescr TYPE REF TO cl_abap_typedescr.
		+
		+	START-OF-SELECTION.
		+
		+	r_typedescr = cl_abap_typedescr=>describe_by_data( v_data ).
		+	WRITE: / 'Kind:', r_typedescr->type_kind.
		+	WRITE: / 'Length:', r_typedescr->length.
		+	WRITE: / 'Decimals:', r_typedescr->decimals.
		+	***********************************************************************
		+	DATA l_text(8) TYPE c VALUE '20111201'.
		+	FIELD-SYMBOLS <fs> TYPE sy-datum.
		+	ASSIGN l_text TO <fs> CASTING.
		+	WRITE <fs>.
		+	***********************************************************************
		+	DATA: r_typedescr TYPE REF TO cl_abap_typedescr,
		+	r_structdescr TYPE REF TO cl_abap_structdescr,
		+	r_tabledescr TYPE REF TO cl_abap_tabledescr,
		+	r_table TYPE REF TO data,
		+	components TYPE cl_abap_structdescr=>component_table,
		+	component LIKE LINE OF components,
		+	ro_alv TYPE REF TO cl_salv_table.
		+	FIELD-SYMBOLS : <table> TYPE ANY TABLE.
		+
		+	FORM get_table .
		+	r_typedescr = cl_abap_typedescr=>describe_by_name( p_table ).
		+	TRY.
		+	r_structdescr ?= r_typedescr.
		+	CATCH cx_sy_move_cast_error.
		+	ENDTRY.
		+	components = r_structdescr->get_components( ).
		+	TRY.
		+	r_structdescr = cl_abap_structdescr=>get( components ).
		+	r_tabledescr = cl_abap_tabledescr=>get( r_structdescr ).
		+	CATCH cx_sy_struct_creation.
		+	CATCH cx_sy_table_creation .
		+	ENDTRY.
		+	TRY.
		+	CREATE DATA r_table TYPE HANDLE r_tabledescr.
		+	ASSIGN r_table->* TO <table>.
		+	CATCH cx_sy_create_data_error.
		+	ENDTRY.
		+	TRY.
		+	SELECT *
		+	FROM (p_table)
		+	INTO CORRESPONDING FIELDS OF TABLE <table> WHERE (p_where).
		+	CATCH cx_sy_sql_error.
		+	ENDTRY.
		+	ENDFORM.</nowiki>

@@ Line 366: / Line 366: @@
    ENDIF.
 ENDDO.</nowiki>
 ===Crear tabla===

@@ Line 365: / Line 365: @@
      EXIT.
    ENDIF.
-ENDDO.</nowiki
+ENDDO.</nowiki>
 ===Ejemplos===

@@ Line 296: / Line 296: @@
 ===Saber si un dato es de tipo moneda, EX02===
-   <nowiki
+   <nowiki>
 TYPES: BEGIN OF ty_pernr,
           pernr  TYPE p0001-pernr,

← Older revision		Revision as of 23:08, 3 September 2021
Line 151:		Line 151:

	ENDFORM.</nowiki>		ENDFORM.</nowiki>
		+
		+	==[[SAP ABAP VARIOS#Bajar tabla en formato CSV (función hr_cl_if_prvd_generate_file)\|Crear archivo CSV]]==

	==Ejemplos varios==		==Ejemplos varios==

← Older revision		Revision as of 20:49, 23 June 2020
Line 1:		Line 1:
		+	==Jerarquía Tipo CLase==
		+	<nowiki>CL_ABAP_TYPEDESCR
		+	CL_ABAP_DATADESCR
		+	CL_ABAP_ELEMDESCR
		+	CL_ABAP_REFDESCR
		+	CL_ABAP_COMPLEXDESCR
		+	CL_ABAP_TABLEDESCR
		+	CL_ABAP_STRUCTDESCR
		+	CL_ABAP_OBJECTDESCR
		+	CL_ABAP_CLASSDESCR
		+	CL_ABAP_INTFDESCR</nowiki>
	==Ejemplo 01: generar archivo CSV independiente del tipo==		==Ejemplo 01: generar archivo CSV independiente del tipo==
	<nowiki>FORM crear_csv USING p_tabla TYPE ANY TABLE		<nowiki>FORM crear_csv USING p_tabla TYPE ANY TABLE