dionismatos
17/04/10, 15:52:29
Hola a todos, Soy nuevo en sap y en el foro y este es mi primer tema :D
Estoy trabajando en el siguiente reporte, y la sentencia Start of selection me causa error al compilar. A parte de esto, alguien puede decirme como hacer un join con 2 tablas internas?
Aqui esta mi codigo... Gracias!
*&---------------------------------------------------------------------*
*& Report ZVRN_CLTENOCOMP *
*& *
*&---------------------------------------------------------------------*
*& Autor: Dionis Moises Matos Rodriguez *
*& Fecha: 09/04/2010 *
*& Funcion: Listado de clientes que compran por debajo del promedio *
*& o no compran. *
*&---------------------------------------------------------------------*
REPORT ZVRN_CLTENOCOMP.
* Declarando TABLAS
TABLES:
KNVV,
KNA1,
S511,
MARA,
MVKE,
T179T,
ZVTSECTOR.
" VARIABLES
*-----------------
INCLUDE <ICON>.
INCLUDE <SYMBOL>.
*-----------------
TYPE-POOLS: slis.
*--------------------------
* Pantalla de Seleccion
*--------------------------
SELECTION-SCREEN BEGIN OF BLOCK SCREEN01 WITH FRAME TITLE TEXT-S01.
*------> Area de Ventas<-------
SELECT-OPTIONS: S_VKORG FOR KNVV-VKORG,
S_VTWEG FOR KNVV-VTWEG,
S_SPART FOR KNVV-SPART,
S_BZIRK FOR KNVV-BZIRK.
SELECTION-SCREEN END OF BLOCK SCREEN01.
*------> Area de Cliente<-------
SELECTION-SCREEN BEGIN OF BLOCK SCREEN02 WITH FRAME TITLE TEXT-S02.
SELECT-OPTIONS: S_KDGRP FOR KNVV-KDGRP,
SK_KDGRP FOR KNVV-KUNNR.
SELECTION-SCREEN END OF BLOCK SCREEN02.
*------>Rangos de Fecha<-------
SELECTION-SCREEN BEGIN OF BLOCK SCREEN03 WITH FRAME TITLE TEXT-S03.
*--------> Seleccion de Fechas HISTORICO:
SELECT-OPTIONS: H_SPBUP FOR S511-SPBUP.
*--------> Seleccion de Fechas ACTUAL:
SELECT-OPTIONS: A_SPBUP FOR S511-SPBUP.
SELECTION-SCREEN END OF BLOCK SCREEN03.
SELECTION-SCREEN BEGIN OF BLOCK SCREEN04 WITH FRAME TITLE TEXT-S04.
PARAMETERS: client RADIOBUTTON GROUP RAD1 DEFAULT 'X',
client_m RADIOBUTTON GROUP RAD1,
client_j RADIOBUTTON GROUP RAD1.
SELECTION-SCREEN END OF BLOCK SCREEN04.
"DECLARACION DE WORK-AREA Y TABLA INTERNA
DATA: wa_cte TYPE KNVV. " WORK_AREA DE CLIENTES
DATA: it_cte TYPE STANDARD TABLE OF KNVV. "TABLA INTERNA DE CLIENTES.
DATA: WA_PROD TYPE MVKE. " WORK AREA DE PRODUCTOS.
DATA: it_PROD TYPE STANDARD TABLE OF MVKE.
DATA: wa_zvt TYPE
START-OF-SELECTION.
"SELECT QUE CARGA LA TABLA INTERNA DE CLIENTES
SELECT * FROM KNVV into wa_cte WHERE KNVV~LOEVM = ' ' AND KNVV~AUFSD <> 'ZI' AND KNVV~VKORG = S_VKORG AND KNVV~VTWEG = S_VTWEG AND KNVV~SPART = S_SPART.
ENDSELECT.
END-OF-SELECTION.
"SELECT QUE CARGA LA TABLA INTERNA DE PRODUCTOS
*IF S_SPART = 09.
START-OF-SELECTION.
SELECT * FROM MVKE INTO WA_PROD WHERE MVKE~VMSTA = ' ' AND MVKE~LVORM = ' '.
ENDSELECT.
*ELSE.
*ENDIF.
END-OF-SELECTION.
Estoy trabajando en el siguiente reporte, y la sentencia Start of selection me causa error al compilar. A parte de esto, alguien puede decirme como hacer un join con 2 tablas internas?
Aqui esta mi codigo... Gracias!
*&---------------------------------------------------------------------*
*& Report ZVRN_CLTENOCOMP *
*& *
*&---------------------------------------------------------------------*
*& Autor: Dionis Moises Matos Rodriguez *
*& Fecha: 09/04/2010 *
*& Funcion: Listado de clientes que compran por debajo del promedio *
*& o no compran. *
*&---------------------------------------------------------------------*
REPORT ZVRN_CLTENOCOMP.
* Declarando TABLAS
TABLES:
KNVV,
KNA1,
S511,
MARA,
MVKE,
T179T,
ZVTSECTOR.
" VARIABLES
*-----------------
INCLUDE <ICON>.
INCLUDE <SYMBOL>.
*-----------------
TYPE-POOLS: slis.
*--------------------------
* Pantalla de Seleccion
*--------------------------
SELECTION-SCREEN BEGIN OF BLOCK SCREEN01 WITH FRAME TITLE TEXT-S01.
*------> Area de Ventas<-------
SELECT-OPTIONS: S_VKORG FOR KNVV-VKORG,
S_VTWEG FOR KNVV-VTWEG,
S_SPART FOR KNVV-SPART,
S_BZIRK FOR KNVV-BZIRK.
SELECTION-SCREEN END OF BLOCK SCREEN01.
*------> Area de Cliente<-------
SELECTION-SCREEN BEGIN OF BLOCK SCREEN02 WITH FRAME TITLE TEXT-S02.
SELECT-OPTIONS: S_KDGRP FOR KNVV-KDGRP,
SK_KDGRP FOR KNVV-KUNNR.
SELECTION-SCREEN END OF BLOCK SCREEN02.
*------>Rangos de Fecha<-------
SELECTION-SCREEN BEGIN OF BLOCK SCREEN03 WITH FRAME TITLE TEXT-S03.
*--------> Seleccion de Fechas HISTORICO:
SELECT-OPTIONS: H_SPBUP FOR S511-SPBUP.
*--------> Seleccion de Fechas ACTUAL:
SELECT-OPTIONS: A_SPBUP FOR S511-SPBUP.
SELECTION-SCREEN END OF BLOCK SCREEN03.
SELECTION-SCREEN BEGIN OF BLOCK SCREEN04 WITH FRAME TITLE TEXT-S04.
PARAMETERS: client RADIOBUTTON GROUP RAD1 DEFAULT 'X',
client_m RADIOBUTTON GROUP RAD1,
client_j RADIOBUTTON GROUP RAD1.
SELECTION-SCREEN END OF BLOCK SCREEN04.
"DECLARACION DE WORK-AREA Y TABLA INTERNA
DATA: wa_cte TYPE KNVV. " WORK_AREA DE CLIENTES
DATA: it_cte TYPE STANDARD TABLE OF KNVV. "TABLA INTERNA DE CLIENTES.
DATA: WA_PROD TYPE MVKE. " WORK AREA DE PRODUCTOS.
DATA: it_PROD TYPE STANDARD TABLE OF MVKE.
DATA: wa_zvt TYPE
START-OF-SELECTION.
"SELECT QUE CARGA LA TABLA INTERNA DE CLIENTES
SELECT * FROM KNVV into wa_cte WHERE KNVV~LOEVM = ' ' AND KNVV~AUFSD <> 'ZI' AND KNVV~VKORG = S_VKORG AND KNVV~VTWEG = S_VTWEG AND KNVV~SPART = S_SPART.
ENDSELECT.
END-OF-SELECTION.
"SELECT QUE CARGA LA TABLA INTERNA DE PRODUCTOS
*IF S_SPART = 09.
START-OF-SELECTION.
SELECT * FROM MVKE INTO WA_PROD WHERE MVKE~VMSTA = ' ' AND MVKE~LVORM = ' '.
ENDSELECT.
*ELSE.
*ENDIF.
END-OF-SELECTION.