Enhancement Code (URGENT)

Hi All,
Can any one help in this regard,
Actually my task is,
I created a Master data Attribute Generic data source using Table(LFA1), after that i enhanced the datasource by append structure where i added a filed ZMATNR (filed from MARA table). So, now i have to write a code to populate data into ZMATNR in extract structure and i want to see the data of that field in RSA3. So, please help in this regard......
Technical Information:-
Datasource Name : ZGDSM
Extract Structure Name : ZOXID30102
Append Structure Name : ZENHANCE
Field Name in Append Structure: Component - ZMATNR, Component Type - MATNR
Field Name in Extract Structure : ZMATNR
Please help me in writing this enhancement code......
Thanks in Advance
Regards
Ramakrishna K

Hi,
U can check the sample code:
WHEN 'ZGDSM'.
data: ws_t_data type ZOXID30102.
data: w_matnr type matnr.
Populate the added fields
    LOOP AT i_t_data INTO ws_t_data.
      l_index = sy-tabix.
      select matnr from mara
      into w_matnr where lifnr = ws_t_data-lifner (Use u r condition/logic)
      IF sy-subrc EQ 0.
        ws_t_data-zmatnr = w_matnr.
      ENDIF.
      MODIFY i_t_data FROM ws_t_data INDEX l_index.
    ENDLOOP.
Thanks,
Debasish
    CLEAR i_t_data.
    REFRESH i_t_data.
    i_t_data[] = lt_employee[].

Similar Messages

Reg: DS enhancement code in production

Hi to all,
We are now in the production support. I want to change the DS enhanced code which is written in the implementation bcoz of performance reason. What is the procedure to do that and is there any prerequisites to take. No need to code help here.
Thanks,
Babu.

Hi Babu,
You just need to change the code in EXIT from development system and then do a transport. The code changes will be directly reflected in production after transport.
You don't need to worry about any delta or anything else as there are no structural changes and new code will start executing from next extraction onward.
Just transport the EXIT FM, no need to transport DS or anything else. If you are doing further structural enhancement then you will have to transport other objects accordingly. But if you are only doing code changes then just transport EXIT.
Regards,
Durgesh.

How to make "Read Report" pick up enhancement code as well

I want to enhance a SAP ECC6 program - H99CWTR0 (Wage type reporter). I need to add some more master data objects from other HR tables.
I have succesfully applied implicit enhancements to this program to allow my users to select extra data objects and to retrieve the relevant data from the database. However, the program reads a subroutine pool called H99CWTR0_ALV_TEMPLATE and makes dynamic run time changes and generates a temporary subroutine pool. I have also had to apply implicit enhancements to the template but this is not read by H99CWTR0. So I am unable to to keep the shared data segment in line with the driver program H99CWTR0 which leads to an ABAP dump.
I would prefer to make all changes to SAP programs using the enhancement framework rather than having to clone SAP programs into the "Z" namespace.
Is there a way of making the "Read report" pick up the implicit enhancement code as well as all the other includes in the template?

Hi Prabhu
The dump text said -
"The length of COMMON PART "DRIVER_DATA_EXCHANGE" in program "%_T0DYT0" is different from the corresponding area in the calling program "H99CWTR0".
Length of the COMMON PART in program %_T0DYT0: 1224 bytes
Length of the COMMON PART in program H99CWTR0: 1232 bytes
There is probably an error in the program "H99CWTR0"."
My enhancement to H99CWTR0 is being accessed, but the equivalent enhancement to H99CWTR0_ALV_TEMPLATE is not. Hence the discrepancy in the length of common shared data segment.
The ABAP line "read report iv_template into lt_code." in include H99CWTR0_FORMS is not reading the implicit ehancement code I added. So when the ABAP line "generate subroutine pool lt_code name ov_driver message mm line ll" is called to generate the temporary subroutine code my code is lost.
Regards
Phil Smith

Dtaa source Enhancement code

Hi All,
I am enhancing the DS: 2LIS_11_VAITM with fields EDATU,ZZADATE from VBEP Table.
Could any body provide me the code for this
Regards,
Madhu

Hi.....
Check this........
Data source Enhancement Code Samples
Data source Enhancement
Re: writing custom code for enhancing the generic data source
https://www.sdn.sap.com/irj/sdn/go/portal/prtroot/docs/library/uuid/302d4b15-5847-2a10-93bb-9c45d9f06b16
Hope this helps you.......
Regards,
Debjani.......

