fi program

[Former Member]

hello.i have to make a program,plz help me or provide me any other sample program so that i can make my program.

i have to first goto reguh table and select vblnr and zaldt and lifnr and name1.now we goto BKPF table and will give belnr as vblnr of REGUH and BUDAT as ZALDT of reguh.after execution of BKPF we will select AWKEY from this BKPF table and then goto new session and will again open BKPF in this table and give this awkey and execute.then we will slect BUKRS,BELNR,GJAHR from this BKPF and will goto BSEG table.then give this BUKRS,BELNR,GJAHR and execute.and sgtxt of bseg should now be updated of this by LIFNR and NAME1 of REGUH.

please help me how to proceed.thanks!!

Moderator Message: Requirements dumping is not allowed. Thread locked.

Message was edited by: Suhas Saha

[Former Member]

HI

Use the for all entries or join condition you can get o/p

example report.

TYPES: BEGIN OF t_bkpf,

*  include structure bkpf.

  bukrs LIKE bkpf-bukrs,

  belnr LIKE bkpf-belnr,

  gjahr LIKE bkpf-gjahr,

  bldat LIKE bkpf-bldat,

  monat LIKE bkpf-monat,

  budat LIKE bkpf-budat,

  xblnr LIKE bkpf-xblnr,

  awtyp LIKE bkpf-awtyp,

  awkey LIKE bkpf-awkey,

END OF t_bkpf.

DATA: it_bkpf TYPE STANDARD TABLE OF t_bkpf INITIAL SIZE 0,

      wa_bkpf TYPE t_bkpf.

TYPES: BEGIN OF t_bseg,

*include structure bseg.

  bukrs     LIKE bseg-bukrs,

  belnr     LIKE bseg-belnr,

  gjahr     LIKE bseg-gjahr,

  buzei     LIKE bseg-buzei,

  mwskz     LIKE bseg-mwskz,         "Tax code

  umsks     LIKE bseg-umsks,         "Special G/L transaction type

  prctr     LIKE bseg-prctr,         "Profit Centre

  hkont     LIKE bseg-hkont,         "G/L account

  xauto     LIKE bseg-xauto,

  koart     LIKE bseg-koart,

  dmbtr     LIKE bseg-dmbtr,

  mwart     LIKE bseg-mwart,

  hwbas     LIKE bseg-hwbas,

  aufnr     LIKE bseg-aufnr,

  projk     LIKE bseg-projk,

  shkzg     LIKE bseg-shkzg,

  kokrs     LIKE bseg-kokrs,

END OF t_bseg.

DATA: it_bseg TYPE STANDARD TABLE OF t_bseg INITIAL SIZE 0,

      wa_bseg TYPE t_bseg.

DATA: it_ekko TYPE STANDARD TABLE OF ekko.

*Select all fields of a SAP database table into in itab

SELECT *

  FROM ekko

  INTO TABLE it_ekko.

*Select directly into an internal table

SELECT bukrs belnr gjahr buzei mwskz umsks prctr hkont xauto koart

       dmbtr mwart hwbas aufnr projk shkzg kokrs

  FROM bseg

  INTO TABLE it_bseg.

* Select directly into an internal table where fields are in a

* different order or not all fields are specified

SELECT bukrs belnr gjahr buzei mwskz umsks prctr hkont xauto koart

       dmbtr mwart hwbas aufnr projk shkzg kokrs

  FROM bseg

  INTO CORRESPONDING FIELDS OF TABLE it_bseg.

*Select... endselect command

SELECT bukrs belnr gjahr buzei mwskz umsks prctr hkont xauto koart

       dmbtr mwart hwbas aufnr projk shkzg kokrs

  FROM bseg

  INTO wa_bseg.

  APPEND wa_bseg TO it_bseg.

1. ENDSELECT.

*Select FOR ALL ENTRIES command

SELECT bukrs belnr gjahr bldat monat budat xblnr awtyp awkey

  UP TO 100 ROWS

  FROM bkpf

  INTO TABLE it_bkpf.

IF sy-subrc EQ 0.

* The FOR ALL ENTRIES comand only retrieves data which matches

* entries within a particular internal table.

  SELECT bukrs belnr gjahr buzei mwskz umsks prctr hkont xauto koart

         dmbtr mwart hwbas aufnr projk shkzg kokrs

    FROM bseg

    INTO TABLE it_bseg

    FOR ALL ENTRIES IN it_bkpf

    WHERE bukrs EQ it_bkpf-bukrs AND

          belnr EQ it_bkpf-belnr AND

          gjahr EQ it_bkpf-gjahr.

ENDIF.

Regards

Mahesh