Selection from bseg with year

Question

Hi,
Iam trying to use bsak-budat with bseg-gjahr.But lengths are not same. I had offsetting with budat.But values are not matching...could any one tell me how to do that?
points guaranteed
cheers
kaki
    select BUKRS LIFNR AUGDT AUGBL GJAHR BELNR  BUZEI BUDAT BLDAT
        CPUDT WAERS BLART BSCHL SHKZG DMBTR WRBTR SGTXT HKONT SKFBT
         from bsak
         into corresponding fields of table t_bsak
          where
          lifnr in s_lifnr and
          BUKRS in s_bukrs and
          budat le s_budat and                          augdt in s_augdt.
loop at t_bsak.
  l_year = t_bsak-budat(4).
endloop.
  CHECK NOT t_bsak[] IS INITIAL.
  select BUKRS LIFNR AUGDT AUGBL GJAHR BELNR
       SHKZG DMBTR WRBTR SGTXT SKFBT KOSTL BSCHL HKONT BUZEI
     into corresponding fields of table t_bseg from bseg
            FOR ALL ENTRIES IN t_bsak
            where belnr = t_bsak-belnr and
                  gjahr = l_year and        " xxxxxx
                  bukrs = t_bsak-bukrs.

Answer 1

Define a field I_YEAR in int table T_BSAK.
DATA Begin of t_BSAK,
I_YEAR LIKE BSEG-GJAHR,
end of t_bsak.
loop at t_bsak.
t_bsak-l_year = t_bsak-budat(4).
modify t_bsak.
endloop.
Then
select BUKRS LIFNR AUGDT AUGBL GJAHR BELNR
SHKZG DMBTR WRBTR SGTXT SKFBT KOSTL BSCHL HKONT BUZEI
into corresponding fields of table t_bseg from bseg
FOR ALL ENTRIES IN t_bsak
where belnr = t_bsak-belnr and
gjahr = t_bsak-i_year and " xxxxxx
bukrs = t_bsak-bukrs.
Alternatively why not select gjahr from BSAK .
Cheers .
Sanjay