how to write select query ?

[Former Member]

i HAVE 2 table PROJ AND VBRP.

I have to display field POST1 from table PROJ.

from table VBRP i have to select field VBELN and PS_PSP_PNR then i have to pass PS_PSP_PNR.

then i have to pass PS_PSP_PNR to table PROJ and select field post1 from proj and display POST1.
HERE i have to use conversion exit for field ps_psp_pnr.

[Former Member]

Hi Sharmistha,

Create an internal table which holds vbeln and ps_psp_pnr

and write this select statement

SELECT vbeln ps_psp_pnr

into table itab

from vbrp.

select post1

into lv_post1

from proj.

[Former Member]

Hi Sharmistha,

My Assumption - You will be linking VBRP and PROJ via

VBRP-PS_PSP_PNR and PROJ-PSPNR.

Try Code.

TYPES : BEGIN OF ty_vbrp,

             vbeln TYPE vbeln_vf,

             ps_psp_pnr  TYPE ps_psp_pnr ,

             END OF ty_vbrp,

            BEGIN OF ty_proj,

            pspnr TYPE ps_intnr,

            post1 TYPE ps_post1,

            END OF ty_proj.

DATA : lt_vbrp TYPE STANDARD TABLE OF ty_vbrp,

           lt_proj TYPE STANDARD TABLE OF ty_proj.

end-of-selection.

SELECT vbeln ps_psp_pnr FROM vbrp INTO TABLE lt_vbrp WHERE vbeln = '0090000046'. " Change According to your need

IF lt_vbrp IS NOT INITIAL.

   SELECT pspnr post1 FROM proj INTO TABLE lt_proj

   FOR ALL ENTRIES IN lt_vbrp

   WHERE pspnr = lt_vbrp-ps_psp_pnr.

ENDIF.

BR,

Ankit.

[Former Member]

Hi ankit,

thanks for ur reply.....its help me a lot...thanks again

sharmistha

[Former Member]

This message was moderated.

[Former Member]

hI,

PROBLEM solv.thanks to all

sharmistha

[Former Member]

This message was moderated.

[Former Member]

Conversion Exits for PS_PSP_NR

Conversion Internal > External WBS Element Number

         CALL FUNCTION 'CONVERSION_EXIT_ABPSP_OUTPUT'
           EXPORTING
             input  = wa_export-pspnr
           IMPORTING
             output = wa_export-pspnr.

Conversion External > Internal WBS Element Number

  CALL FUNCTION 'CONVERSION_EXIT_ABPSP_INPUT'

Types : Begin of table_typ

     post1

     vbeln

     ps_psp_nr

end of table_typ

data : itab type table of table_typ,

   wa_itab like like of itab.

Loop at vbrp into wa_vbrp.

     wa_itab-vbeln = wa_vbrp-vbeln

     wa_itab-ps_psp_nr = wa_vbrp-ps_psp_nr

     read table proj into wa_proj with key ps_psp_nr = wa_vbrp-ps_psp_nr.

     wa_itab-post1 = wa_proj-post1.

     append wa_itab to itab.

    clear : wa_itab, wa_vbrp, wa_proj.

endloop.

[former_member1995]

Hi sharmistha,

   TYPES : BEGIN OF lty_vbrp,
          vbeln       TYPE vbeln_vf,
          ps_psp_pnr  TYPE ps_psp_pnr,
          pspid       TYPE ps_pspid,
        END OF lty_vbrp,

        BEGIN OF lty_proj,
          pspnr TYPE ps_intnr,
          post1 TYPE ps_post1,
        END OF lty_proj.

DATA : lt_vbrp      TYPE TABLE OF lty_vbrp,
       lt_vbrp_tmp  TYPE TABLE OF lty_vbrp,
       lt_proj      TYPE TABLE OF lty_proj.

FIELD-SYMBOLS : <lfs_vbrp_tmp>  TYPE lty_vbrp.

START-OF-SELECTION.

  SELECT vbeln ps_psp_pnr FROM vbrp
                    INTO TABLE lt_vbrp.
  IF sy-subrc = 0.

    lt_vbrp_tmp[] = lt_vbrp[].

    SORT lt_vbrp_tmp BY ps_psp_pnr.

    DELETE ADJACENT DUPLICATES FROM lt_vbrp_tmp COMPARING ps_psp_pnr.

    LOOP AT lt_vbrp_tmp ASSIGNING <lfs_vbrp_tmp>.

      CALL FUNCTION 'CONVERSION_EXIT_KONPD_OUTPUT'
        EXPORTING
          input  = <lfs_vbrp_tmp>-ps_psp_pnr
        IMPORTING
          output = <lfs_vbrp_tmp>-pspid.

    ENDLOOP.

    SELECT pspnr post1 FROM proj  INTO TABLE lt_proj
                                           FOR ALL ENTRIES IN lt_vbrp_tmp
                                                          WHERE pspid = lt_vbrp_tmp-pspid.

    IF sy-subrc IS NOT INITIAL.
      REFRESH lt_proj.
    ENDIF.

  ENDIF.

BR,

Asit