Using widecard character or range in selection option

Question

Hi gurus',
i am making a report on PS Module.
I have taken selection fields as follows.
SELECT-OPTIONS : in_psphi FOR proj-pspnr OBLIGATORY        "Project
when i run and insert the project name in in_psphi-low and in_psphi-high then output will come accordingly.
now i want to put project range using widecard character say  IC* or IC-0000000001 to IC-999999999
then it has shown project not found. I found in many standard reports like CN52N where  you can put widecard character or range like above.
Please let me know how to do.
Pravin

Answer 1

hello parvin,
use this code and then execute your program,
now you would be able to fetch the projects with wild card entry serach
DATA: PSPID1 TYPE  PROJ-PSPID.
RANGES: R_PNR  FOR  PSPID1.
RANGES: R_PSPID FOR PSPID1.
SELECT-OPTIONS: S_PSPID FOR PSPID1.
   IF NOT S_PSPID[] IS INITIAL.
     LOOP AT S_PSPID.
       IF  NOT S_PSPID-HIGH IS INITIAL.
         IF S_PSPID-HIGH CA '*' .
           R_PNR-LOW = S_PSPID-HIGH.
           R_PNR-OPTION = 'CP'.
           R_PNR-SIGN = 'I'.
           APPEND R_PNR.
           CLEAR R_PNR.
* GET HIGHER VALUE
           SELECT MAX( PSPID )
                       INTO R_PSPID-HIGH
                       FROM PROJ
                       WHERE PSPID IN R_PNR.
           IF R_PSPID-HIGH IS INITIAL.
             SELECT MAX( PSPID )
                     INTO R_PSPID-HIGH
                     FROM PROJ
                     WHERE PSPID <= S_PSPID-HIGH.
           ENDIF.
         ELSE.
           R_PSPID-HIGH = S_PSPID-HIGH.
         ENDIF.
* GET LOWER VALUE
         IF  S_PSPID-LOW  CA '*' .
           SELECT MIN( PSPID )
                   INTO R_PSPID-LOW
                   FROM PROJ
                   WHERE PSPID IN S_PSPID.
           IF R_PSPID-LOW IS INITIAL.
             SELECT MIN( PSPID )
                  INTO R_PSPID-LOW
                  FROM PROJ
                  WHERE PSPID >= S_PSPID-LOW.
             IF  R_PSPID-LOW IS INITIAL.
               R_PSPID-LOW =  S_PSPID-LOW.
             ENDIF.
           ENDIF.
         ELSE.
           R_PSPID-LOW =  S_PSPID-LOW.
         ENDIF.
         R_PSPID-OPTION = S_PSPID-OPTION.
         R_PSPID-SIGN = S_PSPID-SIGN.
         APPEND R_PSPID.
         CLEAR R_PSPID.
       ELSE.
         R_PSPID = S_PSPID.
         APPEND R_PSPID.
         CLEAR R_PSPID.
       ENDIF.
     ENDLOOP.
     S_PSPID[] = R_PSPID[].
   ENDIF.
now use the s_pspid  as u were using earlier.
It will surely help
Regards
Geeta gupta