Skip to Content
author's profile photo Former Member
Former Member

modifying sales order

hi, currently i am modifying sales order form i.e. rvorder01.i want to add a new field name into that form and i want to create a new paragraph format after copying.ii tried for creating a new paragraph format .but it was not worked.first i want to change the field vbak-vbeln.how it is possible.

Add a comment
10|10000 characters needed characters exceeded

Related questions

2 Answers

  • author's profile photo Former Member
    Former Member
    Posted on Nov 30, 2007 at 04:59 AM

    hii shankar

    first of all copy ur standard form into zform then change original language to EN

    then u can modify wt ever u want

    Add a comment
    10|10000 characters needed characters exceeded

  • author's profile photo Former Member
    Former Member
    Posted on Nov 30, 2007 at 05:16 AM

    first goto Se71

    give your form name like Zrvdelnote goto utilites there is one option called copy form client give thesource form likestandard form name RVORDER01 and target form name os ZRVORDER01 once get this from client 000 to 800 than come to intial screnn fo SE71 give the same form name ZRVORDER01 make that language cahnge from DE to EN and make cahnges according to your need.

    if u want pass new filed of somthing you want write new code for that scripts fallow this process

    The Form :

    /:PERFORM CDE_CENT IN PROGRAM ZKRPMM_PERFORM_Z1MEDRUCK

    /:USING &EKKO-EBELN&

    /:CHANGING &CDECENT&

    /:ENDPERFORM

    The report :

    REPORT zkrpmm_perform_z1medruck .

    DATA : BEGIN OF it_input_table OCCURS 10.

    INCLUDE STRUCTURE itcsy.

    DATA : END OF it_input_table.

    • déclaration de la table output_table contenant les

    variables exportées

    DATA : BEGIN OF it_output_table OCCURS 0.

    INCLUDE STRUCTURE itcsy.

    DATA : END OF it_output_table.

    DATA : w_ebeln LIKE ekko-ebeln,

    • w_vbeln LIKE vbak-vbeln,

    w_zcdffa LIKE vbak-zcdffa.

    *----


    *

    • FORM CDE_CENT

    *

    *----


    *

    FORM cde_cent TABLES input output.

    it_input_table[] = input[].

    it_output_table[] = output[].

    READ TABLE it_input_table INDEX 1.

    MOVE it_input_table-value TO w_ebeln.

    CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'

    EXPORTING

    input = w_ebeln

    IMPORTING

    output = w_ebeln.

    SELECT SINGLE zcdffa FROM ekko

    INTO w_zcdffa

    WHERE ebeln = w_ebeln.

    it_output_table-name = 'CDECENT'.

    MOVE w_zcdffa TO it_output_table-value.

    MODIFY it_output_table INDEX 1.

    output[] = it_output_table[].

    ENDFORM.

    *************************************************************************

    REPORT ZMPO1 .

    form get_freight tables in_par structure itcsy out_par structure itcsy.

    tables: ekko,konv,t685t.

    data: begin of itab occurs 0,

    ebeln like ekko-ebeln,

    knumv like ekko-knumv,

    end of itab.

    data: begin of itab1 occurs 0,

    knumv like konv-knumv,

    kposn like konv-kposn,

    kschl like konv-kschl,

    kbetr like konv-kbetr,

    waers like konv-waers,

    kwert like konv-kwert,

    end of itab1.

    data: begin of iout occurs 0,

    kschl like konv-kschl,

    vtext like t685t-vtext,

    kbetr like konv-kbetr,

    kwert like konv-kwert,

    end of iout.

    data v_po like ekko-ebeln.

    read table in_par with key 'EKKO-EBELN'.

    if sy-subrc = 0.

    v_po = in_par-value.

    select

    ebeln

    knumv

    from ekko

    into table itab

    where ebeln = v_po.

    if sy-subrc = 0.

    loop at itab.

    select

    knumv

    kposn

    kschl

    kbetr

    waers

    kwert

    into table itab1

    from konv

    where knumv = itab-knumv and

    kappl = 'M'.

    endloop.

    loop at itab1.

    if itab1-kposn <> 0.

    select single * from t685t

    where kschl = itab1-kschl

    and kappl = 'M'

    and spras = 'EN'.

    iout-vtext = t685t-vtext.

    iout-kschl = itab1-kschl.

    iout-kbetr = itab1-kbetr.

    iout-kwert = itab1-kwert.

    append iout.

    clear iout.

    endif.

    endloop.

    sort itab1 by kposn.

    loop at iout.

    sort iout by kschl.

    if ( iout-kschl eq 'GSDC' OR

    iout-kschl eq 'GSFR' OR

    iout-kschl eq 'GSIR' ).

    at end of kschl.

    read table iout index sy-tabix.

    sum.

    • write:/ iout-kschl,iout-vtext,iout-kwert.

    out_par-name = 'A1'.

    out_par-value = iout-vtext.

    append out_par.

    out_par-name = 'A2'.

    out_par-value = iout-kwert.

    append out_par.

    endat.

    endif.

    endloop.

    endif.

    endif.

    endform.

    • IN THE FORM I AM WRITING THIS CODE.

    /:DEFINE &A1& = ' '

    /:DEFINE &A2& = ' '

    /:PERFORM GET_FREIGHT IN PROGRAM ZMFORM_PO1

    /:USING &EKKO-EBELN&

    /:CHANGING &A1&

    /:CHANGING &A2&

    /:ENDPERFORM

    • &A1&

    • &A2&

    This Code is to be written in the PO form under ADDRESS window.

    -

    -


    /:DEFINE &A1& = ' '

    /:DEFINE &A2& = ' '

    /:DEFINE &A3& = ' '

    /:DEFINE &A4& = ' '

    /:DEFINE &A5& = ' '

    /:DEFINE &A6& = ' '

    /:PERFORM GET_VENDOR IN PROGRAM ZMFORM_PO

    /:USING &EKKO-EBELN&

    /:CHANGING &A1&

    /:CHANGING &A2&

    /:CHANGING &A3&

    /:CHANGING &A4&

    /:CHANGING &A5&

    /:CHANGING &A6&

    /:ENDPERFORM

    • &A1&

    • &A2&

    • &A3&

    • &A4&

    • &A5&

    • &A6&

    thanks.

    reward is usefull

    Add a comment
    10|10000 characters needed characters exceeded

Before answering

You should only submit an answer when you are proposing a solution to the poster's problem. If you want the poster to clarify the question or provide more information, please leave a comment instead, requesting additional details. When answering, please include specifics, such as step-by-step instructions, context for the solution, and links to useful resources. Also, please make sure that you answer complies with our Rules of Engagement.
You must be Logged in to submit an answer.

Up to 10 attachments (including images) can be used with a maximum of 1.0 MB each and 10.5 MB total.