Data is not fetching in inner join

Question

Hi Experts,
I developed a select query using inner joins, all the fields data is gettting appended, but one field DISPO data is not getting appeneded. please check the innerjoin and suggest me ur soluitons.
MODULE GET_DATA OUTPUT.
  select   arbpl
         sptag
         aufnr
         plnum
         posnr
         plnfl
         werks  from s022
                    into table it_s022
                     where arbpl in s_arbpl
                      and  werks in s_werks
                      and  sptag in s_sptag
                      and  matnr in s_matnr.
if sy-subrc eq 0.
select a~aufnr
       a~posnr
       a~kdauf
       a~pgmng
       a~plnum
       a~strmp
       b~plnty
       b~gamng
       b~igmng
       b~iasmg
       b~rmnga
       b~gstrp
       b~rsnum
       b~plnbez
       b~dispo
       c~maktx
       b~plnnr
       b~plnty
       b~zaehl
       d~vornr
       d~ltxa1
       b~aufpl
       b~aplzt
       e~astnr
       into corresponding fields of table it_afpo from  afko as b
                inner join afpo as  a
                 on a~aufnr = b~aufnr
                inner join makt as c
                 on b~plnbez = c~matnr
                inner join plpo as d
                 on b~plnnr  = d~plnnr
                  and b~plnty = d~plnty
                  and b~zaehl  = d~zaehl
                 inner join aufk as e
                  on b~aufnr = e~aufnr
                inner join marc as f
                 on bplnty = fmatnr
                for all entries in it_s022
                 where b~aufnr = it_s022-aufnr.
                     and e~erdat = it_s022-sptag
                 and  a~posnr = it_s022-posnr
                and  a~plnum = it_s022-plnum .  .
  if sy-subrc eq 0.
    it_afpo1[] = it_afpo[].
    sort it_afpo1 by aufpl." aplzt."""
    delete ADJACENT DUPLICATES FROM it_afpo1 COMPARING aufpl." aplzt ."""
    select aufpl
           aplzl
           fsavd
           fsavz
           ssedd
           ssedz
           mgvrg
            FROM  afvv  INTO TABLE It_afvv
                           FOR ALL ENTRIES IN IT_afpo1
                           WHERE aufpl = IT_afpo1-aufpl.
                            and aplzl = it_afpo1-aplzt.
   endif.
loop at it_afpo into wa_afpo.
DATA : G_SLNO(8) TYPE C.
G_SLNO = G_SLNO + 1.
wa_afpo-slno = g_slno.
    move-corresponding wa_afpo to wa_final.
   move-corresponding wa_afko to wa_final.
  read table it_afvv into wa_afvv with key
            aufpl = wa_afpo-aufpl binary search."aplzl = wa_afpo-aplzt binary search."""
*read table it_afko into wa_afko with key aufnr = wa_final-aufnr.
  IF SY-SUBRC EQ 0.
    move-corresponding wa_afvv to wa_final.
bal_qty = wa_final-gamng - wa_final-igmng.
    move : wa_afpo-slno  to wa_final-slno,
           wa_afpo-aufnr to wa_final-aufnr,
           wa_afpo-posnr to wa_final-posnr,
           wa_afpo-kdauf to wa_final-kdauf, " Sales order Number
           wa_afpo-pgmng to wa_final-pgmng, " Order item qty
           wa_afpo-plnum to wa_final-plnum, " Planned  Order Qty
           wa_afpo-strmp to wa_final-strmp, " Planned Order Date
           wa_afpo-gstrp to wa_final-gstrp, " Basic Finish  date
           wa_afpo-rsnum to wa_final-rsnum, " Number of Reservation
           wa_afpo-plnbez to wa_final-plnbez, " Material Number
           wa_afpo-maktx to wa_final-maktx,
           wa_afpo-plnnr to wa_final-plnnr,
           wa_afpo-plnty to wa_final-plnty,
           wa_afpo-zaehl to wa_final-zaehl,
           wa_afpo-vornr to wa_final-vornr,
           wa_afpo-ltxa1 to wa_final-ltxa1,
           wa_afpo-aufpl to wa_final-aufpl,
           wa_afvv-fsavd to wa_final-fsavd,
           wa_afvv-fsavz to wa_final-fsavz,
           wa_afvv-ssedd to wa_final-ssedd,
           wa_afvv-ssedz to wa_final-ssedz,
           wa_afvv-mgvrg to wa_final-mgvrg,
           wa_afko-igmng to wa_final-igmng,
           wa_afko-iasmg to wa_final-iasmg,
           wa_afko-rmnga to wa_final-rmnga,
           wa_afko-dispo to wa_final-dispo,
          wa_afko-bal_qty to wa_final-bal_qty,
           wa_aufk-astnr to wa_final-astnr,
           wa_afpo-text  to wa_final-text.
*bal_qty = wa_final-gamng - wa_final-igmng.
*bal_qty = wa_afko-bal_qty.
  endif.
  append wa_final to it_final.
  clear:wa_final ,wa_afpo,wa_afvv,wa_aufk,wa_afko.
