Update Field VBAP-ABGRU

Dear all.
   I need to put some value in the field ABGRU. When the configuration of the Item is not completed. I'm try to used the program MV45AFZZ and the exit FORM USEREXIT_SAVE_DOCUMENT and USEREXIT_MOVE_FIELD_TO_VBAP.
But i cant update the field. A Example off my code:
Case VBAK-AUART.
       WHEN 'ZXXX'.
IF vbap-PSTYV eq 'ZYYY' and vbap-kondm eq '02' and
vbap-stman eq '1'.
         move 'Z1' to vbap-abgru.
         modify vbap.
       ELSEIF vbap-PSTYV eq 'ZYYY' and vbap-kondm NE '02' and vbap-stman NE '1' and vbap-abgru EQ 'Z1'.
         move '' to vbap-abgru.
         modify vbap.
       ENDIF.
ENDCASE.

Hi Pedro
Stop! Your code is wrong: YOU CAN'T DIRECTLY UPDATE VBAP TABLE:
Case VBAK-AUART.
WHEN 'ZXXX'.
IF vbap-PSTYV eq 'ZYYY' and vbap-kondm eq '02' and
vbap-stman eq '1'.
move 'Z1' to vbap-abgru.
modify vbap. <----
ERROR
ELSEIF vbap-PSTYV eq 'ZYYY' and vbap-kondm NE '02' and vbap-stman NE '1' and vbap-abgru EQ 'Z1'.
move '' to vbap-abgru.
modify vbap. <----
ERROR
ENDIF.
ENDCASE.
If you use the routine USEREXIT_MOVE_FIELD_TO_VBAP you need only to transfer the data to VBAP without to update it:
Case VBAK-AUART.
WHEN 'ZXXX'.
IF vbap-PSTYV eq 'ZYYY' and vbap-kondm eq '02' and
vbap-stman eq '1'.
move 'Z1' to vbap-abgru.
ELSEIF vbap-PSTYV eq 'ZYYY' and vbap-kondm NE '02' and vbap-stman NE '1' and vbap-abgru EQ 'Z1'.
move '' to vbap-abgru.
ENDDIF.
WHEN OTHERS.
ENDCASE.
Don't use USEREXIT_SAVE_DOCUMENT, but if you need the exit USEREXIT_SAVE_DOCUMENT_PREPARE. Here you have to change the data in internal table XVBAP:
Case VBAK-AUART.
WHEN 'ZXXX'.
LOOP AT XVBAP.
IF Xvbap-PSTYV eq 'ZYYY' and Xvbap-kondm eq '02' and
Xvbap-stman eq '1'.
move 'Z1' to Xvbap-abgru.
ELSEIF Xvbap-PSTYV eq 'ZYYY' and Xvbap-kondm NE '02' and xvbap-stman NE '1' and xvbap-abgru EQ 'Z1'.
move '' to vbap-abgru.
ENDDIF.
MODIFY XVBAP.
Max
ENDLOOP.
WHEN OTHERS.
ENDCASE.

Similar Messages

Problem using Bapi_Salesorder_Change (VBAP-ABGRU)

Hello Guys,
I currently encounter a big issue using BAPI "Bapi_Salesorder_Change " in order to replace the value stored in field VBAP-ABGRU (from 01 to blank). The system does not make any change even if call function 'BAPI_TRANSACTION_COMMIT' is called.
Kind regards
Chris

Hi,
Please set: header_inx-updateflag = 'U' and
                  header_inx-ord_reason = 'X'.
Try with this code.
PARAMETERS:
      p_or_res TYPE augru.
DATA : st_order_header_in TYPE bapisdh1.
DATA : st_order_header_inx TYPE bapisdh1x.
CLEAR st_order_header_in.
st_order_header_in-ord_reason = p_or_res.
CLEAR st_order_header_inx.
st_order_header_inx-updateflag = 'U'.
st_order_header_inx-ord_reason = 'X'.
CALL FUNCTION 'BAPI_SALESORDER_CHANGE'
    EXPORTING
      salesdocument               = vbeln
      order_header_in             = st_order_header_in
      order_header_inx            = st_order_header_inx.
Regards,
Neenu Jose.

Can we update the field VBAP-BEDAE in USEREXIT_SAVE_DOCUMENT_PREPARE

Hi Experts,
I have a requirement to change the requirment type(VBAP-BEDAE) of the Sales order item to be changed to custom requirment type, when ever the item quantity is changed.
I have used the function module 'RV_SCHEDULING_TYPE_DETERMINE' to determine the scheduling type and then passed the same to xvbap-bedae to update the same for the sales order item in the user exit USEREXIT_SAVE_DOCUMENT_PREPARE.
But as soon as the control is out of the user exit, the value is defaulted to the previous value.
Can any body suggest me as to how to update the VBAP-BEDAE field for a sales order.
Thanks in Advance.
Jaya

Hi,
Did you modify the internal table XVBAP after populating the BEDAE? If you modify this internal table in USEREXIT_SAVE_DOCUMENT_PREPARE then the value should change.
lw_xvbap-bedae = <your value>.
MODIFY xvbap FROM lw_xvbap TRANSPORTING BEDAE.
Regards,
Immanuel.

Field VBAP-MAGRV update??

Hi gurus,
we have an user exit in master material (MGA00001) that modifies sales order with bapi BAPI_SALESORDER_CHANGE, but field VBAP-MAGRV is not in parameters of this bapi. How Can we change this field in correct form?? Or only exist through UPDATE directly in table VBAP?
Thank you!!!
I will revvard all answers!!