Pulling the condition records - help in the ABAP code -urgent!!!!!

hi folks,
I need some urgent help here..
I have discussed this portion before in the forum but there are some changes and I need some help here.
The code goes like this....
select knumv kschl kbetr kwert
from konv into table cdata
 for all entries in bodyitab21
 where konv~knumv = bodyitab21-knumv
 and konv~kwert > 0.
I am successfully pulling the data into cdata here..
I need to check for various condition types that are around 100. I need to split them into two types because some condition types containe just pricing values while some others have values in % (but the value not stored in that format) To do the extra coding I have use two differetn case statements and that's what i have done here.
My probelm is I will have to check for each condition type, if the 'kwert' field has some value in it pull the data and there is a condition text associcated to it in the table 'T685T' that needs to be pulled into the itab.
This process has to be done for every condition type.Given this scenario how can i do it?
 loop at cdata into wac.
 case wac-kschl.
 when 'ZRAT' OR 'ZAGR' OR 'ZRCR' OR 'Y098' OR 'Y007' OR 'ZREW' OR 'Y106' OR 'ZTSR' OR 'Y127' OR 'Y125' OR 'Y126' OR 'Y124' OR 'Y157' OR 'Y092' OR 'Y085' OR 'Y090' OR 'ZMZD' OR 'Y215' OR 'Y214' OR 'Y111' OR 'ZC$D' OR 'ZAUD' OR 'ZTHX' OR 'ZCOL'
OR 'ZCFE' OR ZSPA' OR 'ZBOX' OR 'ZCOR' OR 'Y130' OR 'ZBOR'
OR 'Y108' OR 'ZFPP' OR 'Y204' OR 'Y200' OR 'Y202' OR 'Y201' OR 'Y203' OR 'Y002' OR 'ZSCR' OR 'Y128' OR 'Y100' OR 'ZABS' OR 'ZSMG' OR 'ZFRE' OR 'ZREC' OR 'ZCOM' OR 'ZPMG' OR 'BEMG' OR 'ZDTI' OR'ZBET'.
***** the first set of these condition types have just values if wac-kbetr = ' ' AND wac-kwert = ' '.
 continue.
 else.
 p = wac-kbetr.
 i = p.
 c = i.
 MOVE c to w_accitab-zrate.
 MOVE wac-kbetr to w_accitab-zrate.
 MOVE wac-kwert to w_accitab-zsubtotal.
 endif.
 when 'ZSED' OR 'ZRFQ' OR 'ZIMP' OR 'ZERR'
 OR 'ZECD' 'ZAC1' OR 'ZAC%' OR 'ZAC2' OR 'ZSED' OR 'ZRFQ' OR 'ZIMP' OR 'ZERR' OR 'ZECD' 'ZQUD' OR 'ZEMP' OR 'Y101' OR 'Y012' OR 'ZCHU' OR 'Y054' OR 'Y065' OR 'Y066' OR 'Y067' OR 'Y068' OR 'Y069' OR 'Y096'
OR 'Y103' OR 'Y010' OR 'Y070' OR 'Y071' OR
'Y072' OR 'Y073' OR 'Y074' OR 'Y075' OR 'Y076'
OR 'Y077' OR 'Y078' OR 'Y079' OR 'Y156' OR OR 'Y148'
OR 'Y102' OR 'Y205' OR 'Y206' OR 'Y207' OR 'Y208' OR
'Y209' OR 'Y213' OR 'Y210' OR 'Y211' OR 'Y212' OR 'Z%DS'
OR 'Z%DO' OR 'Y113' OR 'Y151' OR 'Y152' OR 'Y153' OR
'Y154' OR 'Y155' OR 'Y147' OR'Z%PB' OR 'Y142' OR 'Y131'
OR 'Y141' OR 'Y149' OR 'ZDEO' OR 'Z%DR' OR 'Y115' OR
'Y116' OR 'Y095' OR 'Y084' OR 'ZSA$' OR 'ZSA%' OR
'ZPA$' OR 'ZPA%'.
the second set of these condition types have just values that has to be converted into %.
 if wac-kbetr = ' ' AND wac-kwert = ' '.
 clear w_accitab-zrate.
 continue.
 else.
 p = wac-kbetr.
 p = p / 10.
 if p < 1.
 rate+0(1) = '-'.
 endif.
 if i = 0.
 clear w_accitab-zrate.
 else.
 i = p.
 c = i.
 shift c right deleting trailing '-'.
 concatenate rate c '%' into rate.
 condense rate no-gaps.
 MOVE wac-kbetr to w_accitab-zrate.
 MOVE rate to w_accitab-zrate.
 clear rate.
 MOVE wac-kwert to w_accitab-zsubtotal.
 endif.
 endif.