endloop.
endif.
ENDMODULE.                 " GET_DATA  OUTPUT
*&      Module  DISPLAY_DATA  OUTPUT
      text
MODULE DISPLAY_DATA OUTPUT.
  IF REF_CONTAINER IS INITIAL.
     PERFORM FIELD_CAT.
  CREATE OBJECT REF_CONTAINER
  EXPORTING
       PARENT                      =
    CONTAINER_NAME              = 'CUSTOM_CONTROL'
       STYLE                       =
       LIFETIME                    = lifetime_default
       REPID                       =
       DYNNR                       =
       NO_AUTODEF_PROGID_DYNNR     =
      EXCEPTIONS
        CNTL_ERROR                  = 1
        CNTL_SYSTEM_ERROR           = 2
        CREATE_ERROR                = 3
        LIFETIME_ERROR              = 4
        LIFETIME_DYNPRO_DYNPRO_LINK = 5
        others                      = 6
  IF SY-SUBRC <> 0.
    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
               WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
  ENDIF.
  L_LAYO-ZEBRA = 'X'.
  L_LAYO-GRID_TITLE = 'JOB CARD'.
  data: variant type disvariant.
  CREATE OBJECT REF_ALV_GRID
    EXPORTING
       I_SHELLSTYLE      = 0
       I_LIFETIME        =
      I_PARENT          = REF_CONTAINER
       I_APPL_EVENTS     = space
       I_PARENTDBG       =
       I_APPLOGPARENT    =
       I_GRAPHICSPARENT  =
       I_NAME            =
       I_FCAT_COMPLETE   = SPACE
      EXCEPTIONS
        ERROR_CNTL_CREATE = 1
        ERROR_CNTL_INIT   = 2
        ERROR_CNTL_LINK   = 3
        ERROR_DP_CREATE   = 4
        others            = 5
  IF SY-SUBRC <> 0.
    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
               WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
  ENDIF.
l_variant-report = sy-cprog.
*data: l_prnt type lvc_s_prnt.
*l_prnt-print = 'X'.
  SORT T_FCAT.
  call method ref_alv_grid->set_ready_for_input
   exporting
    i_ready_for_input = 1.
create object event_receiver.
   set handler event_receiver->handle_top_of_page for ref_alv_grid.
  CALL METHOD REF_ALV_GRID->SET_TABLE_FOR_FIRST_DISPLAY
       EXPORTING
       I_BUFFER_ACTIVE               =
       I_BYPASSING_BUFFER            =
       I_CONSISTENCY_CHECK           =
       I_STRUCTURE_NAME              =
        is_variant                     =  variant   "l_variant
        i_save                        = 'X'
       I_DEFAULT                     = 'X'
         IS_LAYOUT                     = L_LAYO
       IS_PRINT                      =
       IT_SPECIAL_GROUPS             =
       IT_TOOLBAR_EXCLUDING          =
       IT_HYPERLINK                  =
       IT_ALV_GRAPHICS               =
       IT_EXCEPT_QINFO               =
       IR_SALV_ADAPTER               =
    CHANGING
      IT_OUTTAB                     = IT_final[]
      IT_FIELDCATALOG               = T_FCAT
       IT_SORT                       =
       IT_FILTER                     =
      EXCEPTIONS
        INVALID_PARAMETER_COMBINATION = 1
        PROGRAM_ERROR                 = 2
        TOO_MANY_LINES                = 3
        others                        = 4
  IF SY-SUBRC <> 0.
    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
               WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
  ENDIF.
   create object g_event_receiver.
   set handler g_event_receiver->handle_user_command for ref_alv_grid.
   set handler g_event_receiver->handle_toolbar for ref_alv_grid.
§ 4.Call method 'set_toolbar_interactive' to raise event TOOLBAR.
   call method ref_alv_grid->set_toolbar_interactive.
   call method cl_gui_control=>set_focus exporting control = ref_alv_grid.
ENDIF.
ENDMODULE.                 " DISPLAY_DATA  OUTPUT
*&      Module  STATUS_0100  OUTPUT
      text
MODULE STATUS_0100 OUTPUT.
  SET PF-STATUS 'MAIN001'.
SET TITLEBAR 'xxx'.
Regards,
Bharath Kumar

Answer 1

I agree with Shiva Kumar - most likely there is no such field in it_afpo. A few more suggestions though:
1) Do not post large pieces of code here - if you have a question about a particular SELECT statement, post only that statement and relevant data definitions. No one is going to read your whole program  anyway - we have work to do too.
2) Your JOIN is way too big and would be difficult to analyze if anything goes wrong. You might want to start with smaller SELECTs and, when you're sure everything is working correctly, then combine them into one. Also huge JOINT is not necessarily more efficient.
3) You don't have to use aliases "AS a... AS b", etc. Instead, just use the table name, e.g. AFKO... AFPO... .It is much easier to read this way. The aliases are needed only if you're joining the same table more than once. Also they're not limited to one letter either.