Hi Daniel
U need to create an enanchement:
U need to use the paramenter table EXTENSIONIN (like BAPIPAREX) in order to transfer other informations (not managed by std structure of BAPI).
All item information will transfered from EXTENSIONIN to structure BAPE_VBAP, so u make sure your field is in this structure, if there isn't, u need to add it there by append structure.
U need to manage the structure BAPE_VBAPX just like BAPE_VBAP: here u need to insert the flag field.
At the end the information will be transfered from BAPE_VBAP to structure VBAPKOM, so yuo make sure your field is in this structure too, else insert it.
U need to manage the structure VBAPKOMX too.
How to fill EXTENSIONIN structure:
TABLES: BAPE_VBAP, BAPE_VBAPX.
BAPE_VBAP-VBELN = BAPE_VBAPX-VBELN = <VBELN>.
BAPE_VBAP-POSNR = BAPE_VBAPX-POSNR = <POSNR>.
BAPE_VBAP-MAGRV = <.....>.
BAPE_VBAPX-MAGRV = 'X'.
EXTENSIONIN-STRUCTURE = 'BAPE_VBAP'.
EXTENSIONIN+30 = BAPE_VBAP.
APPEND EXTENSIONIN.
EXTENSIONIN-STRUCTURE = 'BAPE_VBAPX'.
EXTENSIONIN+30 = BAPE_VBAPX.
APPEND EXTENSIONIN.
Max

How to update vbak,vbap in MV45AFZZ

DATA: lw_WZEIT TYPE marc-WZEIT,
            lw_date type sy-datum.
LOOP at XVBAP where PSTYV = 'ZRET'.
SELECT single WZEIT
         into lw_WZEIT
         from marc
        where matnr = xvbap-matnr.
IF sy-subrc = 0.
    lw_date = lw_WZEIT + sy-datum.
   if vbak-VDATU < lw_date.
     move 'Z1' to xvbak-LIFSK.
      move 'A' to xvbap-ABGRU .
   endif.
ENDIF.
ENDLOOP.
    how to update vbak vbap table in MV45AFZZ ( while saving va01).
Thanks
Suresh