Thanks alot in advance.
Santhosh

Maybe this will help you, otherwise I'm missing something.
[code]
data: begin of wac,
 kschl type t685t-kschl,
 vtext type t685t-vtext,
 end of wac.
case wac-kschl.
when 'ZRAT' or 'ZAGR' or 'ZRCR' or 'Y098' or 'Y007' or 'ZREW' or 'Y106'
or 'ZTSR' or 'Y127' or 'Y125' or 'Y126' or 'Y124' or 'Y157' or 'Y092' or
'Y085' or 'Y090' or 'ZMZD' or 'Y215' or 'Y214' or 'Y111' or 'ZC$D' or
 'ZAUD' or 'ZTHX' or 'ZCOL' or 'ZCFE' or 'ZSPA' or 'ZBOX' or 'ZCOR'
or 'Y130' or 'ZBOR' or 'Y108' or 'ZFPP' or 'Y204' or 'Y200' or 'Y202' or
'Y201' or 'Y203' or 'Y002' or 'ZSCR' or 'Y128' or 'Y100' or 'ZABS' or
 'ZSMG' or 'ZFRE' or 'ZREC' or 'ZCOM' or 'ZPMG' or 'BEMG' or 'ZDTI'
 or'ZBET'.
Some code
when 'ZSED' or 'ZRFQ' or 'ZIMP' or 'ZERR'
or 'ZECD' or 'ZAC1' or 'ZAC%' or 'ZAC2' or 'ZSED' or 'ZRFQ' or 'ZIMP' or
'ZERR' or 'ZECD' or 'ZQUD' or 'ZEMP' or 'Y101' or 'Y012' or 'ZCHU' or
'Y054' or 'Y065' or 'Y066' or 'Y067' or 'Y068' or 'Y069' or 'Y096'
or 'Y103' or 'Y010' or 'Y070' or 'Y071' or
'Y072' or 'Y073' or 'Y074' or 'Y075' or 'Y076'
or 'Y077' or 'Y078' or 'Y079' or 'Y156' or 'Y148'
or 'Y102' or 'Y205' or 'Y206' or 'Y207' or 'Y208' or
'Y209' or 'Y213' or 'Y210' or 'Y211' or 'Y212' or 'Z%DS'
or 'Z%DO' or 'Y113' or 'Y151' or 'Y152' or 'Y153' or
'Y154' or 'Y155' or 'Y147' or'Z%PB' or 'Y142' or 'Y131'
or 'Y141' or 'Y149' or 'ZDEO' or 'Z%DR' or 'Y115' or
'Y116' or 'Y095' or 'Y084' or 'ZSA$' or 'ZSA%' or
'ZPA$' or 'ZPA%'.
Some code
endcase.
select single vtext into wac-vtext from t685t
 where spras = sy-langu
 and kschl = wac-kschl.
write:/ wac-kschl, wac-vtext.
[/code]
Regards,
Rich Heilman

Check code ( urgent help needed from ABAP guys working on FI/CO)

hi all,
check my code & give me solution for getting only offsetting acounts depending on particular HKONT.
plz i need its solution urgently.
REPORT zglaccline NO STANDARD PAGE HEADING
 LINE-SIZE 300
 LINE-COUNT 65(3).
TABLES : bkpf, bseg.
DATA : BEGIN OF it_bkpf OCCURS 0,
 bukrs LIKE bkpf-bukrs,
 belnr LIKE bkpf-belnr,
 gjahr LIKE bkpf-gjahr,
 monat LIKE bkpf-monat,
 budat LIKE bkpf-budat,
 brnch LIKE bkpf-brnch,
 xblnr LIKE bkpf-xblnr,
 waers LIKE bkpf-waers,
 END OF it_bkpf.
