Routine Issue

Question

Hi Experts,
I have a requirement using routine i need to pull the data into daily sales cube.
For daily sales cube data will get updated form billing cube, global history cube, sales order cube and sales agreement cube.  In these 4 cubes i have 0material infoobject. 
In daily sales cube we dont have 0material infoobject.  Now i have to pull the data using 0material.
For this i have routine but when i check the routine it is showing error message 0material table was not maintained in abap dictionary.  please find the below code.
DATA: output_package  TYPE STANDARD TABLE OF /bic/cs8sd_c02
      WITH HEADER LINE WITH NON-UNIQUE DEFAULT KEY INITIAL SIZE 0.
DATA:  BEGIN OF g_t_material OCCURS 0,
        material type.....
busgrp   type.......
       END OF g_t_material.
clear g_t_material.
Read from 0material
  SELECT material busgrp
         FROM 0material
           INTO TABLE g_t_material
           WHERE objvers = 'A'.
sort g_t_material.
LOOP AT DATA_PACKAGE .
    MOVE DATA_PACKAGE TO output_package .
Elec Family
    IF DATA_PACKAGE-material  <> 0  OR
   read table g_t_material with key material = data_package-material
        if sy-subrc eq 0.
         output_package-busgrp = g_t_material-busgrp.
      APPEND output_package.
    ENDIF.
endloop.
Regards
Prasad

Answer 1

Hi,
For Daily Sales Cube the data will get updated from billing cube, global history cube, sales order cube and schedule agreement cube.  In these cubes we have 0Material infoobject.  But in Daily sales cube we dont have 0material infoobject so i have assigned business group infoobject into the cube assigned it to dimension and activated the daily sales cube. 
My requirement is to get the Business Group values based on 0Material.  This Business Group is a Navigational Attribute in 0Material .
Elec Family infoobject is a navigational attribute in 0material.
Please find the below revised code
DATA: output_package TYPE STANDARD TABLE OF /bic/cs8sd_c02 WITH HEADER
LINE WITH NON-UNIQUE DEFAULT KEY INITIAL SIZE 0.
DATA:  BEGIN OF g_t_material OCCURS 0,
       material type /BI0/OIMATERIAL,
       busgrp type /BIC/OICBUSGRP,
       END OF g_t_material.
clear g_t_material.
Read from 0material
  SELECT material /BIC/CBUSGRP
         FROM /BI0/PMATERIAL
           INTO TABLE g_t_material
           WHERE objvers = 'A'.
sort g_t_material.
LOOP AT DATA_PACKAGE .
    MOVE DATA_PACKAGE TO output_package .
Elec Family
    IF DATA_PACKAGE-material  <> 0.
      read table g_t_material with key material = data_package-material.
        if sy-subrc eq 0.
         output_package-busgrp = g_t_material-busgrp.
         APPEND output_package.
       endif.
    ENDIF.
endloop.
This routine is fine but when i check the routine output_package-busgrp =g_t_material-busgrp  here it is throwing exception The data object "OUTPUT_PACKAGE" does not have a component called busgrp.
As business group is included as a stand alone infoobject in cube level.
do i need to write the routine at the object level ?
Regards
Prasad
Edited by: Vara Prasad on Oct 13, 2008 2:06 PM