1
Programación ABAP / INFORMACIÓN DE 4 TABLAS
« en: 21 de Enero de 2014, 08:29:14 pm »
Hola
Soy nuevo en esto de sap... me piden que haga un programa en el que vengan datos da varias tablas t001w, ztmm_0002, t005, t005u
necesito sacar ciertos datos de dichas tablas, ya he podido realizar con tablas internas lo de la t001w pero me falta agregar algunos campos
de las otras tablas este es mi código:
REPORT ZTABLAINTERNA2 .
TYPES: BEGIN OF ST_T001W,
WERKS LIKE T001W-WERKS, "CENTRO
NAME1 LIKE T001W-NAME1, "NOMBRE
* WERKS LIKE T001W-FLDATE, "TIPO
* WERKS LIKE T001W-SEATSMAX, "ESTADO
STRAS LIKE T001W-STRAS, "CALLE Y NUMERO
LAND1 LIKE T001W-LAND1, "PAIS
PSTLZ LIKE T001W-PSTLZ, "CODIGO POSTAL
ORT01 LIKE T001W-ORT01, "COLONIA
REGIO LIKE T001W-REGIO, "ESTADO
LGORTJDE LIKE ZTMM_0002-LGORTJDE, "Almacen NPDV
BEZEI LIKE T005U-BEZEI, "Denominacion(Estado)
END OF ST_T001W.
DATA: TI_T001W TYPE STANDARD TABLE OF ST_T001W WITH HEADER LINE.
PARAMETERS: P_WERKS LIKE T001W-WERKS.
SELECT WERKS NAME1 STRAS LAND1 PSTLZ ORT01 REGIO
FROM T001W INTO TABLE TI_T001W
WHERE WERKS = P_WERKS.
LOOP AT TI_T001W.
WRITE: / TI_T001W-WERKS,
TI_T001W-NAME1,
TI_T001W-STRAS,
TI_T001W-LAND1,
TI_T001W-PSTLZ,
TI_T001W-ORT01,
TI_T001W-REGIO,
TI_T001W-LGORTJDE,
TI_T001W-BEZEI.
ENDLOOP.
Me gustaría saber como es que le puedo agregar los campos de las demás tablas y de antemano les agradezco su apoyo.
Soy nuevo en esto de sap... me piden que haga un programa en el que vengan datos da varias tablas t001w, ztmm_0002, t005, t005u
necesito sacar ciertos datos de dichas tablas, ya he podido realizar con tablas internas lo de la t001w pero me falta agregar algunos campos
de las otras tablas este es mi código:
REPORT ZTABLAINTERNA2 .
TYPES: BEGIN OF ST_T001W,
WERKS LIKE T001W-WERKS, "CENTRO
NAME1 LIKE T001W-NAME1, "NOMBRE
* WERKS LIKE T001W-FLDATE, "TIPO
* WERKS LIKE T001W-SEATSMAX, "ESTADO
STRAS LIKE T001W-STRAS, "CALLE Y NUMERO
LAND1 LIKE T001W-LAND1, "PAIS
PSTLZ LIKE T001W-PSTLZ, "CODIGO POSTAL
ORT01 LIKE T001W-ORT01, "COLONIA
REGIO LIKE T001W-REGIO, "ESTADO
LGORTJDE LIKE ZTMM_0002-LGORTJDE, "Almacen NPDV
BEZEI LIKE T005U-BEZEI, "Denominacion(Estado)
END OF ST_T001W.
DATA: TI_T001W TYPE STANDARD TABLE OF ST_T001W WITH HEADER LINE.
PARAMETERS: P_WERKS LIKE T001W-WERKS.
SELECT WERKS NAME1 STRAS LAND1 PSTLZ ORT01 REGIO
FROM T001W INTO TABLE TI_T001W
WHERE WERKS = P_WERKS.
LOOP AT TI_T001W.
WRITE: / TI_T001W-WERKS,
TI_T001W-NAME1,
TI_T001W-STRAS,
TI_T001W-LAND1,
TI_T001W-PSTLZ,
TI_T001W-ORT01,
TI_T001W-REGIO,
TI_T001W-LGORTJDE,
TI_T001W-BEZEI.
ENDLOOP.
Me gustaría saber como es que le puedo agregar los campos de las demás tablas y de antemano les agradezco su apoyo.