Hi Suresh,
It is not recommended to code custom update to table VBAK and VBAP directly in MV45AFZZ ( i don't think that would work either since the lock is taking place ).
Use the appropriate procedure instead ( that is USEREXIT_SAVE_DOCUMENT and USEREXIT_SAVE_DOCUMENT_PREPARE depend on requirement ) , and
perform modifications you need to internal table vbak and xvbap. Standard SAP program will then update the database tables for you.
XVBAK is available through all part of MV45AFZZ since this is defined globally to include non vbak header information.
Rettung von VBAK Feldern nach AG-Änderung.
DATA:    BEGIN OF XVBAK.
        INCLUDE STRUCTURE VBAK.
DATA: AGUPDA LIKE RV02P-AGUPD,
          WEUPDA LIKE RV02P-WEUPD,
          AUARTUPDA,
          END OF XVBAK.
Rgds,
Tuwuh Sih Winedya

Incompletion log Field VBAP POSEX is not defind in incompltion procedure ZA

Hi Friends,
Need some help on this issue.
We have some orders created in production, and when ever we go to VA02-> enter-> it pops up with the below error message." Field VBAP POSEX is not defined in incompletion procedure ZA ".
I already checked the incompletion procuredue and the field VBAP-POSEX (Purchase order item) was not at all defiend.
It gives the incompletion log for only certain line items in the sales order and not for all. There are already few items delivered and we cannot reject the order to create a new one.
I reveiwed this note "1497255 - Incompletion for PO item number (vbap-posex)" but it states it is for specifically for intercompnay orders.
Our case is standard trade order. It woud be really great anyone has come across the same situation so that i can seek for help..
Thank you so much!!
Best Regards,
Ram

Hi Lakshmipathi,
Firstly, thanks for the response.
Yes.. I did checked... the field VBAP-POSEX was not maintained at item level though.
The same item in other order does not have this problem and it is still open.
This is specific to only very few orders, namely 4 or 5 orders but not with others.
Moreover, these materils are widely used among other company codes or sales org but no issues what so ever.
This one appears to be a peculiar case. Thanks for your time and suggestions for looking it over.
Thank you..
Best Regards,
Ram

PHP Show if hides update fields, but they get overwritten with an empty string

I have an issue with a page where some update fields are displayed depending on who is logged, for example:
<?php if ($row_Users['UserID']=="101"){ ?>
<input <?php if (!(strcmp($row_lodges['101_finalist'],"Yes"))) {echo "checked=\"checked\"";} ?> type="checkbox" name="101_finalist" value="Yes"/>
<input type="text" class="rankfield" name="101_rank" value="<?php echo($row_lodges['101_rank']); ?>" />
<?php } ?>
<?php if ($row_Users['UserID']=="102"){ ?>
<input <?php if (!(strcmp($row_lodges['102_finalist'],"Yes"))) {echo "checked=\"checked\"";} ?> type="checkbox" name="102_finalist" value="Yes"/>
<input type="text" class="rankfield" name="102_rank" value="<?php echo($row_lodges['102_rank']); ?>" />
<?php } ?>
The issue I have is that if User101 is logged in and updates fields 101_finalist and 101_rank, it overwrites 102_finalist and 102_rank with an empty string.
Is it possible to prevent each user from seeing the other fields for other users, and prevent the existing values for those other users not be overwritten?
Hope that makes sense!
Thank you.

That would mean multiple nominations when really there only needs to be one nomination per category in any given country.
It would be:
1, 345, 101, Borana Lodge, 7, 2, Yes, 1
1, 345, 102, Borana Lodge, 7, 2, Yes, 3
1, 345, 103, Borana Lodge, 7, 2, No, NULL
Instead of:
1, 345, Borana Lodge, 7, 2, Yes, 1, Yes, 3, No, NULL
Sorry, Lodge isn't in the nominations table, the list above is what is displayed on the site. Lodge gets looked up in the Ldoges table.
At the moment it works like this:
People can visit a website and vote for lodges in different categories, giving them a score out of 10 for each.
If a lodge gets a vote in a particular category an admin person creates a nomination for that lodge, in that category.
And the last bit is where judges login and tag the ones they think should be finalists.

How to update fields in multiple tables ?

Dear all,
What is the fastest way to update fields in multiple tables... from a single change table...as below is my code to update the fields but it is taking long time to update as i need to keep log file if any one update fails....
CREATE OR REPLACE
package body DO_DC_NAME_UPDATE_OTHER_TAB
as
type rowidArray is table of rowid index by binary_integer;
type custRec is record
n_cust_ref_no dbms_sql.number_table,
v_name dbms_sql.varchar2_table,
v_name_chg dbms_sql.varchar2_table,
rowid rowidArray,
changed dbms_sql.varchar2_table
procedure VALIDATE_CUST_NAME( p_n_cust_ref_no in number,p_v_name_chg in out NOCOPY varchar2, p_changed in out NOCOPY varchar2 )
is
begin
FOR cr_cust IN (SELECT --a.n_cust_ref_no,a.v_name,UPD_V_NAME, a.n_weight,a.V_LASTUPD_INFTIM
from GNMT_CUSTOMER_MASTER_CHG where n_cust_ref_no=p_n_cust_ref_no)
     loop
-- v_name
if nvl(trim(cr_cust.v_name),0) != nvl(p_v_name_chg,0)
then
          p_v_name_chg := p_v_name_chg;
          --p_v_name := p_v_name;
          p_changed := 'Y';
end if;
     end loop;
end;
procedure DO_NAME_UPDATE_OTHER_TAB
is
l_record custRec;
l_array_size number default 20000;
l_done boolean;
l_cnt number default 1;
cursor c is select a.n_cust_ref_no, a.v_name,a.v_name_chg, a.rowid, 'N'
                    from GNMT_CUSTOMER_MASTER_CHG a--,GNMT_CUSTOMER_MASTER b
                    where a.v_name <> trim(a.v_name_chg); --and a.n_cust_ref_no in (1434775,1561181,1601870);
begin
open c;
loop
dbms_application_info.set_client_info
( 'processing ' || l_cnt || ' thru ' || (l_cnt+l_array_size-1) );
fetch c bulk collect into l_record.n_cust_ref_no, l_record.v_name,l_record.v_name_chg,l_record.rowid, l_record.changed
LIMIT l_array_size;
l_done := c%notfound;
--dbms_output.put_line ('message10');
for i in 1 .. l_record.n_cust_ref_no.count
loop
VALIDATE_CUST_NAME(l_record.n_cust_ref_no(i),l_record.v_name_chg(i),l_record.changed(i) );
end loop;
--dbms_output.put_line (l_record.n_cust_ref_no(i)||','||l_record.V_OCCUP_CODE(i)||','||l_record.CHANGED(i));
/*forall i in 1 .. l_record.n_cust_ref_no.count
update GNMT_CUSTOMER_MASTER q
set q.v_name = l_record.v_name_chg(i)
where q.n_cust_ref_no = l_record.n_cust_ref_no(i)
and trim(q.v_name) = l_record.v_name(i)
and l_record.changed(i) = 'Y';*/
-- update v_name in all the related tables
forall i in 1 .. l_record.n_cust_ref_no.count
update ADE_CUSTOMER_MASTER q
set q.v_NAME = l_record.v_name_chg(i)
where q.n_cust_ref_no = l_record.n_cust_ref_no(i)
and trim(q.v_name) = l_record.v_name(i)
and l_record.changed(i) = 'Y'
and q.v_NAME is not null;
forall i in 1 .. l_record.n_cust_ref_no.count
update GNMT_POLICY_DETAIL q
set q.v_NAME = l_record.v_name_chg(i)
where q.n_cust_ref_no = l_record.n_cust_ref_no(i)
and trim(q.v_name) = l_record.v_name(i)
and l_record.changed(i) = 'Y'
and q.v_NAME is not null;
forall i in 1 .. l_record.n_cust_ref_no.count
update GNMT_QUOTATION_DETAIL q
set q.v_NAME =l_record.v_name_chg(i)
where q.n_cust_ref_no = l_record.n_cust_ref_no(i)
and trim(q.v_name) = l_record.v_name(i)
and l_record.changed(i) = 'Y'
and q.v_NAME is not null;
forall i in 1 .. l_record.n_cust_ref_no.count
update NBDT_BENEFICIARY q
set q.V_NAME = l_record.v_name_chg(i)
where q.n_cust_ref_no = l_record.n_cust_ref_no(i)
and trim(q.V_NAME) = l_record.v_name(i)
and l_record.changed(i) = 'Y'
and q.v_NAME is not null;
forall i in 1 .. l_record.n_cust_ref_no.count
update PSDT_NOMINATION_TRANSACTION q
set q.V_NAME = l_record.v_name_chg(i)
where q.n_cust_ref_no = l_record.n_cust_ref_no(i)
and trim(q.V_NAME) = l_record.v_name(i)
and l_record.changed(i) = 'Y'
and q.v_NAME is not null;
forall i in 1 .. l_record.n_cust_ref_no.count
update PSMT_POLICY_BENEFICIARY q
set q.V_NAME = l_record.v_name_chg(i)
where q.n_cust_ref_no = l_record.n_cust_ref_no(i)
and trim(q.V_NAME) = l_record.v_name(i)
and l_record.changed(i) = 'Y'
and q.v_NAME is not null;
commit;
forall i in 1 .. l_record.n_cust_ref_no.count
update PSMT_POLICY_TRUSTEE q
set q.V_NAME = l_record.v_name_chg(i)
where q.n_cust_ref_no = l_record.n_cust_ref_no(i)
and trim(q.V_NAME) = l_record.v_name(i)
and l_record.changed(i) = 'Y'
and q.v_NAME is not null;
forall i in 1 .. l_record.n_cust_ref_no.count
update PSMT_QUOTATION_BENEFICIARY q
set q.V_NAME = l_record.v_name_chg(i)
where q.n_cust_ref_no = l_record.n_cust_ref_no(i)
and trim(q.V_NAME) = l_record.v_name(i)
and l_record.changed(i) = 'Y'
and q.v_NAME is not null;
forall i in 1 .. l_record.n_cust_ref_no.count
update PSMT_QUOTATION_TRUSTEE q
set q.V_NAME = l_record.v_name_chg(i)
where q.n_cust_ref_no = l_record.n_cust_ref_no(i)
and trim(q.V_NAME) = l_record.v_name(i)
and l_record.changed(i) = 'Y'
and q.v_NAME is not null;
commit;
forall i in 1 .. l_record.n_cust_ref_no.count
update GNDT_BLACKLIST_DETAIL q
set q.v_FNAME = l_record.v_name_chg(i)
where q.n_cust_ref_no = l_record.n_cust_ref_no(i)
and trim(q.v_FNAME) = l_record.v_name(i)
and l_record.changed(i) = 'Y'
and q.v_FNAME is not null;
forall i in 1 .. l_record.n_cust_ref_no.count
update INDT_LIAM_DETAIL q
set q.v_FNAME = l_record.v_name_chg(i)
where q.n_cust_ref_no = l_record.n_cust_ref_no(i)
and trim(q.v_FNAME) = l_record.v_name(i)
and l_record.changed(i) = 'Y'
and q.v_FNAME is not null;
commit;
forall i in 1 .. l_record.n_cust_ref_no.count
update GNMT_POLICY q
set q.V_PAYER_NAME = l_record.v_name_chg(i)
where q.N_PAYER_REF_NO = l_record.n_cust_ref_no(i)
and trim(q.V_PAYER_NAME) = l_record.v_name(i)
and l_record.changed(i) = 'Y'
and q.V_PAYER_NAME is not null;
commit;
forall i in 1 .. l_record.n_cust_ref_no.count
update GNMT_QUOTATION q
set q.V_PAYER_NAME = l_record.v_name_chg(i)
where q.N_PAYER_REF_NO = l_record.n_cust_ref_no(i)
and trim(q.V_PAYER_NAME) = l_record.v_name(i)
and l_record.changed(i) = 'Y'
and q.V_PAYER_NAME is not null;
commit;
forall i in 1 .. l_record.n_cust_ref_no.count
update GNMT_QUOTATION q
set q.V_PROPOSER_NAME = l_record.v_name_chg(i)
where q.N_PROPOSER_REF_NO = l_record.n_cust_ref_no(i)
and trim(q.V_PROPOSER_NAME) = l_record.v_name(i)
and l_record.changed(i) = 'Y'
and q.V_PROPOSER_NAME is not null;
forall i in 1 .. l_record.n_cust_ref_no.count
update GNMT_POLICY q
set q.V_PROPOSER_NAME = l_record.v_name_chg(i)
where q.N_PROPOSER_REF_NO = l_record.n_cust_ref_no(i)
and trim(q.V_PROPOSER_NAME) = l_record.v_name(i)
and l_record.changed(i) = 'Y'
and q.V_PROPOSER_NAME is not null;
forall i in 1 .. l_record.n_cust_ref_no.count
update CLMT_CLAIM_MASTER q
set q.V_CLIENT_NAME = l_record.v_name_chg(i)
where q.N_CLIENT_REF_NO = l_record.n_cust_ref_no(i)
and trim(q.V_CLIENT_NAME) = l_record.v_name(i)
and l_record.changed(i) = 'Y'
and q.V_CLIENT_NAME is not null;
forall i in 1 .. l_record.n_cust_ref_no.count
update CLMT_CLAIM_MASTER q
set q.V_INTIMATOR_NAME = l_record.v_name_chg(i)
where q.N_CLIENT_REF_NO = l_record.n_cust_ref_no(i)
and trim(q.V_INTIMATOR_NAME) = l_record.v_name(i)
and l_record.changed(i) = 'Y'
and q.V_INTIMATOR_NAME is not null;
forall i in 1 .. l_record.n_cust_ref_no.count
update PYMT_VOU_MASTER q
set q.V_PAYEE_NAME = l_record.v_name_chg(i)
where q.n_cust_ref_no = l_record.n_cust_ref_no(i)
and trim(q.V_PAYEE_NAME) = l_record.v_name(i)
and l_record.changed(i) = 'Y'
and q.V_PAYEE_NAME is not null;
/*forall i in 1 .. l_record.n_cust_ref_no.count
     INSERT INTO GNMT_CUSTOMER_MASTER_LOG
          (N_CUST_REF_NO, V_TITLE_CODE, V_NAME, D_BIRTH_DATE, V_SEX, V_RELIGION_CODE, V_NATION_CODE, V_OCCUP_CODE, V_ALIVE, V_SMOKER,
          N_NO_STICKS, D_DEATH_DATE, V_BUMI_NON_BUMI, V_AGE_ADMITTED, V_SHORT_NAME, V_FIRST_NAME, V_LAST_NAME, V_EMAIL, V_DESIGNATION,
          N_HEIGHT,N_WEIGHT,V_TITLE_CODE_CHG, V_NAME_CHG, D_BIRTH_DATE_CHG, V_SEX_CHG,V_RELIGION_CODE_CHG,V_NATION_CODE_CHG, V_OCCUP_CODE_CHG, V_ALIVE_CHG,
          V_SMOKER_CHG, N_NO_STICKS_CHG, D_DEATH_DATE_CHG,V_BUMI_NON_BUMI_CHG, V_AGE_ADMITTED_CHG, V_SHORT_NAME_Chg, V_FIRST_NAME_Chg,
          V_LAST_NAME_Chg, V_EMAIL_Chg, V_DESIGNATION_Chg,N_HEIGHT_Chg,N_WEIGHT_Chg, V_UPD_STATUS_DC,-- V_LASTUPD_PROG, V_LASTUPD_INFTIM,
          V_LASTUPD_USER_DC, V_LASTUPD_PROG_DC,V_LASTUPD_INFTIM_DC
          SELECT N_CUST_REF_NO, V_TITLE_CODE, V_NAME, D_BIRTH_DATE, V_SEX, V_RELIGION_CODE, V_NATION_CODE, V_OCCUP_CODE, V_ALIVE, V_SMOKER,
          N_NO_STICKS, D_DEATH_DATE, V_BUMI_NON_BUMI, V_AGE_ADMITTED, V_SHORT_NAME, V_FIRST_NAME, V_LAST_NAME, V_EMAIL, V_DESIGNATION,
          N_HEIGHT,N_WEIGHT,V_TITLE_CODE_CHG, V_NAME_CHG, d_birth_date_chg, V_SEX_CHG, V_RELIGION_CODE_CHG,V_NATION_CODE_CHG, V_OCCUP_CODE_CHG, V_ALIVE_CHG,
          V_SMOKER_CHG, N_NO_STICKS_CHG, D_DEATH_DATE_CHG, V_BUMI_NON_BUMI_CHG, V_AGE_ADMITTED_CHG, V_SHORT_NAME_Chg, V_FIRST_NAME_Chg,
          V_LAST_NAME_Chg, V_EMAIL_Chg, V_DESIGNATION_Chg,N_HEIGHT_Chg,N_WEIGHT_Chg--, V_LASTUPD_USER, V_LASTUPD_PROG, V_LASTUPD_INFTIM
          ,'PROCESSED'
          ,user,--P_USER,
          'DC_PAKAGE',
          sysdate--P_DATE
          FROM GNMT_CUSTOMER_MASTER_CHG where n_cust_ref_no =l_record.n_cust_ref_no(i)
          --and n_cust_ref_no not in (select n_cust_ref_no from GNMT_CUSTOMER_MASTER_LOG);*/
exit when (l_done);
l_cnt := l_cnt + l_array_size;
end loop;
commit;
end;
end;
thank You

Dear SeánMacGC thanks for reply,
But "a.changed" is not a field in GNMT_CUSTOMER_MASTER_CHG. what i am doing in this procedure is i am collecting bulck data and validating field by field from GNMT_CUSTOMER_MASTER_CHG with GNMT_CUSTOMER_MASTER table as their structure is same.. if v_name is not same as v_name_chg then i am setting changed flag to "Y" changed is "changed dbms_sql.varchar2_table" and updating GNMT_CUSTOMER_MASTER in bluck where changed flag ='Y'...
type custRec is record
n_cust_ref_no dbms_sql.number_table,
v_name dbms_sql.varchar2_table,
v_name_chg dbms_sql.varchar2_table,
rowid rowidArray,
*changed dbms_sql.varchar2_table*
i cannot use simple SQL as i need to validate field for each records with GNMT_CUSTOMER_MASTER_CHG and insert into log file as well.....
to run this procedure:
execute DO_DC_NAME_UPDATE_OTHER_TAB.DO_NAME_UPDATE_OTHER_TAB;
Thanks...

Updated field in IC Agent Inbox

Hi Forum,
What is the "Updated" field in agent inbox? Am not able to see any values in that when I search for service requests. Please help me on how to show the updated date in that.
Regards,
Shridhar

Hi Shridhar,
I am afraid the "Updated" field is not managed at all.
If you look at workbench component ICCMP_INBOX, view InboxItems, context > context nodes > tree structure > tree node proxy > double-clic on class CL_ICCMP_IN_INBOXITEMS_CN02, double-clic on method GET_LASTUPDATE. Statement "clear value." indicates no value is returned.
Now you could enhance view ICCMP_INBOX,/InboxItems with custom code, and set your own content into method CL_ICCMP_IN_INBOXITEMS_CN02->GET_LASTUPDATE.
Do not count on reporting framework to provide the value for that field. Although structure CRMT_REPORT_LOCATORLIST foresees it, it is not filled with value by search query: see method CL_CRM_QUERYAUI_RUN_BTIL->GET_RESULT_LIST to get exact list of fields returned. CREATED_AT_DATE field is part of it, but not CHANGED_AT_DATE.
But you may perform the re-read of last change date even in CL_ICCMP_IN_INBOXITEMS_CN02->GET_LASTUPDATE method, because SAP already takes advantage of user-buffering in function CRM_ORDER_READ.
So adding following code to CL_ICCMP_IN_INBOXITEMS_CN02->GET_LASTUPDATE should show you correct last update
data:
lv_header_guid type crmt_object_guid,
lt_guids       type crmt_object_guid_tab,
ls_req_obj     type crmt_object_name,
lt_req_obj     type crmt_object_name_tab,
lt_orderadm_h type crmt_orderadm_h_wrkt,
lv_date        type sydatum,
lv_time        type syuzeit.
lv_header_guid ?= me->bo->get_property( 'GUID' ).
check lv_header_guid is not initial.
insert lv_header_guid into table lt_guids.
ls_req_obj = 'ORDERADM_H'.
insert ls_req_obj into table lt_req_obj.
call function 'CRM_ORDER_READ'
exporting
    it_header_guid       = lt_guids
    it_requested_objects = lt_req_obj
importing
    et_orderadm_h        = lt_orderadm_h
exceptions
    others               = 4.
if sy-subrc is initial.
read table lt_orderadm_h into crmt_orderadm_h_wrk index 1.
if sy-subrc is initial.
    CONVERT TIME STAMP crmt_orderadm_h_wrk-changed_at TIME ZONE sy-zonlo
        INTO DATE lv_date TIME lv_time.
may need to convert first to strings
    concatenate lv_date lv_time into value separated by space.
endif.
endif.
Hope you can use these ideas
Kind regards
Walter

How to update field values in a database table using module pool prg?

hi
how to update field values in a database table using module pool prg?
we created a customized table, and we put 2 push buttons in screen painter update and display.
but update is not working?
data is enter into screen fields and to internal table, but it is not updated in database table.
thanks in adv
vidya

HI,
we already used the update statement. but its not working.
plz check this.
*& Module Pool       ZCUST_CALL_REC
PROGRAM ZCUST_CALL_REC.
TABLES: ZCUST_CALL_REC,ZREMARKS.
data: v_kun_low like ZCUST_CALL_REC-kunnr ,
       v_kun_high like ZCUST_CALL_REC-kunnr,
       v_bud_low like ZCUST_CALL_REC-budat,
       v_bud_high like ZCUST_CALL_REC-budat.
ranges r_kunnr for ZCUST_CALL_REC-kunnr .
ranges r_budat for zcust_call_rec-budat.
DATA: ITAB TYPE STANDARD TABLE OF ZCUST_CALL_REC WITH HEADER LINE,
      JTAB TYPE STANDARD TABLE OF ZREMARKS WITH HEADER LINE.
*data:begin of itab occurs 0,
    MANDT LIKE ZCUST_CALL_REC-MANDT,
    kunnr like ZCUST_CALL_REC-kunnr,
    budat like ZCUST_CALL_REC-budat,
    code like ZCUST_CALL_REC-code,
    remarks like ZCUST_CALL_REC-remarks,
    end of itab.
*data:begin of Jtab occurs 0,
    MANDT LIKE ZCUST_CALL_REC-MANDT,
    kunnr like ZCUST_CALL_REC-kunnr,
    budat like ZCUST_CALL_REC-budat,
    code like ZCUST_CALL_REC-code,
    remarks like ZCUST_CALL_REC-remarks,
    end of Jtab.
CONTROLS:vcontrol TYPE TABLEVIEW USING SCREEN '9001'.
CONTROLS:vcontrol1 TYPE TABLEVIEW USING SCREEN '9002'.
*start-of-selection.
*&      Module USER_COMMAND_9000 INPUT
      text
MODULE USER_COMMAND_9000 INPUT.
CASE sy-ucomm.
WHEN 'BACK' OR 'EXIT' OR 'CANCEL'.
SET SCREEN 0.
LEAVE SCREEN.
CLEAR sy-ucomm.
WHEN 'ENQUIRY'.
perform multiple_selection.
perform append_CUSTOMER_code.
PERFORM SELECT_DATA.
call screen '9001'.
WHEN 'UPDATE'.
      perform append_CUSTOMER_code.
      PERFORM SELECT_DATA.
      call screen '9002'.
      perform update on commit.
WHEN 'DELETE'.
      perform append_CUSTOMER_code.
      PERFORM SELECT_DATA.
      call screen '9002'.
ENDCASE.
ENDMODULE.                 " USER_COMMAND_9000 INPUT
*&      Module STATUS_9000 OUTPUT
      text
MODULE STATUS_9000 OUTPUT.
SET PF-STATUS 'ZCUSTOMER'.
SET TITLEBAR 'xxx'.
ENDMODULE.                 " STATUS_9000 OUTPUT
*&      Module USER_COMMAND_9001 INPUT
      text
MODULE USER_COMMAND_9001 INPUT.
CASE sy-ucomm.
WHEN 'BACK' OR 'EXIT' OR 'CANCEL'.
SET SCREEN 0.
LEAVE SCREEN.
CLEAR sy-ucomm.
endcase.
ENDMODULE.                 " USER_COMMAND_9001 INPUT
*&      Module STATUS_9001 OUTPUT
      text
MODULE STATUS_9001 OUTPUT.
SET PF-STATUS 'ZCUSTOMER'.
SET TITLEBAR 'xxx'.
move itab-MANDT   to zcust_call_rec-MANDT.
move itab-kunnr   to zcust_call_rec-kunnr.
move itab-budat   to zcust_call_rec-budat.
move itab-code    to zcust_call_rec-code.
move itab-remarks to zcust_call_rec-remarks.
vcontrol-lines = sy-dbcnt.
ENDMODULE.                 " STATUS_9001 OUTPUT
*&      Module USER_COMMAND_9002 INPUT
      text
module USER_COMMAND_9002 input.
CASE sy-ucomm.
   WHEN 'BACK' OR 'EXIT' OR 'CANCEL'.
      SET SCREEN 0.
      LEAVE SCREEN.
      CLEAR sy-ucomm.
   WHEN 'UPDATE'.
         perform move_data.
     UPDATE ZCUST_CALL_REC FROM TABLE ITAB.
        IF SY-SUBRC = 0.
           MESSAGE I000(0) WITH 'RECORDS ARE UPDATED'.
         ELSE.
           MESSAGE E001(0) WITH 'RECORDS ARE NOT UPDATED'.
        ENDIF.
WHEN 'DELETE'.
         perform move_data.
         DELETE ZCUST_CALL_REC FROM TABLE ITAB.
          IF SY-SUBRC = 0.
           MESSAGE I000(0) WITH 'RECORDS ARE DELETED'.
         ELSE.
           MESSAGE E001(0) WITH 'RECORDS ARE NOT DELETED'.
        ENDIF.
endcase.
endmodule.                 " USER_COMMAND_9002 INPUT
*&      Module STATUS_9002 OUTPUT
      text
module STATUS_9002 output.
SET PF-STATUS 'ZCUSTOMER1'.
SET TITLEBAR 'xxx'.
endmodule.                 " STATUS_9002 OUTPUT
*&      Module update_table OUTPUT
      text
module update_table output.
     move itab-MANDT   to zcust_call_rec-MANDT.
     move itab-kunnr   to zcust_call_rec-kunnr.
     move itab-budat   to zcust_call_rec-budat.
     move itab-code    to zcust_call_rec-code.
     move itab-remarks to zcust_call_rec-remarks.
vcontrol-lines = sy-dbcnt.
endmodule.                 " update_table OUTPUT
***Selection Data
FORM SELECT_DATA.
SELECT mandt kunnr budat code remarks FROM zcust_call_rec INTO
                        table itab
                         WHERE kunnr IN r_kunnr AND BUDAT IN R_BUDAT.
ENDFORM.
****append vendor code
FORM APPEND_CUSTOMER_CODE.
clear r_kunnr.
clear itab.
clear r_budat.
refresh r_kunnr.
refresh itab.
refresh r_kunnr.
IF r_kunnr IS INITIAL
              AND NOT v_kun_low IS INITIAL
               AND NOT v_kun_high IS INITIAL.
                    CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
                                EXPORTING
                                   input         = v_kun_low
                                IMPORTING
                                   OUTPUT        = r_kunnr-low.
                   CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
                              EXPORTING
                                  input         = v_kun_high
                              IMPORTING
                                  OUTPUT        = r_kunnr-high.
                 r_kunnr-option = 'BT'.
                 r_kunnr-sign = 'I'.
                 append r_kunnr.
   PERFORM V_BUDAT.
ELSEIF r_kunnr IS INITIAL
              AND NOT v_kun_low IS INITIAL
               AND v_kun_high IS INITIAL.
                    CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
                                EXPORTING
                                   input         = v_kun_low
                                IMPORTING
                                   OUTPUT        = r_kunnr-low.
                r_kunnr-SIGN = 'I'.
                r_kunnr-OPTION = 'EQ'.
                APPEND r_kunnr.
   PERFORM V_BUDAT.
ELSEIF r_kunnr IS INITIAL
              AND v_kun_low IS INITIAL
               AND NOT v_kun_high IS INITIAL.
                    CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
                                EXPORTING
                                   input         = v_kun_low
                                IMPORTING
                                   OUTPUT        = r_kunnr-low.
                r_kunnr-SIGN = 'I'.
                r_kunnr-OPTION = 'EQ'.
                APPEND r_kunnr.
      PERFORM V_BUDAT.
ELSEIF r_kunnr IS INITIAL
              AND v_kun_low IS INITIAL
               AND v_kun_high IS INITIAL.
                    IF SY-SUBRC = 0.
                         MESSAGE I003(0) WITH 'ENTER CUSTOMER NUMBER'.
                          CALL SCREEN '9000'.
                    ENDIF.
PERFORM V_BUDAT.
ENDIF.
ENDFORM.
FORM V_BUDAT.
IF R_BUDAT IS INITIAL
               AND NOT v_BUD_low IS INITIAL
               AND NOT v_BUD_high IS INITIAL.
                 r_budat-low = v_bud_low.
                 r_budat-high = v_bud_high.
                 r_budat-option = 'BT'.
                 r_budat-sign = 'I'.
                 append r_budat.
         ELSEIF R_BUDAT IS INITIAL
               AND NOT v_BUD_low IS INITIAL
               AND v_BUD_high IS INITIAL.
                 r_budat-low = v_bud_low.
                 r_budat-high = v_bud_high.
                 r_budat-option = 'EQ'.
                 r_budat-sign = 'I'.
                 append r_budat.
         ELSEIF R_BUDAT IS INITIAL
               AND v_BUD_low IS INITIAL
               AND NOT v_BUD_high IS INITIAL.
                 r_budat-HIGH = v_bud_HIGH.
                 r_budat-option = 'EQ'.
                 r_budat-sign = 'I'.
                 append r_budat.
          ELSEIF R_BUDAT IS INITIAL
               AND v_BUD_low IS INITIAL
               AND v_BUD_high IS INITIAL.
               IF SY-SUBRC = 0.
                   MESSAGE I002(0) WITH 'ENTER POSTING DATE'.
                  CALL SCREEN '9000'.
                r_budat-low = ''.
                r_budat-option = ''.
                r_budat-sign = ''.
                ENDIF.
        ENDIF.
ENDFORM.
*&      Form update
      text
--> p1        text
<-- p2        text
form update .
commit work.
endform.                    " update
*&      Form move_data
      text
--> p1        text
<-- p2        text
form move_data .
   clear itab.
refresh itab.
       move-corresponding zcust_call_rec to itab.
       MOVE ZCUST_CALL_REC-MANDT   TO ITAB-MANDT.
       MOVE ZCUST_CALL_REC-KUNNR   TO ITAB-KUNNR.
       MOVE ZCUST_CALL_REC-BUDAT   TO ITAB-BUDAT.
       MOVE ZCUST_CALL_REC-CODE    TO ITAB-CODE.
       MOVE ZCUST_CALL_REC-REMARKS TO ITAB-REMARKS.
     APPEND ITAB.
     delete itab where kunnr is initial.
endform.                    " move_data
thanks in adv
vidya

Issue with field data type NUMBER(22,5) while updating field data.

Hi,
I have a field with data type NUMBER(22,5).
While inserting or updating field data it should take 17 digit and after decimal point 5 digit total 22 digit.
I set 22 for maximumLength property of messageTextInput field.
While updating field I am getting following problems,
1) I provide the value as 1234567890123456789012 (22 digit) and click apply button.
then I got error message as
Error
मैकेनाइजड दो पहिया/तीन पहिया वाहन - Value 1234567890123460000000 exceeds the maximum allowed value (NUMERIC (22, 5))
2)then I insert 12345678901234567.1234 (17 digit before decimal point and 4 digit after decimal point and it didn't accept 5 digit after decimal point) and click apply button.
It insert the value as 12345678901234600 (value changed after Apply)
The I tried with simple SQL insert statement to insert data and it successfully insert 12345678901234567.12345 value.
Any item property I missed here to set?
Please suggest.
Thanks & Regards,
Sagarika

hi
according to
" then I insert 12345678901234567.1234 (17 digit before decimal point and 4 digit after decimal point and it didn't accept 5 digit after decimal point) and click apply button.
It insert the value as 12345678901234600 (value changed after Apply)"
this statement ,it seems that it is definitely applying round or somthing like that function in the code before inserting value in the table("try with select round(12345678901234567.1234 ) from dual u will get the same result = 123456789012345600 ") ,
bcz u r able to insert the same directely into the table using insert statement so kindely have look on the code if something like this is not happening there.try to check code in related EOimpl class
try to to use debugging mode ,and the 23 char problem is related to maximum lenghth of text box make it 23 it will get resolved and u will be able to enter 17 digits with 5 digits after decimal point
thanx pratap

Credit - Field VBAP-CMPRE

Dear experts,
I've this issue:
When i Create a new order the field VBAP-CMPRE is not valued. Do you know the reason?
I've checked all credit settings in customizing and these are correct.
If I check others orders in the table VBAP the field is valued correctly.
Thanks
Regards
Max

Dear Max Pozzi,
Did you check whether the pricing procedure coming in the old sales orders is same as the one coming in the new sales order?
Usually VBAP-CMPRE gets filled with the value of the condition type to which a subtotal A is assigned in the pricing procedure.
Check what is the pricing procedure coming in the new sales order and go to v/08 and check whether there is a subtotal A assigned against any condition type.
Check and revert back.
Thanks & Regards,
Hegal K Charles

Start Routine Logic Updating Field in Target ODS

Hi,
I am creating a Start Routine to Update Field (date) from one ODS to another based on the Key Structure: Document Number, Line Item Number.
I am encountering a situation as follows:
Source
Doc Num 1 Line Item 10 Date 1/1/1
Target
Doc Num 1 Line Item 10 Date 1/1/1
DocNum 1 Line Item 20
DocNum 1 Line Item 30
DocNum 1 Line Item 40
The Routine I have now correctly updates line item 10 with the date 1/1/1.
I am trying to modify the code to only update the target ods if all of the line items are in the source. In this example Line Item 10 would not get updated since Line Items 20,30,40 are not in the Source ODS.
Has anyone encountered something like this.
Thanks for any help.

Hi,
If you have all the line items in target for which you want to do updates you can do this in transformation start routine.
Try this first hand logic :
1. Create a internal tables(say SOURCE_INTERNAL_TABLE and TARGET_INTERNAL_TABLE)
    with fields document number and another field integer say COUNTER
2. Read active table of source for all the document numbers in source package.
3. Update the SOURCE_INTERNAL_TABLE for all the document number with appropriate counts
    (All the records of same document number should be in same data package)
4. Update the TARGET_INTERNAL_TABLE by reading the target ODS as done for source.
5. LOOP AT SOURCE_PACKAGE
     if COUNTER in SOURCE_INTERNAL_TABLE and TARGET_INTERNAL_TABLE is not same
     then delete the record from source package itself
   END LOOP
6. Your next code
    (Please take care that you are not referring the deleted records otherwise it will through a dump)
If you don't have all the line items in target then you need to bring them somewhere in BI (document number and item number only sufficient with both as a key fields) so as to refer them in your start routine.
Please update me if anything is wrong or if any corrections in logic.
Thanks and Regards,
Prashant Vankudre.

How to update field in table FAGLFLEXA/FAGLFLEXT

Hi Gurus,
     we are stay in ECC 5.00. The new g/l have activated but we have not assigned the relevant scenario to the ledger (Refer note no 990612)
     now we have assinged following field:
     FIN_CCA: RCNTR (Cost center), SCNTR (Sender cost center)
     FIN_CONS: RASSC (Trading partner), RMVCT (Transaction Type)
     FIN_GSBER: RBUSA (Business area), SBUSA (Trading partner's business area)
     FIN_PCA: PRCTR (Profit Center), PPRCTR (Partner Profit Ctr)
     FIN_SEGM: SEGMENT (Segment), PSEGMENT (Partner segment)
     FIN_UKV: RFAREA (Functional Area), SFAREA (Partner Functional Area)
     our problem is the data was posted before that does not update fields in table FAGLFLEXA/FAGLFLEXT,How to update field in table FAGLFLEXA/FAGLFLEXT?
Thanks,

Hello Jenjira,
Since this was a question asked few years back, I think you can share your experience with activation of a Scenario subsequent to Go-Live of new GL functionality (We are contemplating activation of one more scenario for Functional Area updation in new GL. 4 update scenarios were activated at time of New GL Implementation 4 years ago).
Please share following:
1. Impact of this subsequent activation on Open documents in the live system.
2. How you addressed the issues arising on Point 1.
3. Any support that you got from SAP Support Team on issues thereof.
Any inputs will be of great help.

Read from database (Access) and update fields using MS ADODB

Hello,
I am trying to get records from database using MS ADODB._connection & ADODB._Recordset objects (from LabVIEW 6)
I can:
1. open connection (with ADODB._connection)
2. write into tables (with ADODB._command)
I can not: gets records and update fields using ADODB._connection & ADODB._Recordset.
I do not know:
1. how to connect between the connection that was opened and the recordset object
2. where I can write the SQL text as input to the recordset
Attached is DataBase.llb with DB_read.vi that display my steps.
Thanks.
Attachments:
DataBase.llb ‏40 KB

Try this one, after updating the names for database and the table you want.
Let me know if it's working.
p.s.: if you have problems, it could be a different adodb version ... but the sequence of methods is the same
Attachments:
EditdatabaseMe.vi ‏57 KB

Update Field VBAP-ABGRU

Similar Messages

Maybe you are looking for