DATA : BEGIN OF it_bseg OCCURS 0,
gsber LIKE bseg-gsber,
hkont LIKE bseg-hkont,
kunnr LIKE bseg-kunnr,
sgtxt LIKE bseg-sgtxt,
bschl LIKE bseg-bschl,
wrbtr LIKE bseg-wrbtr,
dmbtr LIKE bseg-dmbtr,
pswsl LIKE bseg-pswsl,
kostl LIKE bseg-kostl,
prctr LIKE bseg-prctr,
aufnr LIKE bseg-aufnr,
shkzg LIKE bseg-shkzg,
augbl LIKE bseg-augbl,
END OF it_bseg.
DATA : BEGIN OF it_res OCCURS 0,
bukrs LIKE bkpf-bukrs,
gjahr LIKE bkpf-gjahr,
monat LIKE bkpf-monat,
belnr LIKE bkpf-belnr,
budat LIKE bkpf-budat,
brnch LIKE bkpf-brnch,
gsber LIKE bseg-gsber,
hkont LIKE bseg-hkont,
kunnr LIKE bseg-kunnr,
bschl LIKE bseg-bschl,
prctr LIKE bseg-prctr,
kostl LIKE bseg-kostl,
aufnr LIKE bseg-aufnr,
pswsl LIKE bseg-pswsl,
wrbtr LIKE bseg-wrbtr,
waers LIKE bkpf-waers,
dmbtr LIKE bseg-dmbtr,
xblnr LIKE bkpf-xblnr,
txt50 LIKE skat-txt50,
sgtxt LIKE bseg-sgtxt,
shkzg LIKE bseg-shkzg,
END OF it_res.
DATA : BEGIN OF itab_head OCCURS 0,
 name1(20) TYPE c,
 END OF itab_head.
SELECTION-SCREEN BEGIN OF BLOCK b_2 WITH FRAME TITLE text-002.
PARAMETERS : p_sel1 RADIOBUTTON GROUP sel,
 p_sel2 RADIOBUTTON GROUP sel,
 p_sel3 RADIOBUTTON GROUP sel.
SELECTION-SCREEN END OF BLOCK b_2.
SELECTION-SCREEN SKIP 1.
SELECTION-SCREEN BEGIN OF BLOCK b_1 WITH FRAME TITLE text-001.
PARAMETER p_bukrs LIKE bkpf-bukrs DEFAULT 'ML' OBLIGATORY.
SELECT-OPTIONS : s_belnr FOR bkpf-belnr.
SELECT-OPTIONS : s_gjahr FOR bkpf-gjahr OBLIGATORY.
SELECT-OPTIONS : s_monat FOR bkpf-monat.
SELECT-OPTIONS : s_blart FOR bkpf-blart.
SELECT-OPTIONS : s_budat FOR bkpf-budat.
SELECT-OPTIONS : s_waers FOR bkpf-waers.
SELECT-OPTIONS : s_hkont FOR bseg-hkont.
SELECT-OPTIONS : s_bldat FOR bkpf-bldat.
SELECTION-SCREEN END OF BLOCK b_1.
SELECT bukrs belnr gjahr monat budat brnch xblnr waers
 INTO CORRESPONDING FIELDS OF TABLE it_bkpf
 FROM bkpf
 WHERE bukrs = p_bukrs
 AND belnr IN s_belnr
 AND gjahr IN s_gjahr
 AND monat IN s_monat
 AND blart IN s_blart
 AND budat IN s_budat
 AND bldat IN s_bldat
 AND waers IN s_waers.
IF NOT it_bkpf[] IS INITIAL.
LOOP AT it_bkpf.
IF p_sel1 = 'X'.
 SELECT gsber hkont kunnr sgtxt bschl wrbtr pswsl kostl shkzg
 dmbtr prctr aufnr augdt augbl
 INTO CORRESPONDING FIELDS OF TABLE it_bseg
 FROM bseg
 WHERE bukrs = it_bkpf-bukrs
 AND belnr = it_bkpf-belnr
 AND gjahr = it_bkpf-gjahr
 AND pswsl = it_bkpf-waers
 AND hkont IN s_hkont.
ELSEIF p_sel2 = 'X'.
 SELECT gsber hkont kunnr sgtxt bschl wrbtr pswsl kostl shkzg
 dmbtr prctr aufnr augdt augbl
 INTO CORRESPONDING FIELDS OF TABLE it_bseg
 FROM bseg
 WHERE bukrs = it_bkpf-bukrs
 AND belnr = it_bkpf-belnr
 AND gjahr = it_bkpf-gjahr
 AND pswsl = it_bkpf-waers.
 AND koart <> 'S'.
