REPORT  ZTEST_SPEC                                 .


PARAMETERS: STLNR LIKE MAST-STLNR OBLIGATORY,
            WERKS LIKE MAST-WERKS MEMORY ID WRK OBLIGATORY,
            STLAN LIKE MAST-STLAN DEFAULT '1' OBLIGATORY.

DATA: T_MATNR LIKE  MAST-MATNR.

START-OF-SELECTION.

  CLEAR T_MATNR.
  SELECT SINGLE MATNR FROM MAST INTO T_MATNR
           WHERE STLNR = STLNR
           AND WERKS = WERKS
           AND STLAN = STLAN.

  CHECK NOT T_MATNR IS INITIAL.

  SET PARAMETER ID 'MAT' FIELD T_MATNR.
  SET PARAMETER ID 'CSV' FIELD STLAN.
  SET PARAMETER ID 'WRK' FIELD WERKS.

  CALL TRANSACTION 'CS03' AND SKIP FIRST SCREEN.