ALV Report Prob with Sys Status & Totl Planned Costs

Question

Hi,
Ive dev the report. now ive a few chages on report. I need to add this three frields in my report.
For the getting the system status. For Each works Order find the recors in the table JEST.
JEST-OBJNR = AUFK-OBJNR AND JEST-STAT <> 'X' AND CHARG = '01'.
THEN we need to find each record  TJ024-txt04.
And Getting the Tot Planned cost..First we use table PMCO and list all entries for the orders selected for the report where PMCO-objnr = aufk-objnr. and Sum of (PMCO-wrt00 To PMCO-wrt16) where pmco-wrttp = '1'.
Sum of all records of the order.
  IF ip_out = 'X' AND ip_rel = 'X' AND ip_com = 'X'. "means  if its ourstanding or completed or progress are selected.
  PERFORM select_else.
FORM select_else.
  SELECT   aufk~aufnr
           aufk~auart
           aufk~werks
           aufk~objnr  
           aufk~ktext
           aufk~idat1
           aufk~zzwref
           aufk~zzhmrg
           afih~kunum
           afih~serialnr
           afih~sermat
           afih~ilart
  INTO TABLE itab
  FROM aufk INNER JOIN afih ON aufk~aufnr = afih~aufnr
  WHERE aufk~aufnr IN so_order
  AND   aufk~auart IN so_ordrt
  AND   aufk~erdat IN so_per
  AND   afih~ilart IN so_mat
  AND   afih~sermat IN so_mat1
*  AND   afih~gewrk IN so_mwc
  AND   aufk~vaplz IN so_mwc
  AND   aufk~werks IN so_plnt.
ENDFORM.
In the itab iam getting OBJNR for every order number. now i need to get the system status as well Totl Planned Costs .
Ive a bit confussed.
For getting System stastus.. but its not working.
loop at itab into wa .
select single stat from jest into lv_stat where OBJNR = wa-objnr AND
                                                stat  NE 'X' AND
                                                chgnr = '01'.
clear:wa.
select single txt04 from tj02t into lv_STTXT where ISTAT = lv_stat.
wa-sttxt = lv_sttxt.
append wa to itab.
clear:lv_stat,
       lv_sttxt,
       wa.
endloop.
Plz let me know  while append to itab. its not append the status to final itab. as well. how to calc  the Total planned costs.
Bcoz in the PMCO, ive WRT00,WRt01,WRT02 Up to WRT16. I need to sum every column as well as every row then last final figure , i need to add to itab-dgeskoplan[total planned cost field]. how to do this.
Plz give me solution.
Regards

Answer 1

hi,
thank you for repy.Ive cleared but its not working.
can u plz tell me the to create the status color in other way
FORM monitor_create .
  ls_layout-excp_fname = 'TRAFFIC1'.
  IF sy-datum BETWEEN orange2 AND orange .
     wa-traffic1 = '2'.
    clear:orange2,
          orange.
  ELSEIF sy-datum > green.
    wa-traffic1 = '1'.
     clear:green.
  ELSEIF sy-datum < red.
    wa-traffic1 = '3'.
    clear:red.
  ENDIF.
  If gray is not initial.
*    if sy-datum > gray.
    wa-traffic1 = '0'.
    clear:gray.
*  endif.
  endif.
ENDFORM.
Regards