ENDIF.
 IF sy-subrc EQ 0.
 LOOP AT it_bseg.
 SELECT SINGLE txt50 INTO it_res-txt50
 FROM skat
 WHERE spras = 'EN'
 AND ktopl = 'PCA'
 AND saknr = it_bseg-hkont.
it_res-bukrs = it_bkpf-bukrs.
 it_res-gjahr = it_bkpf-gjahr.
 it_res-monat = it_bkpf-monat.
 it_res-gsber = it_bseg-gsber.
 it_res-belnr = it_bkpf-belnr.
 it_res-budat = it_bkpf-budat.
 it_res-brnch = it_bkpf-brnch.
 it_res-kunnr = it_bseg-kunnr.
 it_res-hkont = it_bseg-hkont.
 it_res-sgtxt = it_bseg-sgtxt.
 it_res-bschl = it_bseg-bschl.
 it_res-wrbtr = it_bseg-wrbtr.
 it_res-pswsl = it_bseg-pswsl.
 it_res-waers = it_bkpf-waers.
 it_res-dmbtr = it_bseg-dmbtr.
 it_res-kostl = it_bseg-kostl.
 it_res-prctr = it_bseg-prctr.
 it_res-aufnr = it_bseg-aufnr.
 it_res-shkzg = it_bseg-shkzg.
 it_res-augbl = it_bseg-augbl.
 it_res-xblnr = it_bkpf-xblnr.
 APPEND it_res.
 CLEAR it_res.
 ENDLOOP.
 CLEAR it_bkpf.
 ENDIF.
ENDLOOP.
ENDIF.
LOOP AT it_res.
IF it_res-shkzg EQ 'H'.
 it_res-wrbtr = it_res-wrbtr * -1.
 it_res-dmbtr = it_res-dmbtr * -1.
ENDIF.
WRITE : /2(4) it_res-bukrs,
 13(4) it_res-gjahr,
 21(2) it_res-monat,
 31(10) it_res-belnr,
 44(10) it_res-budat,
 55(4) it_res-brnch,
 60(4) it_res-gsber,
 70(10) it_res-hkont,
 82(10) it_res-kunnr,
 94(2) it_res-bschl,
 104(10) it_res-prctr,
 116(10) it_res-kostl,
 128(12) it_res-aufnr,
 142(5) it_res-pswsl,
 148(13) it_res-wrbtr,
 164(5) it_res-waers,
 170(13) it_res-dmbtr,
 187(16) it_res-xblnr,
 205(50) it_res-sgtxt.
MODIFY it_res.
CLEAR it_res.
ENDLOOP.
plz give soltuion i am looking for it.
i will aslo reward all ur precious effort.
otherwise if anyone have any code on my reqirement then plz send it to me in my id- [email protected]
thanks
Message was edited by: sanjeev singh

Hi
You should a selection in BSIS and BSAS table instead of BKPF and BSEG:
DATA : BEGIN OF it_res OCCURS 0,
bukrs LIKE bkpf-bukrs,
gjahr LIKE bkpf-gjahr,
monat LIKE bkpf-monat,
belnr LIKE bkpf-belnr,
budat LIKE bkpf-budat,
brnch LIKE bkpf-brnch,
gsber LIKE bseg-gsber,
hkont LIKE bseg-hkont,
kunnr LIKE bseg-kunnr,
bschl LIKE bseg-bschl,
prctr LIKE bseg-prctr,
kostl LIKE bseg-kostl,
aufnr LIKE bseg-aufnr,
pswsl LIKE bseg-pswsl,
wrbtr LIKE bseg-wrbtr,
waers LIKE bkpf-waers,
dmbtr LIKE bseg-dmbtr,
xblnr LIKE bkpf-xblnr,
txt50 LIKE skat-txt50,
sgtxt LIKE bseg-sgtxt,
shkzg LIKE bseg-shkzg,
END OF it_res.
Open Item
SELECT *
INTO CORRESPONDING FIELDS OF TABLE it_res
FROM BSIS
WHERE bukrs = p_bukrs
AND HKONT IN S_HKONT
AND belnr IN s_belnr
AND gjahr IN s_gjahr
AND monat IN s_monat
AND blart IN s_blart
AND budat IN s_budat
AND bldat IN s_bldat
AND waers IN s_waers.
Cleared Item
SELECT *
APPENDING CORRESPONDING FIELDS OF TABLE it_res
FROM BSAS
WHERE bukrs = p_bukrs
AND HKONT IN S_HKONT
AND belnr IN s_belnr
AND gjahr IN s_gjahr
AND monat IN s_monat
AND blart IN s_blart
AND budat IN s_budat
AND bldat IN s_bldat
AND waers IN s_waers.
Max
Message was edited by: max bianchi

