Customising CREMAS03 for std comm type filed updation

Hi all,
We have requirement of processing inbound vendor master data.We are using CREAMS03 idoc type as our system is 4.6C.
While updating venor master in general data we are not able to update the field Standard communication type.
Can anybody help me to find out which is the field needs to be filled to update the standard comm type in vendor master?
if this field is not present in CREMAS03 then do we need to customise our idoc???
if partner system sends this field in some other balnk field then how to map this field in BDC??? is there any enhancement?
I am using process code CRE1 which is calling IDOC_INPUT_CREDITOR function module.
Please suggest how to customize this idoc type.
Please suggest.
Thanks in Advance,
Raghavendra

Thanks,
but I still get the same error.
Table Name: T_ADDRESS
ADINT_ADDR          : /
ADEXT_ADDR          : T001
CHIND_ADDR          : M
XDFADR              :
GUID                : /
ADDR_DATE_FROM      : 20080617
ADDR_DATE_TO        : 99991231
ADDR_MOVE_DATE      : /
MOVE_ADDR           : /
NAME_CO             : NUE ESOTCET

Similar Messages

How can I use jbo:InputSelect for a char type filed?

How can I use <jbo:InputSelect for a char type filed?
I have two tables. One is room (primary key is room(type is char)), another table is responsibility (foreign ker is room(type is char)). Both tables have same length for room column.
There is a problem:
If I use (in the "DataEditComponent.jsp" file)
<jbo:InputSelect multiple="false" datasource="dsEdit" displaydatasource="roomData" displaydataitem="ROOM" displayvaluedataitem="ROOM" ></jbo:InputSelect>
to get the room input for responsibility from combobox(Datasource roomData is from room table). In the form the room field cannot bind the data in combobox, alway select the first item. And if I select one item and click the update button.There is an error message:
Error Message: JBO-27010: Attribute set with value H409 for Room in Responsibility has invalid precision/scale
I found If I changed the field type from char to varchar2 in database also change the entity objects, it works well. I wonder if there are any diffrence using <jbo:InputSelect tag in char and varchar2 type. How can I use <jbo:InputSelect for a char type filed as i don't want to change my datatype in database at this stage.
I try this in JDeveloper 9.03, 9.034, 9.04. The result is the same.

