Quantcast
Channel: SCN : All Content - Web Dynpro ABAP
Viewing all articles
Browse latest Browse all 3667

Dynamically filling values in table column are not setting properlly but updating to ztable

$
0
0

Hi Experts,

 

plzzz check d code

 

here all values are updating to ztable perfectly

 

but Dynamically filling  values are not displaying except in first record

 

even in first record also last record run time   values are displaying for me

 

plzzz guide me for code change

 

as know might need to access via index set attribute  but

not able to code

 

 

 

 

 

*********************************SAVING FORM**************************************
***********************************************************************************
    DATA LO_ND_ND_FORM TYPE REF TO IF_WD_CONTEXT_NODE.
    DATA LO_EL_ND_FORM TYPE REF TO IF_WD_CONTEXT_ELEMENT.
    DATA LS_ND_FORM TYPE WD_THIS->ELEMENT_ND_FORM.
    LO_ND_ND_FORM = WD_CONTEXT->GET_CHILD_NODE( NAME = WD_THIS->WDCTX_ND_FORM ).
    LO_EL_ND_FORM = LO_ND_ND_FORM->GET_ELEMENT( ).
    LO_EL_ND_FORM->GET_STATIC_ATTRIBUTES(
      IMPORTING
        STATIC_ATTRIBUTES = LS_ND_FORM ).
    INSERT ZSILO_CREATE FROM LS_ND_FORM.

 

******************************************************************************
***********************************exprmnt*****************************************
  DATA LO_ND_ND_TABLE TYPE REF TO IF_WD_CONTEXT_NODE.
  DATA LT_ND_TABLE TYPE WD_THIS->ELEMENTS_ND_TABLE.
  DATA LO_EL_ND_TABLE TYPE REF TO IF_WD_CONTEXT_ELEMENT.
  DATA LS_ND_TABLE TYPE WD_THIS->ELEMENT_ND_TABLE.
  DATA LV_DIP_HI TYPE WD_THIS->ELEMENT_ND_TABLE-DIP_HI.
  DATA LV_VOL_DIP TYPE WD_THIS->ELEMENT_ND_TABLE-VOL_DIP.
  data LV_MASSOFLIQD  TYPE WD_THIS->ELEMENT_ND_TABLE-MASSOFLIQD.
  data LV_VAPOR_VOL TYPE WD_THIS->ELEMENT_ND_TABLE-VAPOR_VOL.
  data lv_PRESSURE_VOL TYPE WD_THIS->ELEMENT_ND_TABLE-PRESSURE_VOL.
  data wa TYPE zsilo_creat.
  data it_cret TYPE STANDARD TABLE OF zsilo_creat.
  TYPES : BEGIN OF TY_SILO,
    LGORT TYPE LGORT_D,
    DIP_HI TYPE ZDIPHI,
    VOL_DIP TYPE ZVOL_DIP,
    pressure TYPE zpressure,
    pressure_vol TYPE zpressure,
    END OF TY_SILO.
  data wa_master TYPE ty_silo.

 

* navigate from <CONTEXT> to <ND_TABLE> via lead selection
  LO_ND_ND_TABLE = WD_CONTEXT->GET_CHILD_NODE( NAME = WD_THIS->WDCTX_ND_TABLE ).
  LO_ND_ND_TABLE->GET_STATIC_ATTRIBUTES_TABLE( IMPORTING TABLE = LT_ND_TABLE ).

 

  LOOP at LT_ND_TABLE into wa.
    SELECT SINGLE LGORT DIP_HI VOL_DIP pressure pressure_vol
             FROM ZSILO_MASTER
             INTO WA_master
             WHERE LGORT = wa-LGORT  AND DIP_HI = wa-DIP_HI and pressure = wa-pressure.
      wa-vol_dip = wa_master-vol_dip.
      wa-pressure_VOL = wa_master-pressure_vol.
      wa-MASSOFLIQD = wa_master-vol_dip * wa-DENSITY.
      wa-VAPOR_VOL = wa-MAX_VOL - wa_master-vol_dip.
*     navigate from <CONTEXT> to <ND_TABLE> via lead selection
       LO_ND_ND_TABLE = WD_CONTEXT->GET_CHILD_NODE( NAME = WD_THIS->WDCTX_ND_TABLE ).
*      get element via lead selection
       LO_EL_ND_TABLE = LO_ND_ND_TABLE->GET_ELEMENT( ).

 

* alternative access  via index
*      data V_INDEX TYPE SY-TABIX.

 

*      lo_el_nd_table = lo_nd_nd_table->get_element( index = v_index ).

 

*      @TODO fill attribute
      lv_vol_dip = wa_master-vol_dip.
*      set single attribute
      if wa_master-vol_dip is not INITIAL.
      LO_EL_ND_TABLE->SET_ATTRIBUTE(
         NAME =  `VOL_DIP`
         VALUE = LV_VOL_DIP ).
      endif.
      LV_MASSOFLIQD = wa-MASSOFLIQD.
      if wa-MASSOFLIQD is not INITIAL.
      LO_EL_ND_TABLE->SET_ATTRIBUTE(
         NAME =  `MASSOFLIQD`
         VALUE = LV_MASSOFLIQD ).
      ENDIF.
      LV_VAPOR_VOL = wa-VAPOR_VOL.
      if wa-VAPOR_VOL is not INITIAL.
      LO_EL_ND_TABLE->SET_ATTRIBUTE(
         NAME =  `VAPOR_VOL`
         VALUE = LV_VAPOR_VOL ).
      ENDIF.
      LV_PRESSURE_VOL = wa_master-pressure_vol.
      if ( wa-PRESSURE is not INITIAL and wa-pressure_vol is not INITIAL ).
      LO_EL_ND_TABLE->SET_ATTRIBUTE(
         NAME =  `PRESSURE_VOL`
         VALUE = LV_PRESSURE_VOL ).
*      CLEAR wa_master-pressure_vol.
      ENDIF.

 

    if wa-werks is not INITIAL.
    INSERT zsilo_creat from wa.
    else.
      clear wa.
      CLEAR wa_master.
*      CLEAR lv_vol_dip.
*      CLEAR LV_MASSOFLIQD.
*      CLEAR LV_VAPOR_VOL.
*      CLEAR LV_PRESSURE_VOL.
      ENDIF.
    ENDLOOP.
************************************************************************************
************************************************************************************
************************************************************************************
* alternative access  via index
* lo_el_nd_table = lo_nd_nd_table->get_element( index = 1 ).

 


**********************************************************************************
******Volume of Liquid =read from the Calibration chart against the Dip Ht
******Mass of Liquid=Volume of Liquid*Density of Liquid
******Volume of Vapor=Max Volume of Silo-Volume of liquid

      


       dip_hi      dip_vol       density       mass of  liq      max vol        vapor       pressure          pressure_vol


               1               10             5               50                 140             120               

               2                20            7               140               150              130 

                                                                                                                             10                    100

                                                                                                                              11                   110


out should be like this bt for me dynamically filling values are not setting properlly


pllzz hel meeeee

 

Capture.PNGi


Viewing all articles
Browse latest Browse all 3667

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>