PRT file doesn't work (printer codes) (urgent)

Hi,
I've got a small problem using a custom prt file for printing reports on a Epson TM-T88 printer.
I'm trying to use the printer codes which are in the programming manual of the Epson printer for cutting the paper.
But it doesn't work.
This is the prt-file:
printer "kassabon"
before report esc "@"
after report dec (27) dec (86) 1 dec (27) dec (105)
Who can solve this problem?
It's very urgent.
Thanks in advance!
null

Nobody?

Should enhancements (code plug-ins) be activated in target after transport?

Hi all,
I have recently implemented some enhancements via the code plug-ins as can be referenced via transaction se19. They all worked well in the development system but in QA I had to re-open each one in display mode in order to re-activate them. Is this a requirement for all such enhancements (i.e. should we always activate them in each target environment after sending their transports into a target environment)?
Thank you.

Hi,
If the enhancement implemenation was transported in a active state, I dont think you need to reactivated them in each new system.
But if it was transported in a inactive state you have to activate in each new system.
Thanks,
Poonam.

Diff in OPU3 and OPU5 T-codes - urgent

Dear All,
Can you please tell me the diff bet OPU3 and OPU5 t codes..........as there is common setting for SCHEDULING CONTROL FOR DETAIL SCHEDULING section.........i.e for Scheduling type and Start in Past..........if this setting in both T-code are made different , then system will consider which one while scheduling..............waiting for your experts opinion on urgent basic..........
Best Regards
Sharad

hi Pradeep,
Thanks for reply..........Actually I want schedule now planned orders........I am using planning strategy 40 for hight level FERTt material and 70 for HALB lower lever assy........with mixed indicator 1..........so that with mixed indicator I am trying to get fixed pegging relationship between finshed product and assy planned order..........But eariler my settings were to start in past say 5 days for order in OPU5........with backward scheduling.......but because of this I am start dates for planned orders were getting in past...............Then I removed setting 5 days to 0 days for "Start in past" so that system will go backward for scheduling and then start forward automatically if start date is going in past.........and it should moved all order with their pegging relationship.................This is the reason I raised question saying difference in both code........as I had not changed setting in OPU3............
But my problem is that system is doing scheduling and when dates are calculated by backwards and determined dates are going backwards i.e. in past then scheduling is going again forward and this is I want......but start date for order assy level all orders are from today's date........But actually I want to shift all assy level orders with pegging relationship............which is not happening.........pl guide if have any idea............thanks in advance........
Best Regards
Sharad

Enhancement code to 0cs_om_opa_1

Hi Guru's,
I am looking for code to enhance the datasource.
Fields need to append.
KDAUF,KDPOS,AUART----AUFK Table
GWLEN-BGMKOBJ Table
Aufnr is key for AUFK table and objnr is key for BGMKOBJ table.
Thanks,
Rakesh

Hi,
The below code should help you to get your field populated.
Tables: AUFK, BGMKOBJ.
DATA: L_S_ICORDCST LIKE ICORDCST.
CASE I_DATASOURCE.
WHEN '0cs_om_opa_1'.
LOOP AT C_T_DATA INTO L_S_ICORDCST.
SELECT SINGLE KDAUF KDPOS AUART FROM AUFK
INTO (L_S_ICORDCST-ZZKDAUF, L_S_ICORDCST-ZZKDPOS, L_S_ICORDCST-ZZAUART)
WHERE AUFNR = L_S_ICORDCST-AUFNR.
SELECT SINGLE GWLEN
FROM BGMKOBJ
INTO L_S_ICORDCST-ZZGWLEN
WHERE OBJNR = L_S_ICORDCST-OBJNR.
MODIFY C_T_DATA FROM L_S_ICORDCST.
ENDLOOP.
Hope this helps
Regards,
Akhan

Query Not displaying data for a particluar Cost centre code(urgent) !!!!!!

Hi Folks,
I have an infoset which is on top of two ODSs.
Data for a particular cost center code present in both the ODSs.
There is no data prsent in RSISET for that CC.
Also the query is not showing any data for that CC.
Data is not showin in RSRT for that CC ,but the SQL stament is getting generated for that CC.
Already Checked the infoset key fileds settings and all....
Y its happening like this any ideas???
Need your help buddies urgent issue.