If I were in your shoes, here's how I would do it:
<%-- Assuming you have dsRoom and dsResponsibility --%>
<%-- Select is an HTML tag --%>
<select name="ROOM" size="1">
<% char roomID =""; // Init your character var
// Open a rowsetIterator to get the records and add them to the LOV
<jbo:RowsetIterate datasource="dsResponsibility" changecurrentrow="true" >
<% roomID = (char)dsResponsibility.getRowSet().getCurrentRow().getAttribute("ROOM"); // Grab the char value
// add the value to the LOV
%>
<option value="<%=roomID%>"><%=roomID%></option>
</jbo:RowsetIterate>
</select>
If you are using this as part of an edit page you may want to utilize the "selected" option of the <option> tag. In one instance I am doing this on an edit page because the use may open an existing record. If I don't account for it, then it will change the DB to contain the first value from the list! You can do a simple check like:
//Set the current record's char
char curRecord = (char)rowEdit.getAttribute("ROOM");
// inside the iterate:
if (curRecord == roomID) {
<option value="<%=roomID%>" selected><%=roomID%></option>
} else {
<option value="<%=roomID%>" ><%=roomID%></option>
Hope that helps!

Updating Standard comm type in vendor master idoc- CREMAS03

Hi all,
We have requirement of processing inbound vendor master data.We are using CREAMS03 idoc type as our system is 4.6C.
While updating venor master in general data we are not able to update the field Standard communication type.
Can anybody help me to find out which is the field needs to be filled to update the standard comm type in vendor master?
if this field is not present in CREMAS03 then do we need to customise our idoc???
if partner system sends this field in some other balnk field then how to map this field in BDC??? is there any enhancement?
I am using process code CRE1 which is calling IDOC_INPUT_CREDITOR function module.
Please suggest.
Thanks in Advance,
Raghavendra

I buy your point.
I will create WHT Type for WHT Code - Individual and WHT Code - Others.
But still there will be an issue since WHT Code will be different Non PAN and With PAN (within Individual). So still this will be an issue.
How to control this now.
=
Meena

After I updated my iPhone with IOS 6.1 my old Apple ID keeps popping up on my iPhone for me to type in the password that I no longer know. On the Apple site the Manage my Apple ID says my old Apple ID could not be found. How do I get this to stop?

I just updated my iPhone with the newest update IOS 6.1. My old Apple ID keeps popping up on my iPhone for me to type in the password that I no longer know. All the passwords I type in do not work. I no longer have access to this email which is my old Apple ID. After installing the newest software update my old Apple ID came up to finish configuring. Since I no longer have access to this Apple ID and email account and after trying some passwords I skipped the step. It then said FaceTime, iCloud (which I do not use), and more may not work. I clicked that it was OK since I could not remember the password to my old Apple ID. I then went to my settings to be sure my newer email was my Apple ID by typing in my current Apple ID and password. Also, I went to Manage my Apple ID online and my old Apple ID could not be found. Is it OK I skipped that step in the IOS 6.1 configuration? How do I get my old Apple ID to stop popping up?

Blue
It sounds like you restored from an old back-up. Did you back-up just before your software update? It will use your last one and if your last back-up was a ywear old then it will use that one.
In general, if you are getting these messages on your iPhones select logout (when you get that Apple Id request) and then log back in with your newer ID.
Sorry for your losses.
Cheers

Customisation for PO Release (different Values for different Doc Types)

Dear Experts,
I need to configure for PO release procedure where in the Characteristics would be Plant (2 Plants), Doc Type (3 types - Standard PO, Imports PO & Capital PO) and Value (2 stage release: 0-100000 & >100000 INR for Std PO, 0-200000 & >200000 INR for Imports PO and 0-300000 & >300000 INR for Capital PO).
Please let me know where I shoud define the different Values for different Docs for the Release procedure to work properly.
Or let me know the entire procedure for achieving the same.
Regards,
MNP

Hi MNP,
You have to create different CLASSes in IMG with the possible combination of different characteristics,
EX. CLASS EKKO11 - Plant A, Doc type- Std PO, Value- 0-100000 & >100000 INR
CLASS EKKO22- Plant A, Doc type- Import PO, Value- 0-200000 & >200000 INR
CLASS EKKO33- Plant A, Doc type- Capital PO, Value- 0-300000 & >300000 INR and same for other plant
then assign these classes to the respective Release group.
regards,
Pravin

Update Retriever missing update for S30 Model Type 4351

Update Retriever missing update for S30 Model Type 4351. Missing update for Nvidia External VGA Driver Version 321.01 for Windows 7 (64-bit), Windows 8 (64-bit) - ThinkStation S30, D30. Retriever only lists udpate for AMD external VGA driver. This model shipped with Nvidia Quadro K2000 graphics card.

Sorry for the delay. Working through some internal issues regarding content support for ThinkStation. Trying to get the content updated and released as soon as possible.
I believe the driver you are looking for has been replaced by the following:
http://support.lenovo.com/en_US/downloads/detail.page?DocID=DS028285
Note: the readme shows a more complete list of supported adapters

STD CONDITION TYPES FOR SERVICES

What are the std Condition types for
Service tax =
EDUCATION CESS ON SERVICE TAX
SECONDARY EDUCATION CESS ON EDUCATION CESS

Hi
You can use J<b>CES JCED for CESS
and JECS JECX for EDU-CESS
For further details Refer sap help doc below
http://help.sap.com/erp2005_ehp_02/helpdata/en/0e/db7eb4e9114d85a9335fb1df617504/frameset.htm

"An error occurred while updating the default player for audio file types"

Getting ready for a deployment of version 9.2 of iTunes for 1400+ users.
Getting this error when a 'normal' user goes into Edit/Preferences of iTunes and makes no changes.
"An error occurred while updating the default player for audio file types. you do not have enough access privileges for this operation."
I've elevated privileges of the C:\program files\itunes directory for this user to Full Control however problem remains.
Tried to modify the folder to remove 'read-only', as found this suggestion on here, but read-only keeps applying itself.
User has full rights to the location of the media as specified under Advanced Tab. If I tick 'Set as default media player' and remove tick and then click OK I do not get the error. From what I've read it's affected older versions of iTunes also.
Doe anyone have any other suggestions?
Thanks in advance.

I had a similar issue. Turned out that - somehow - one of the directories or files in my iTunes music folder had gotten set to read only. Fixing it was easy.
Go to Edit/Preferences.
Choose the Advanced tab
in the General subtab select the contents of the box labeled "iTunes Music folder location"
Click Start, choose Run
Paste the location
Press the button to move up one level
Right-click the music folder, choose Properties
If this is your problem, the read-only box will be a solid color or checked. Set it to empty and choose the default "apply to folder and all subfolders and files." This will set everything in there readable, which after I did so I stopped getting the error.

Best Practices to update Cascading Picklist mapping for Account record type

1. Most of the existing picklist values name in parent and related picklist has been modified in external app master list, so the same needs to be updated in CRMOD.
2. If we need to update picklist value, do we need to DISABLE the existing value and CREATE a new picklist.
3. Is there any Best Practices to avoid doing Manual Cascading picklist mapping for Account record type? because we have around 500 picklist values to be mapped with parent and related picklist.
Thanks!

Mahesh, I would recommend disabling the existing values and create new ones. This means manually remapping the cascading picklists.

Upgraded to 10.3.1.55, now can't set iT as default player,"An error occurred when updating the default player for audio files types. You do not have enough access privileges for this operation." How to fix?

After I upgraded iTunes, iTunes doesn't recognize CD in the drive, apparently isn't the default player. It won't let me set iTunes as the default player, I get the error message "An error occurred when updating the default player for audio files types." I tried Whitesides' remedy (changing Read Only status in folder in Windows) but it didn't solve the problem. Any suggestions? Thanks.
J

Oddly enough. I think I just solved it. It looks like, for some reason, my computer has about 8 different "iTunes music" folders, and I've been saving my music to the wrong one. Neat. Music now imports and plays as it should. Copying things over is going to be so fun tonight!

[svn] 4235: Fix for - Links and type information missing for air.update. event events in @event listings

Revision: 4235
Author: [email protected]
Date: 2008-12-04 13:02:39 -0800 (Thu, 04 Dec 2008)
Log Message:
Fix for - Links and type information missing for air.update.event events in @event listings
Also adding support for multiple @event for a method.
QE Notes: None
Doc Notes: None
Bugs: SDK-18319
tests: checkintests
Ticket Links:
http://bugs.adobe.com/jira/browse/SDK-18319
Modified Paths:
flex/sdk/trunk/modules/compiler/src/java/flex2/compiler/asdoc/AsDocUtil.java
flex/sdk/trunk/modules/compiler/src/java/flex2/compiler/asdoc/ClassTable.java
flex/sdk/trunk/modules/compiler/src/java/flex2/compiler/asdoc/DocComment.java
flex/sdk/trunk/modules/compiler/src/java/flex2/compiler/asdoc/TopLevelClassesGenerator.ja va

Hi All,
I have sorted out the problem and this is fixed now.
Regards,
Ajay Kunde

Adding a new filed to 'allowed fields' for a movement type

Dear All
Can I add a new field to the allowed fields for a movement type at the SPRO node 'field selection for movement type'
Thanks

Post Author: V361
CA Forum: General
Could you be reporting from a View instead of a table ?

Can't be converted to a char type filed

Hi everyone,
I have a report, when I am executing it displays the following error<b> I:ZVMS:999 No Data related to COGS Found</b>
If i check it in syntax error it displays the below in waring symbol.
"TAB_COGS" cannot be converted to a character-type filed.
"TOTALS" cannot be converted to a character-type filed.
just for your reference I am enclosing my code
report zvmapslabr_246_map message-id zvms line-size 220.
tables:
        mkpf, mseg, likp, lips, konv, vbak, vbap, vbpa, t005, t941l, mvke, mara, marc, tvlvt.
types: begin of type_mkpf,        budat type bldat,        mblnr type mblnr,
         vgart type vgart,        blart type blart,        xblnr type xblnr,
         matnr type matnr, bwart type bwart, erfmg type erfmg, lgort type lgort_d,
end of type_mkpf.
types: begin of type_vbeln,
         vbeln type vbeln,
       end of type_vbeln.
types: begin of type_lips,
        vbeln type vbeln,        posnr type posnr,        matnr type matnr,
        vgbel type vgbel,        vgpos type vgpos,
end of type_lips.
types: begin of type_datum,
        matnr type matnr,        datum type dats,
end of type_datum.
data:begin of i_mvke occurs 0,
     matnr like mara-matnr,
     end of i_mvke.
data:begin of i_marc occurs 0,
     matnr like mara-matnr,
end of i_marc.
data: t_mkpf type standard table of type_mkpf,
      h_mkpf type standard table of type_mkpf,
      tmkpf type type_mkpf.
data: t_vbeln type sorted table of type_vbeln with unique key vbeln,
      tvbeln type type_vbeln.
data: t_lips type standard table of type_lips,
      tlips type type_lips,
      hlips type lips.
data: begin of rt_outtab occurs 0,
      vbeln like vbak-vbeln,      auart like vbak-auart,      audat like vbak-audat,
      vkorg like vbak-vkorg,      vtweg like vbak-vtweg,      knumv like vbak-knumv,
      augru like vbak-augru,      bsark like vbak-bsark,      matnr like vbap-matnr,
      kwmeng like vbap-kwmeng,      abrvw like vbak-abrvw,
      posnr like vbap-posnr,      matkl like vbap-matkl,      vkaus like vbap-vkaus,
      route like vbap-route,      land1 like vbpa-land1,
end of rt_outtab.
data: begin of wa_outtab,
      vbeln like vbak-vbeln,      auart like vbak-auart,      audat like vbak-audat,
      vkorg like vbak-vkorg,      vtweg like vbak-vtweg,      knumv like vbak-knumv,
      augru like vbak-augru,      bsark like vbak-bsark,      matnr like vbap-matnr,
      kwmeng like vbap-kwmeng,      abrvw like vbak-abrvw,
      posnr like vbap-posnr,      matkl like vbap-matkl,      vkaus like vbap-vkaus,
      route like vbap-route,      land1 like vbpa-land1,
end of wa_outtab.
data: begin of tab_cogs occurs 0,
          matkl like vbap-matkl,          matnr like vbap-matnr,
          fkimg type p decimals 0,          amount type p decimals 4,
          unit   type p decimals 2,
end   of tab_cogs,
begin of tab_rord occurs 0,
          matkl like vbap-matkl,          matnr like vbap-matnr,
          fkimg type p decimals 0,          amount type p decimals 4,
          unit   type p decimals 2,
end   of tab_rord,
begin of tab_frgt occurs 0,
          route like likp-route,          matnr like vbap-matnr,
          fkimg type p decimals 0,          amount type p decimals 4,
end of tab_frgt,
begin of totals occurs 1000,
          descr(40),
          fkimg type p decimals 0,
          amount type p decimals 4,
          unit type p decimals 2,
      end of totals,
      begin of totalsff occurs 1000,
          descr(40),
          fkimg type p decimals 0,
          amount type p decimals 4,
          unit type p decimals 2,
      end of totalsff,
        gjahr like bapi0002_4-fiscal_year,
        month like bapi0002_4-fiscal_period,
        desc(40),
        kschl like konv-kschl.
data: begin of cs_marc.
        include structure marc.
data: end of cs_marc.
data: in_konv like konv occurs 0 with header line.
DATA: TEMP_ZOGM LIKE KOnV-KBETR,
      TEMP_ZOGt LIKE KOnV-KBETR,
      TEMP1_ZOGM LIKE KOnV-KBETR,
      TEMP1_ZOGt LIKE KOnV-KBETR,
      temp1_vprs like konv-kbetr,
      temp_vprs like konv-kbetr.
ranges: r_matnr for mvke-matnr,
        r_matkl for mara-matkl,
        r_abrvw for vbak-abrvw.
selection-screen begin of block sel01 with frame title text-001.
select-options: so_matnr for vbap-matnr,
                so_vkorg for vbak-vkorg default '0065',
                so_vtweg for vbak-vtweg default '02',
                so_auart for vbak-auart,
                so_werks for marc-werks default '0012'.
select-options: so_budat for mkpf-budat,
                so_mblnr for mkpf-mblnr,
                so_bwart for mseg-bwart default '601'.
selection-screen skip 1.
parameters: date_in like vbrk-fkdat default sy-datum,
            invoice(15) default 'MAPSYYYYMM'.
selection-screen end of block sel01.
selection-screen skip 1.
selection-screen begin of block sel02 with frame title text-002.
parameters: fix_gr1 like konv-kwert default '1.40',
            fix_gr2 like konv-kwert default '1.25'.
selection-screen skip 1.
parameters: reorders like konv-kwert default '2.95'.
selection-screen end of block sel02.
selection-screen skip 1.
selection-screen begin of block sel03 with frame title text-003.
parameters: fore_g radiobutton group mode,
            back_g radiobutton group mode.
parameters: file2 like rlgrap-filename default 'C:\ZMAPSDAT.TXT',
            file4 like rlgrap-filename default 'C:\ZMAPSDAT_TOTALS.TXT'.
parameters: file3 like rlgrap-filename default '/usr/sap/maps_labr.dat',
            file5 like rlgrap-filename default
                                        '/usr/sap/maps_labr_totals.dat'.
selection-screen end of block sel03.
initialization.
call function 'BAPI_COMPANYCODE_GET_PERIOD'
       exporting
            companycodeid = '0046'
            posting_date = sy-datum
       importing
            fiscal_year   = gjahr
            fiscal_period = month.
if month eq 01.
    move 12 to month.
    gjahr = gjahr - 1.
else.
    month = month - 1.
endif.
move: gjahr to invoice+04(04).
move: month to invoice+08(04).
move '750' to r_matkl-low.
move 'I' to r_matkl-sign.
move 'EQ' to r_matkl-option.
append r_matkl.
move '751' to r_matkl-low.
move 'I' to r_matkl-sign.
move 'EQ' to r_matkl-option.
append r_matkl.
move '760' to r_matkl-low.
move 'I' to r_matkl-sign.
move 'EQ' to r_matkl-option.
append r_matkl.
move '761' to r_matkl-low.
move 'I' to r_matkl-sign.
move 'EQ' to r_matkl-option.
append r_matkl.
move '620' to r_matkl-low.
move 'I' to r_matkl-sign.
move 'EQ' to r_matkl-option.
append r_matkl.
move '765' to r_matkl-low.
move '770' to r_matkl-high.
move 'I' to r_matkl-sign.
move 'BT' to r_matkl-option.
append r_matkl.
move '624' to r_matkl-low.
move '628' to r_matkl-high.
move 'I' to r_matkl-sign.
move 'BT' to r_matkl-option.
append r_matkl.
Change D. Fitzgerald - excluded useage range
clear r_abrvw.
refresh r_abrvw.
USCOMP3 ******
move 'MC3' to r_abrvw-low.
move 'I' to r_matkl-sign.
move 'EQ' to r_matkl-option.
append r_abrvw.
USCOMP4 ******
move '220' to r_abrvw-low.
move 'I' to r_matkl-sign.
move 'EQ' to r_matkl-option.
append r_abrvw.
Change D. Fitzgerald - excluded useage range
if fore_g = 'X' and
( file3 is initial or file5 is initial ) .
message e000.
elseif back_g = 'X' and
( file2 is initial or file4 is initial ) .
message e001.
endif.
start-of-selection.
perform get_orders.
perform get_values.
end-of-selection.
perform download.
perform file_out.
*&      Form get_orders
form get_orders.
select matnr into corresponding fields of table i_mvke from mara
               where matnr in so_matnr
               and   lvorm eq space
               and   matkl in r_matkl.
loop at i_mvke.
    clear marc.
    select single * from marc where matnr eq i_mvke-matnr
                              and   werks in so_werks.
    if sy-subrc = 0.
      move-corresponding marc to i_marc.
      append i_marc.
      clear i_marc.
    endif.
endloop.
refresh r_matnr.
free    r_matnr.
loop at i_marc.
    r_matnr-low = i_marc-matnr.
    r_matnr-sign = 'I'.
    r_matnr-option = 'EQ'.
    append r_matnr.
endloop.
select mkpfbudat mkpfmblnr mkpfvgart mkpfblart mkpf~xblnr
         msegmatnr msegbwart msegerfmg mseglgort
                    into table t_mkpf
                    from mkpf inner join mseg
                     on mkpfmblnr eq msegmblnr
                     where mkpf~budat in so_budat
                     and   mkpf~vgart eq 'WL'
                     and   mkpf~blart eq 'WL'
                     and   mkpf~mjahr eq so_budat-low+0(4)
                     and   mkpf~mblnr in so_mblnr
                     and   mseg~bwart in so_bwart
                     and   mseg~matnr in r_matnr
                     and   mseg~pargb in so_vkorg.
sort t_mkpf by bwart matnr budat ascending.
loop at t_mkpf into tmkpf from sy-tabix.
    tvbeln-vbeln = tmkpf-xblnr.
    insert tvbeln into table t_vbeln.
endloop.
if not t_vbeln is initial.
    select likp~vbeln
           lipsposnr lipsmatnr lipsvgbel lipsvgpos
           into table t_lips
           from likp inner join lips
           on likpvbeln eq lipsvbeln
           for all entries in t_vbeln
           where likp~vbeln eq t_vbeln-vbeln
           and   lips~matnr in so_matnr.
endif.
if not t_lips is initial.
    select avbeln aauart aaudat avkorg a~vtweg
           aknumv aaugru absark aabrvw b~matnr
           bkwmeng bposnr bmatkl bvkaus b~route
        into corresponding fields of table rt_outtab
        from vbak as a inner join
             vbap as b on bvbeln = avbeln
             for all entries in t_lips
        where a~vbeln eq t_lips-vgbel
        and   b~matnr eq t_lips-matnr
        and   a~vkorg in so_vkorg
        and   b~vkaus not in ('MC3','220').
       and   b~vkaus not in r_abrvw.
endif.
sort rt_outtab by vbeln matnr.
loop at rt_outtab into wa_outtab.
    clear vbpa.
    select single land1   from vbpa
      into vbpa-land1
      where vbeln eq wa_outtab-vbeln
      and   posnr le '009999'
      and   parvw eq 'WE'.
    if sy-subrc eq 0.
      wa_outtab-land1 = vbpa-land1.
      modify rt_outtab from wa_outtab.
    endif.
endloop.
endform.                    " get_orders
*&      Form get_values
form get_values.
loop at rt_outtab into wa_outtab.
perform calc_freight.
    perform calc_cogs.
endloop.
endform.                    " get_values
*&      Form check_cogs
form check_cogs.
perform value_cond using 'VPRS'.
tab_cogs-matkl = wa_outtab-matkl.
tab_cogs-matnr = wa_outtab-matnr.
tab_cogs-fkimg = wa_outtab-kwmeng.
*change for MAP
if konv-kpein = '1'.
    tab_cogs-amount = wa_outtab-kwmeng * konv-kbetr.
elseif konv-kpein = '1000'.
    clear: TEMP_zogm, TEMP1_zogm,
        TEMP_zogt, TEMP1_zogt,
        TEMP_vprs, TEMP1_vprs.
check ZOGM
     read table in_konv with key KSCHL = 'ZOGM'.
      if sy-subrc eq 0 .
          clear: TEMP_zogm, TEMP1_zogm.
                 TEMP_zogm = in_KOnV-KBETR.
                 TEMP1_zogm = in_KOnV-Kwert.
      endif.
check ZOGT
      read table in_konv with key KSCHL = 'ZOGT'.
       if sy-subrc eq 0.
          clear: TEMP_zogt, TEMP1_zogt.
                 TEMP_zogt = in_KOnV-KBETR.
                 TEMP1_zogt = in_KOnV-Kwert.
         endif.
check VPRS
    Temp_vprs = TEMP_zogm + TEMP_zogT.
    Temp1_vprs = TEMP1_zogm + TEMP1_zogT.
   if konv-kwert <> Temp1_vprs.
     tab_cogs-amount = Temp1_vprs.
   else.
     tab_cogs-amount = konv-kwert.
   endif.
endif.
totals-amount   = tab_cogs-amount.
collect tab_cogs.
clear tab_cogs.
endform.                    " check_cogs
*&      Form check_reorders
form check_reorders.
tab_rord-matkl = wa_outtab-matkl.
tab_rord-matnr = wa_outtab-matnr.
tab_rord-fkimg = wa_outtab-kwmeng.
tab_rord-amount = reorders * wa_outtab-kwmeng.
totals-fkimg    = wa_outtab-kwmeng.
totals-descr    = 'Reorders'.
totals-amount   = tab_rord-amount.
collect tab_rord.
clear   tab_rord.
perform value_cond using 'VPRS'.
tab_rord-matkl = wa_outtab-matkl.
tab_rord-matnr = wa_outtab-matnr.
tab_rord-fkimg = wa_outtab-kwmeng.
*change for MAP
if konv-kpein = '1'.
    tab_rord-amount = wa_outtab-kwmeng * konv-kbetr.
elseif konv-kpein = '1000'.
    clear: TEMP_zogm, TEMP1_zogm,
        TEMP_zogt, TEMP1_zogt,
        TEMP_vprs, TEMP1_vprs.
check ZOGM
     read table in_konv with key KSCHL = 'ZOGM'.
      if sy-subrc eq 0 .
          clear: TEMP_zogm, TEMP1_zogm.
                 TEMP_zogm = in_KOnV-KBETR.
                 TEMP1_zogm = in_KOnV-Kwert.
      endif.
check ZOGT
      read table in_konv with key KSCHL = 'ZOGT'.
       if sy-subrc eq 0.
          clear: TEMP_zogt, TEMP1_zogt.
                 TEMP_zogt = in_KOnV-KBETR.
                 TEMP1_zogt = in_KOnV-Kwert.
         endif.
check VPRS
    Temp_vprs = TEMP_zogm + TEMP_zogT.
    Temp1_vprs = TEMP1_zogm + TEMP1_zogT.
   if konv-kwert <> Temp1_vprs.
     tab_rord-amount = Temp1_vprs.
   else.
     tab_rord-amount = konv-kwert.
   endif.
endif.
totals-amount   = tab_rord-amount.
totals-fkimg    = wa_outtab-kwmeng.
collect tab_rord.
clear   tab_rord.
endform.                    " check_reorders
*&      Form value_cond
form value_cond using p_kschl.
CHECK THE CONDITIONS for ZOGM and ZOGT
clear in_konv.
refresh in_konv.
select * from konv into table in_konv
                   where knumv = wa_outtab-knumv
                     and kposn = wa_outtab-posnr.
clear konv.
select single * from konv where   knumv = wa_outtab-knumv
                              and   kposn = wa_outtab-posnr
                              and   kappl = 'V'
                              and   kschl = p_kschl.
check sy-subrc eq 0.
endform.                    " value_cond
*&      Form calc_freight
form calc_freight.
perform value_cond using 'ZMFR'.
tab_frgt-route = wa_outtab-route.
tab_frgt-matnr = wa_outtab-matnr.
tab_frgt-fkimg = wa_outtab-kwmeng.
tab_frgt-amount = wa_outtab-kwmeng * konv-kbetr.
totals-fkimg    = wa_outtab-kwmeng.
totals-descr    = 'Freight'.
totals-amount   = tab_frgt-amount.
collect tab_frgt.
clear    tab_frgt.
endform.                    " calc_freight
*&      Form calc_cogs
form calc_cogs.
if wa_outtab-matkl eq '750' or wa_outtab-matkl eq '751'.
if wa_outtab-bsark ne 'S'.
    if wa_outtab-bsark = 'S' or wa_outtab-bsark = 'R'.
      totals-fkimg    = wa_outtab-kwmeng.
    totals-descr    = 'Welcome Kits - Fulfillment'.
      totals-descr    = 'Replacements'.
      totals-descr    = 'Reorders'.
      perform check_reorders.
     else.
      totals-fkimg    = wa_outtab-kwmeng.
      totals-descr    = 'Welcome Kits - COGS'.
      perform check_cogs.
     endif.
endif.
if wa_outtab-matkl eq '760' or wa_outtab-matkl eq '761'.
if wa_outtab-bsark ne 'S'.
    if wa_outtab-bsark = 'S' or wa_outtab-bsark = 'R'.
      totals-fkimg    = wa_outtab-kwmeng.
    totals-descr    = 'Update Kits - Fulfillment'.
    totals-descr    = 'Reorders'.
      totals-descr    = 'Replacements'.
      perform check_reorders.
     else.
      totals-fkimg    = wa_outtab-kwmeng.
      totals-descr    = 'Update Kits - COGS'.
      perform check_cogs.     endif.
endif.
If ( wa_outtab-matkl >= '765' and wa_outtab-matkl <= '770' ) or
   ( wa_outtab-matkl >= '620' and wa_outtab-matkl <= '630' ).
if ( wa_outtab-matkl >= '765' and wa_outtab-matkl <= '770' ) or
    ( wa_outtab-matkl >= '624' and wa_outtab-matkl <= '628' ) or
      wa_outtab-matkl = '620'.
new DF
    if wa_outtab-bsark = 'S' or wa_outtab-bsark = 'R'.
      totals-fkimg    = wa_outtab-kwmeng.
     totals-descr    = 'Reorders - Fulfillment'.
     totals-descr    = 'Reorders'.
       totals-descr    = 'Replacements'.
      perform check_reorders.
    else.
      totals-fkimg    = wa_outtab-kwmeng.
      totals-descr    = 'Misc SKU'.
      perform check_cogs.
    endif.
   if wa_outtab-bsark = 'S'.
     perform check_reorders.
   endif.
*************new DF
endif.
collect totals.
clear   totals.
endform.                    " calc_cogs
*&      Form download
form download.
*Step 1
if not tab_cogs[] is initial.
    sort tab_cogs by matkl.
    write: / 'Material Group',
           / 'Material',
           45 'Quantity',
           70 'Amount',
          105 'Unit Price'.
    loop at tab_cogs.
      on change of tab_cogs-matkl.
        write:/    tab_cogs-matkl.
      endon.
      clear tab_cogs-unit.
      tab_cogs-unit = tab_cogs-amount / tab_cogs-fkimg.
      write:/    tab_cogs-matnr,
             40 tab_cogs-fkimg,
             65 tab_cogs-amount,
            100 tab_cogs-unit.
    endloop.
else.
    message i999 with 'No Data related to COGS Found'.
    stop.
endif.
*Step 2
if not tab_frgt[] is initial.
   sort tab_frgt by route.
   write: / 'Dispatch Type',
          / 'Material',
          45 'Quantity',
          70 'Amount'.
         105 'Unit Price'.
   loop at tab_frgt.
     on change of tab_frgt-route.
       write:/    tab_frgt-route.
     endon.
     write:/    tab_frgt-matnr,
            40 tab_frgt-fkimg,
            65 tab_frgt-amount.
   endloop.
else.
   message i999 with 'No Data related to Freight Found'.
   stop.
endif.
*Step 3
if not tab_rord[] is initial.
    sort tab_rord by matkl.
    write: / 'Material Group',
           / 'Material',
           45 'Quantity',
           70 'Amount',
          105 'Unit Price'.
    loop at tab_rord.
      on change of tab_rord-matkl.
        write:/    tab_rord-matkl.
      endon.
      clear tab_rord-unit.
      tab_rord-unit = tab_rord-amount / tab_rord-fkimg.
      write:/    tab_rord-matnr,
             40 tab_rord-fkimg,
             65 tab_rord-amount,
            100 tab_rord-unit.
    endloop.
else.
    message i999 with 'No Data related to Reorders Found'.
    stop.
endif.
*Step 4
if not totals[] is initial.
    sort totals by descr.
    perform fulfillment.
    write: / 'Cogs',
           45 'Quantity',
           70 'Amount',
          105 'Unit Price'.
    loop at totals.
      clear totals-unit.
      totals-unit = totals-amount / totals-fkimg.
      write: / totals-descr,
             40 totals-fkimg,
             65 totals-amount,
            100 totals-unit.
    endloop.
    write: / 'Fulfillment',
           45 'Quantity',
           70 'Amount',
          105 'Unit Price'.
    loop at totalsff.
      clear totalsff-unit.
      totalsff-unit = totalsff-amount / totalsff-fkimg.
      write: / totalsff-descr,
             40 totalsff-fkimg,
             65 totalsff-amount,
            100 totalsff-unit.
    endloop.
else.
    message i999 with 'No Data related to Final Found'.
    stop.
endif.
endform.                    " download
*&      Form fulfillment
form fulfillment.
loop at totals.
   if totals-descr = 'Welcome Kits - Fulfillment'.
     if totals-descr = 'Welcome Kits - COGS'.
      totalsff-descr = 'Welcome Kits - Fulfillment'.
      totalsff-fkimg = totals-fkimg.
      totalsff-amount = totals-fkimg * fix_gr1.
    delete totals.
      append totalsff.
      clear totalsff.
    endif.
   if totals-descr = 'Update Kits - Fulfillment'.
     if totals-descr = 'Update Kits - COGS'.
      totalsff-descr = 'Update Kits - Fulfillment'.
      totalsff-fkimg = totals-fkimg.
      totalsff-amount = totals-fkimg * fix_gr2.
    delete totals.
      append totalsff.
      clear totalsff.
    endif.
if totals-descr   = 'Reorders - Fulfillment'.
    if totals-descr   = 'Reorders'.
      totalsff-descr = 'Reorders - Fulfillment'.
      totalsff-fkimg = totals-fkimg.
      totalsff-amount = totals-fkimg * reorders.
      delete totals.
      append totalsff.
      clear totalsff.
    endif.
endloop.
endform.                    " fulfillment
*&      Form file_out
      text
--> p1        text
<-- p2        text
FORM file_out.
if not tab_cogs[] is initial.
append lines of tab_rord to tab_cogs.
endif.
if fore_g = 'X'.   "program run in foreground.
check not file2 is initial.
CALL FUNCTION 'WS_DOWNLOAD'
   EXPORTING
   BIN_FILESIZE                  = ' '
   CODEPAGE                      = ' '
     FILENAME                      = file2
     FILETYPE                      = 'DAT'
   MODE                          = ' '
   WK1_N_FORMAT                  = ' '
   WK1_N_SIZE                    = ' '
   WK1_T_FORMAT                  = ' '
   WK1_T_SIZE                    = ' '
   COL_SELECT                    = ' '
   COL_SELECTMASK                = ' '
   NO_AUTH_CHECK                 = ' '
IMPORTING
   FILELENGTH                    =
   TABLES
     DATA_TAB                      = tab_cogs
   FIELDNAMES                    =
   EXCEPTIONS
     FILE_OPEN_ERROR               = 1
     FILE_WRITE_ERROR              = 2
     INVALID_FILESIZE              = 3
     INVALID_TYPE                  = 4
     NO_BATCH                      = 5
     UNKNOWN_ERROR                 = 6
     INVALID_TABLE_WIDTH           = 7
     GUI_REFUSE_FILETRANSFER       = 8
     CUSTOMER_ERROR                = 9
     OTHERS                        = 10
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
          WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
CALL FUNCTION 'WS_DOWNLOAD'
   EXPORTING
   BIN_FILESIZE                  = ' '
   CODEPAGE                      = ' '
     FILENAME                      = file4
     FILETYPE                      = 'DAT'
   MODE                          = ' '
   WK1_N_FORMAT                  = ' '
   WK1_N_SIZE                    = ' '
   WK1_T_FORMAT                  = ' '
   WK1_T_SIZE                    = ' '
   COL_SELECT                    = ' '
   COL_SELECTMASK                = ' '
   NO_AUTH_CHECK                 = ' '
IMPORTING
   FILELENGTH                    =
   TABLES
     DATA_TAB                      = totals
   FIELDNAMES                    =
   EXCEPTIONS
     FILE_OPEN_ERROR               = 1
     FILE_WRITE_ERROR              = 2
     INVALID_FILESIZE              = 3
     INVALID_TYPE                  = 4
     NO_BATCH                      = 5
     UNKNOWN_ERROR                 = 6
     INVALID_TABLE_WIDTH           = 7
     GUI_REFUSE_FILETRANSFER       = 8
     CUSTOMER_ERROR                = 9
     OTHERS                        = 10
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
          WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
else.              "program run in background.
check not file3 is initial.
open dataset file3 for output.
IF sy-subrc = 0.
   loop at tab_cogs.
     write:/ tab_cogs.
    IF sy-subrc <> 0.
      EXIT.
    ELSE.
    ENDIF.
   ENDLOOP.
endif.
CLOSE DATASET file3.
open dataset file5 for output.
IF sy-subrc = 0.
   loop at totals.
     write:/ totals.
    IF sy-subrc <> 0.
      EXIT.
    ELSE.
    ENDIF.
   ENDLOOP.
endif.
CLOSE DATASET file5.
endif.
ENDFORM.                    " file_out
<b>CAN ANYONE TELL ME WHERE IS THE MISTAKE.....</b>
Raju.
Message was edited by:
        pratap mandapati

Hi pratap,
this message is issued by your(?) program (see line 550) to inform you that no data has been found.
The syntax warnings are not the reason.
Further analysis is not possible without your actual database contents.
Regards,
Clemens

Automatic creation of Purchase order not possible for 103 mvt type

Hi,
If i could configure "create p.o automatically", while doing G.R for mvt type 101,
why cannot i do the same with 103 mvt type.
I checked the checkbox "create p.o automatically" for movement type 103 and tried to do G.R for others using Mvt type 103.
It is throwing error as "Update control of movement type is incorrect (entry 103 x x).
Which entry controls the above my requirement?
Please advise .
Thank you.

Hi,
These are std which is provided my SAP, you can configure for automatic PO creation for 101 movt type only..........

Function module to change the value for pricing condition type

Hello experts,
I want to change the value for pricing condition type for an item in the transaction CRMD_ORDER.
I used many function modules but none are working.
Please kindly suggest a function module that will change the value for a condition type .
I have used the following function module but its not working, please correct the coding if anything needs to be changed or added. Please help me .
Thank you.
CLEAR PRCD_COND.
     SELECT SINGLE * FROM PRCD_COND WHERE KPOSN = WA_ORDERADM_I-GUID AND
                                          KSCHL = COND_TY.
IF SY-SUBRC = 0.
*    MOVE-CORRESPONDING PRCD_COND TO L_COND_CHG.
*    CLEAR L_COND_CHG-KBETR.
    L_COND_CHG-STUNR = PRCD_COND-STUNR.
    L_COND_CHG-KBETR = COND_PRC.
*    L_COND_CHG-KSCHL = COND_TY.
    INSERT L_COND_CHG INTO TABLE T_COND_CHG.
L_HEAD_GUID = CRMD_ORDERADM_H-GUID.
L_ITEM_GUID = WA_ORDERADM_I-GUID.
INSERT L_HEAD_GUID INTO TABLE HEAD_GUID.
INSERT L_ITEM_GUID INTO TABLE ITEM_GUID.
    CALL FUNCTION 'CRM_ORDER_READ'
     EXPORTING
       IT_HEADER_GUID                    = HEAD_GUID
       IT_ITEM_GUID                      = ITEM_GUID
     IMPORTING
       ET_ORDERADM_H                     = LT_ORDERADM_H
       ET_ORDERADM_I                     = LT_ORDERADM_I
       ET_PRIDOC                         = IT_PRIDOC_RD
       ET_DOC_FLOW                       = T_DOC_FLOW
*     CHANGING
*       CV_LOG_HANDLE                     =
*     EXCEPTIONS
*       DOCUMENT_NOT_FOUND                = 1
*       ERROR_OCCURRED                    = 2
*       DOCUMENT_LOCKED                   = 3
*       NO_CHANGE_AUTHORITY               = 4
*       NO_DISPLAY_AUTHORITY              = 5
*       NO_CHANGE_ALLOWED                 = 6
*       OTHERS                            = 7
    IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    ENDIF.
MOVE-CORRESPONDING LS_PRIDOC_RD TO L_PRI_COND.
INSERT L_PRI_COND INTO TABLE PRI_COND.
LOOP AT IT_PRIDOC_RD INTO LS_PRIDOC_RD.
MOVE-CORRESPONDING LS_PRIDOC_RD TO L_PRIDOC_CHG.
L_PRIDOC_CHG-PRIC_COND = PRI_COND.
L_PRIDOC_CHG-REF_GUID = LS_PRIDOC_RD-GUID.
L_PRIDOC_CHG-COND_CHANGE = T_COND_CHG.
INSERT L_PRIDOC_CHG INTO TABLE PRIDOC_CHG.
ENDLOOP.
LOOP AT LT_ORDERADM_H INTO LS_ORDERADM_H .
MOVE-CORRESPONDING LS_ORDERADM_H TO L_HEADER.
INSERT L_HEADER INTO TABLE HEADER.
ENDLOOP.
LOOP AT LT_ORDERADM_I INTO LS_ORDERADM_I.
MOVE-CORRESPONDING LS_ORDERADM_I TO L_ITEM.
INSERT L_ITEM INTO TABLE ITEM.
ENDLOOP.
L_FIELD-FIELDNAME = 'STUNR'.
INSERT L_FIELD INTO TABLE FIELD.
L_FIELD-FIELDNAME = 'KBETR'.
L_FIELD-CHANGEABLE = 'X'.
INSERT L_FIELD INTO TABLE FIELD.
L_INPUT-FIELD_NAMES = FIELD.
L_INPUT-REF_KIND = 'E'.
L_INPUT-REF_GUID = LS_PRIDOC_RD-GUID.
L_INPUT-OBJECTNAME = 'PRIDOC'.
INSERT L_INPUT INTO TABLE INPUT.
    CALL FUNCTION 'CRM_ORDER_MAINTAIN'
     EXPORTING
       IT_PRIDOC                     = PRIDOC_CHG
     IMPORTING
       ET_EXCEPTION                  = EXCEPT
     CHANGING
       CT_INPUT_FIELDS               = INPUT.
    IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    ENDIF.
REFRESH EXCEPT.
CALL FUNCTION 'CRM_ORDER_SAVE'
EXPORTING
    IT_OBJECTS_TO_SAVE         = HEAD_GUID
*   IV_UPDATE_TASK_LOCAL       = FALSE
*   IV_SAVE_FRAME_LOG          = FALSE
*   IV_NO_BDOC_SEND            = FALSE
*   IT_ACTIVE_SWITCH           =
IMPORTING
   ET_SAVED_OBJECTS           = SAVED
   ET_EXCEPTION               = EXCEPT
   ET_OBJECTS_NOT_SAVED       = UNSAVED
* CHANGING
*   CV_LOG_HANDLE              =
* EXCEPTIONS
*   DOCUMENT_NOT_SAVED         = 1
*   OTHERS                     = 2
IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
COMMIT WORK AND WAIT.

Hi,,
To be able to call a function module in an update work process, you must flag it in the Function Builder. When you create the function module, set the Process Type attribute to Update with immediate start
Alternatively u can use this function module.
CRM_STATUS_DATA_SAVE_DB
BAPI_CUSTOMERCRM_CHANGE (If u wish to use a bapi for this).
Also , Let me know what error you got when implementing other function module.Does the function module didnt return any error but still the value is not changed for pricing condition type?

Customising CREMAS03 for std comm type filed updation

Similar Messages

Maybe you are looking for