Please check weather the links are established between the info objects properly in the infoset.

Debugging virtual characterstics code--Urgent

Hi All,
I am not able to debug the code written for virtual characterstics.
Uisng RSRT, I tried to debug.I have put break points also in the code.
But it is not going to the code I have written.
Please help me reagrding this.
This is very urgent.
Thanks in advance!

Where have u written the code for vir char?
Are u using BADI ?

Enhancement code for FM :FAGL_GET_TT_DATA_LEAD Please ?

Hi Guys,
I want to enhance the function module FAGL_GET_TT_DATA_LEAD (that gets the data from FAGLFLEXT) to read the FAGLFLEXA table.Can any one get me an idea on how to enhance it ....
If possible please send me brief code steps aswell ...
Thanks in adnvace

Issue resolved by myself, 0FI_GL_10 data source is new to ECC 6.0 and is a part of New GL Implementation. This ERROR I'm getting, is because of new GL is not implemented in our company yet.
Thanks to all

Discount Condition type is picking Tax Code(URGENT)

Dear All,
I have a very serious problem on Condition types and Tax codes.
I have configured the pricing procedure with two taxes (China).
Sr.No   Condition Type    TAX Code
1               VAT                  V7
2.             CONC                V6
Now, If i will give some Customer discount Condition type then System is picking picking Tax code as V7.For that i have not maintanied any Condition records in VK11.
What should be the reason for this?
Since it is very Urgent Issue,Please Guide me on the same
Thanks
Vinay

Have you run the country installation program before you started the customisation. This is supposed to install the entire information required to configure the tax scenarios for the particular country. If you are trying to create the tax codes and the procedureson the vanilla system, then you need to work very closely with FI because the posting for tax is done from the tax procedure in FI. As an SD or MM consultant we are only interested in the Taxes on sales and purchases and their customisation. The procedure and the Tax codes are created in FI.
This is the first thing that is normally done after you copy client 000 to start your customisation. The coountry installation program does not run if you ahve made changes to the client.
regards
Jude

Please suggest a correction in the code: Urgent

I am capturing the Material Document No., Material No., Material Description, Quantity etc. into a main_table in my code so as to write/print labels containing GRN details (movement type '105') using se38. These labels are to be pasted on the material received in stores, the exact requirement is 100% material identification sticker on all items to maintain FIFO. Obviously the no. of these stickers, to be printed, shall solely depend on the Quantity of a particular material received.
I have written the following piece of code to print the captured information of GRN. The problem is that my code is unable to track the change in material document number. For example if I have 10 nos of quantity for a particular material say 1001 and 5 no.s of quantity for a subsequent material 1002. I should get 10 labels for 1001 and 5 for 1002 but my code is giving me 10 labels for 1002 also.
Hope you got it.
Please suggest the necessary correction on the following code.You can execute the following code and get a real time feeling of my problem.
REPORT ZMM_GRN_LABEL_REPORT_38.
TABLES : MKPF, MSEG, MAKT.
DATA : BEGIN OF I_MKPF OCCURS 0,
       MBLNR LIKE MSEG-MBLNR,
       BLDAT LIKE MKPF-BLDAT,
       MJAHR LIKE MKPF-MJAHR,
       END OF I_MKPF.
DATA : BEGIN OF I_MSEG OCCURS 0,
       MBLNR LIKE MSEG-MBLNR,
       MATNR LIKE MSEG-MATNR,
       EBELN LIKE MSEG-EBELN,
       LIFNR LIKE MSEG-LIFNR,
       MENGE LIKE MSEG-MENGE,
       END OF I_MSEG.
DATA : BEGIN OF I_MAKT OCCURS 0,
       MATNR LIKE MAKT-MATNR,
       MAKTX LIKE MAKT-MAKTX,
       END OF I_MAKT.
DATA : BEGIN OF I_LFA1 OCCURS 0,
       LIFNR LIKE LFA1-LIFNR,
       NAME1 LIKE LFA1-NAME1,
       END OF I_LFA1.
DATA: BEGIN OF MAIN_TABLE OCCURS 0,
      MBLNR LIKE MSEG-MBLNR,
      MATNR LIKE MSEG-MATNR,
      BLDAT LIKE MKPF-BLDAT,
      MAKTX LIKE MAKT-MAKTX,
      MENGE LIKE MSEG-MENGE,
      MJAHR LIKE MSEG-MJAHR,
      EBELN LIKE MSEG-EBELN,
      LIFNR LIKE MSEG-LIFNR,
      NAME1 LIKE LFA1-NAME1,
      END OF MAIN_TABLE.
DATA : N LIKE MSEG-MENGE.
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
SELECT-OPTIONS: S_MBLNR FOR MSEG-MBLNR.
PARAMETERS : P_GJAHR LIKE MSEG-GJAHR.
SELECTION-SCREEN END OF BLOCK B1.
select MBLNR MJAHR BLDAT
into corresponding fields of
table I_MKPF
from Mkpf
where
MBLNR in S_MBLNR and
MJAHR EQ p_GJAHR.
LOOP AT I_MKPF.
MAIN_TABLE-MBLNR = I_MKPF-MBLNR.
MAIN_TABLE-MJAHR = I_MKPF-MJAHR.
MAIN_TABLE-BLDAT = I_MKPF-BLDAT.
APPEND MAIN_TABLE.
CLEAR MAIN_TABLE.
ENDLOOP.
IF I_MKPF[] IS NOT INITIAL.
SELECT MBLNR MATNR EBELN LIFNR MENGE
INTO CORRESPONDING FIELDS OF
TABLE I_MSEG FROM
MSEG
FOR ALL ENTRIES IN I_MKPF
WHERE
MBLNR = I_MKPF-MBLNR.
ENDIF.
LOOP AT I_MSEG.
LOOP AT MAIN_TABLE WHERE MBLNR = I_MSEG-MBLNR.
MAIN_TABLE-MATNR = I_MSEG-MATNR.
MAIN_TABLE-EBELN = I_MSEG-EBELN.
MAIN_TABLE-LIFNR = I_MSEG-LIFNR.
MAIN_TABLE-MENGE = I_MSEG-MENGE.
MODIFY MAIN_TABLE INDEX SY-TABIX.
ENDLOOP.
ENDLOOP.
IF I_MSEG[] IS NOT INITIAL.
SELECT MATNR MAKTX
INTO CORRESPONDING FIELDS OF
TABLE I_MAKT FROM MAKT
WHERE
MATNR = I_MSEG-MATNR.
ENDIF.
LOOP AT I_MAKT.
LOOP AT MAIN_TABLE WHERE MATNR = I_MAKT-MATNR.
MAIN_TABLE-MAKTX = I_MAKT-MAKTX.
MODIFY MAIN_TABLE INDEX SY-TABIX.
ENDLOOP.
ENDLOOP.
IF I_MSEG[] IS NOT INITIAL.
SELECT LIFNR NAME1
INTO CORRESPONDING FIELDS OF
TABLE I_LFA1 FROM LFA1
FOR ALL ENTRIES IN I_MSEG
WHERE
LIFNR = I_MSEG-LIFNR.
ENDIF.
LOOP AT I_LFA1.
LOOP AT MAIN_TABLE WHERE LIFNR = I_LFA1-LIFNR.
MAIN_TABLE-NAME1 = I_LFA1-NAME1.
MODIFY MAIN_TABLE INDEX SY-TABIX.
ENDLOOP.
ENDLOOP.
******************************Problem lies somewhere here
N = MAIN_TABLE-MENGE.
DO N TIMES.
SORT MAIN_TABLE BY MBLNR.
LOOP AT MAIN_TABLE.
WRITE :/5 MAIN_TABLE-MBLNR.
WRITE :/5 MAIN_TABLE-MAKTX, 50 MAIN_TABLE-MATNR.
ENDLOOP.
ENDDO.

Hello,
Take one new table with three fields ie. it_no with mblnr, matnr and menge.
collect data to new table form main_table.
and replace your doubtful code by
SORT MAIN_TABLE BY MBLNR.
loop at it_no.
N = it_no-MENGE.
DO N TIMES.
LOOP AT MAIN_TABLE where matnr = it_no-matnr.
WRITE :/5 MAIN_TABLE-MBLNR.
WRITE :/5 MAIN_TABLE-MAKTX, 50 MAIN_TABLE-MATNR.
ENDLOOP.
ENDDO.
endloop.
regards,
Naimesh

Enhancement Code (URGENT)

Similar Messages

Maybe you are looking for