Alter the "Dynamic Interactive Purchase Order" example

In the Sample files, there´s a fantastic form called the "Dynamic Interactive Purchase Order". This form worked perfectly for me, but now I need to change something. Instead of the "Quantity" field, I need the user to make a choice out of 4 options. The Unit Price then automatically should change as well, depending on the option the user choose ofcourse.
For example, the Part.No dropdown lists consists of 4 types of t-shirts: blue, red, white and black. All have a standard description (their colour), and a basic price. Now I want to change the Quantity field into a field with 4 radiobuttons, let´s say the size of the shirt: S, M, L and XL. That particular button should have a description as well. And ofcourse, the unit price should change with it.
It should look something like this:
Part No. (dropdown)
Description
Size
Description
Price
Blue
A nice blue t-shirt
S
You´re a small person!
$15
Red
Wow, my favorite colour!
XL
Isn´t it time to go on a diet?
$30
Red
Wow, my favorite colour!
M
Nice size
$20
Black
Back to Black
M
Nice size
$20
Is there anyone with the knowledge and a few minutes to spare to help me out here? I really don´t see it, and I´m getting pretty frustrated with that

Are you using Workshop? Is so, workshop does not provide for running plain java
classes. You can run a web service (.jws) or a web application (.jpf). You can
edit .java classes in workshop no problem but you need to build and execute them
from outside workshop. You might try creating a simple .jws. Workshop makes
that very easy to do.
"Vaidhy" <[email protected]> wrote:
>
I am trying to use the purchase order example. I have used the xsd file
to create
all the relevant java classes. I am trying to the get the POHandler.java
class
working. I am able to compile the class but I cannot run/debug. All the
menus
are greyed out. Any ideas??

Similar Messages

  • How to see the list of purchase order

    hi,
    Please kindly guide me how to see the list of purchase order released and unreleased both.
    Regards,
    Sanchita

    Hi
    Check it out in Tcode ME2N
    Menu bar - Edit -Dynamic selections - Purchasing document header - Release status.
    Check it out.
    Thanks
    Raman

  • How to restrict the user to enter the item in purchase order?

    I want to restrict user to enter the item in purchase order.
    How can i do this?
    Please help
    Abhishek

    Hi,
       You may create a transaction variant for ME21N in SHD0 transaction. Make the item field as output only as shown below:
    Result:
       You may check the doc: Learning SHD0 with Example
    Regards,
    AKPT

  • How can we print the Stock Transfer Purchase Order

    Hi,
    How can we print the Stock Transfer Purchase Order??
    Because from Transaction ME9L & ME9F, we can print simple PO's like NB, MPR etc..but Stock Transfer PO could not print.
    Plz guide, from where we can do it...

    Messages for PO are set in MN04. For details on how to follow this link:
    Re: Problem with PO output determination MN04
    Once the record is set here you will see the records in ME23n under messages button in header.
    Edited by: Afshad Irani on Apr 30, 2010 10:09 AM

  • How to print the modified old Purchase Order

    Dear Friends,
    What is the process of printing the modified old Purchase Order.
              With Regards,
                Siva kumar

    Dear,
    Please check the link with screenshots.
    http://www.finance.utoronto.ca/fast/qrg/purch/po/print.htm
    Regards,
    Syed Hussain.

  • Nu00B0 and position of Customer Order in the print of Purchase Order

    In the sapscript of Purchase Order  i want print the number and the position of its Customer Order.
    In the program SAPLMEDRUCK (SAPLMEDRUCK \ LMEDRUCKF01 \ LMEDRUCKF04) the data that I want are in the table t_ekkn (vbeln and ebelp) but I can't change the program to insert a write_form (is a standard program) and in the sapscript I can't do select in the table.
    Someone knows if there's a way to print them?
    Thanks to all.

    I think there are two way to solve the problem:
    - change the program to insert a write_form ( can I modify a standard program?)
    - into the sapscript:  find in the row (if there are) the number and the position of its Customer Order.
    Someone can tell me if there is a solution?
    Edited by: Andrea Peroni on Jun 30, 2008 10:58 AM

  • What occurs in the phase of purchase orders management?

    In the procurement cycle of a service or material, what occurs in the phase of purchase orders management?
    I.  The received good quantity is registered by the system and the first part of accounting is made.
    II. The invoice supervisor is notified of the good price and quantity variances.
    III. The on-line purchase order processing status can be monitored and it is posible to know if the goods or an invoice were received.
    Edited by: Arghya_Roy on Jul 13, 2009 5:51 PM

    Determination of Requirements:  This phase comprises of identification of Material Requirements. This can be based on the user or MRP proper/Demand based approach to inventory control. Purchase Requisitions can be created manually (ME51N) Release (ME54) or can be generated using the System.
    Source Determination: This Phase comprises of identification of potential sources of supply. This can be based on past orders, and existing agreements.
    Vendor Selection: This Phase comprises of comparison of quotations received from Vendors. The system can check different quotations received from vendors.
    Purchase Order Processing: In this phase information is acquired from the Requisition and the Quotation. Purchase Orders can be generated by the system or they can be created manually (ME21N).
    Goods Receiving and Inventory Management: The goods receipts number can be obtained by entering the Purchase Order number.
    Invoice Verification: Here Invoices are matched

  • The Draft Word is behind the text in Purchase Order

    Hi All expert,
    Do you all have any idea about the watermark draft in SAP Business One 2007 Purchase Order.
    The Purchases Order with draft will display in the center of Purchases Order if the document is in draft.
    However, i found that the work 'draft' in the center of Purchase Order is behind the text. It means the word draft cannot display entire word in the document.
    If i want the 'draft' bring in front of the text. Mean it show entire words 'draft' instead of behind the text in the document.
    Can we be make it?
    Can we change the word 'draft' in the document?
    Regards,
    Eric Tan

    Hi Eric Tan,
    You cannot change the word DRAFT to anything else. Also you cannot make it appear in front of the text. As a workaround what you can do is Using the Document status you display on the header of the PLD you can display the DRAFT word or any other word as required. You can also format the field with font of big size and select color for it.
    Also you can disable the DRAFT word from being displayed in the PLD by configuring the settings in the Administration --> System Initialization --> Print Preference --> General Tab.
    Hopw this will help you.
    Regards
    Reno.

  • User exit for the release of Purchase Order

    Hi Friends,
    I am searching for a user exit which should trigger at the time of Purchase Order release in ME29n transaction.
    If anyone can help me for the same....!!!
    I need the exact exit which triggers at the release of PO....
    Points will be rewarded for the needful replies.
    Regards,
    Mandeep.

    HI,
    Finding the user-exits of a SAP transaction code
    Enter the transaction code in which you are looking for the user-exit
    and it will list you the list of user-exits in the transaction code.
    Also a drill down is possible which will help you to branch to SMOD.
    report zuserexit no standard page heading.
    tables : tstc, tadir, modsapt, modact, trdir, tfdir, enlfdir.
             tables : tstct.
    data : jtab like tadir occurs 0 with header line.
    data : field1(30).
    data : v_devclass like tadir-devclass.
    parameters : p_tcode like tstc-tcode obligatory.
    select single * from tstc where tcode eq p_tcode.
    if sy-subrc eq 0.
       select single * from tadir where pgmid = 'R3TR'
                        and object = 'PROG'
                        and obj_name = tstc-pgmna.
       move : tadir-devclass to v_devclass.
          if sy-subrc ne 0.
             select single * from trdir where name = tstc-pgmna.
             if trdir-subc eq 'F'.
                select single * from tfdir where pname = tstc-pgmna.
                select single * from enlfdir where funcname =
                tfdir-funcname.
                select single * from tadir where pgmid = 'R3TR'
                                   and object = 'FUGR'
                                   and obj_name eq enlfdir-area.
                move : tadir-devclass to v_devclass.
              endif.
           endif.
           select * from tadir into table jtab
                         where pgmid = 'R3TR'
                           and object = 'SMOD'
                           and devclass = v_devclass.
            select single * from tstct where sprsl eq sy-langu and
                                             tcode eq p_tcode.
            format color col_positive intensified off.
            write:/(19) 'Transaction Code - ',
                 20(20) p_tcode,
                 45(50) tstct-ttext.
                        skip.
            if not jtab[] is initial.
               write:/(95) sy-uline.
               format color col_heading intensified on.
               write:/1 sy-vline,
                      2 'Exit Name',
                     21 sy-vline ,
                     22 'Description',
                     95 sy-vline.
               write:/(95) sy-uline.
               loop at jtab.
                  select single * from modsapt
                         where sprsl = sy-langu and
                                name = jtab-obj_name.
                       format color col_normal intensified off.
                       write:/1 sy-vline,
                              2 jtab-obj_name hotspot on,
                             21 sy-vline ,
                             22 modsapt-modtext,
                             95 sy-vline.
               endloop.
               write:/(95) sy-uline.
               describe table jtab.
               skip.
               format color col_total intensified on.
               write:/ 'No of Exits:' , sy-tfill.
            else.
               format color col_negative intensified on.
               write:/(95) 'No User Exit exists'.
            endif.
          else.
              format color col_negative intensified on.
              write:/(95) 'Transaction Code Does Not Exist'.
          endif.
    at line-selection.
       get cursor field field1.
       check field1(4) eq 'JTAB'.
       set parameter id 'MON' field sy-lisel+1(10).
       call transaction 'SMOD' and skip first   screen.
    *---End of Program
    USE THIS PROGRAM TO GET ANY USER EXIT BY GIVING THE TCODE.
    MMFAB001            User exit for generation of release order
    MRFLB001            Control Items for Contract Release Order
    REGARDS,
    PRIYA.
    Edited by: Priyadharshini Veluswamy on Mar 13, 2008 9:21 AM
    Edited by: Priyadharshini Veluswamy on Mar 13, 2008 9:40 AM

  • When creating entry sheet,the error raise:purchase order incomplete(parked)

    dear all:
    When I create entry sheet of one po with tcode ml81n,the error raise:purchase order incomplete(parked)message id:se215.
    How to solve this?Thank you!
    maojian

    hi Jian,
    Go into the PO using ME22N, check whether there is any warning message in it.Complete the PO and then only save it.
    Also check whether the PO is to be released,if it is yes then Release it and then create Entry Sheet using ML81N.wrt PO.
    Also check whether you are referencing a park or hold PO.
    Hope it will help you.
    Cheers
    Manoj K Singh

  • How to determine output based on the content of purchase order

    Hi Gurus,
    I've a typical requirement at my present project. With vendor X we have punchout catalogs. while creation of shopping cart, we are not allowing the user to mix catalog items and non catalog items into the same shopping cart. Once the shopping cart all shopping carts are automatically coverted into PO.
    Now the challenge we are facing is, if the PO is created based on items from catalog, we want to send such PO via XML interface to the vendor. If the PO is created based of items which are free-form, we want to send such PO via Smartform email attachment.
    As this condition can only be determined at runtime, I'm finding a challenge to configure this. In both PO cases, vendor is same but the content of the PO is different. One contains all items that are catalog based and other contains items which are non catalog.
    Can someone help me find solution for this issue.
    Regards,
    Sam K

    Change Forms for Document Output
    You can use the Business Add-In BBP_OUTPUT_CHANGE_SF to override the Smart Forms that are defined in the activity Define Actions for Document Output.
    This BAdI serves as an alternative to the IMG activity Condition-Dependent Document Output.
    Note that no Smart Forms are used for output via XML.
    Standard settings
    The following parameters are available in the method CHANGE_FORMS. Depending on the input parameters, you can define other Smart Forms to output the document type.
    Importing
    IV_GUID
    Globally Unique Identifier of the document.
    IV_MEDIUM
    Output medium found for this document according to Define Actions for Document Output (print: PRN, fax: FAX, e-mail: MAI, XML: MET).
    IS_PARTNER
    Business partner to whom the document is sent.
    IV_OBJECT_TYPE
    Business transaction type.
    Changing
    CV_SMARTFORM
    Smart Form used to output the document.
    E-mail output
    Smart Form with which the document is added to the e-mail in the form of a PDF attachment.
    Note:
    Note that the BAdI with this parameter overrides the parameter form name (technical name of the Smart Form BBP_PO for example) irrespective of the defined determination technology (SRM: Purchase Order Output Determination, for example).
    CV_SMARTFORM_MAIL
    Smart Form used to define content and layout of the e-mail text in the case of e-mail output.
    CV_SUBJECT_MAIL
    Smart Form that determines the text in the (short description of the e-mail content).
    As an alternative to this BAdI, you can control document output via determination technology.
    For more information, see Condition-Dependent Document Output.
    EXPLORE THIS badi

  • Want the fieldnames in purchase order

    Hello Friends,
    Im creating one formula for alternate calculation type for a particular procedure.
    Now to create the formula i want the techincal names of pricing elements in conditions tab in PO :
    like how to trace out grosprice , thn total duty, thn discount and condition value bcoz if i click f1 on any field inside conditons tab its showing the same field name like for grossprice amount field name is kbetr and same is for taxduty
    pls help
    SUnny

    Hi Sunny,
    see the sample report for the fieldnames and other logic
    all the PO info is there here.
    *& Report ZMM_PO_REPORT
    REPORT ZMM_PO_REPORT message-Id yb
    NO STANDARD PAGE HEADING
    LINE-COUNT 60(1)
    LINE-SIZE 230.
    D A T A B A S E T A B L E S D E C L A R A T I O N
    TABLES: lfa1, " Vendor Master
    t161, " PO Doc Types
    t024, " Purchase Groups
    ekko. " PO Header
    T Y P E S D E C L A R A T I O N S
    Purchase Orders Main Structure
    TYPES: BEGIN OF s_po,
    ebeln TYPE ebeln, " PO No.
    ebelp TYPE ebelp, " PO Item
    bstyp TYPE bstyp, " PO Category
    bukrs TYPE bukrs, " Company Code
    bsart TYPE bbsrt, " PO Type
    lifnr TYPE lifnr, " Vendor No
    ekgrp TYPE bkgrp, " Purchase Group
    waers TYPE waers, " Currency
    bedat TYPE etbdt, " PO Date
    txz01 TYPE txz01, " Material Text
    werks TYPE ewerk, " Plant
    lgort TYPE lgort_d, " Storage Location
    matkl TYPE matkl, " Material Group
    menge TYPE bamng, " PR Quantity
    meins TYPE bamei, " UOM
    bprme TYPE bbprm, " Price Unit
    netpr TYPE netpr, " Net price
    peinh TYPE peinh, " Price Unit UOM
    pstyp TYPE pstyp, " Item Category
    knttp TYPE knttp, " Account Assignment Category
    END OF s_po.
    Purchase Orders History Structure
    TYPES: BEGIN OF s_account,
    ebeln TYPE ebeln, " PO No.
    ebelp TYPE ebelp, " PO Item
    gjahr TYPE mjahr, " Fiscal Year
    belnr TYPE mblnr, " PO Invoice No
    menge TYPE menge_d, " PR Quantity
    wrbtr TYPE wrbtr, " Price in Local Currency
    dmbtr TYPE dmbtr, " Price in Foreign Currency
    waers TYPE waers, " Currency
    shkzg TYPE shkzg, " Dr/Cr Indicator
    END OF s_account.
    Purchase Orders History Structure(Item Sum)
    TYPES: BEGIN OF s_inv_sum,
    ebeln TYPE ebeln, " PO No.
    ebelp TYPE ebelp, " PO Item
    menge TYPE menge_d, " PR Quantity
    wrbtr TYPE wrbtr, " Price in Foreign Currency
    waers TYPE waers, " Currency
    END OF s_inv_sum.
    Purchase Orders Main Structure
    TYPES: BEGIN OF s_rep,
    lifnr TYPE lifnr, " Vendor No
    ebeln TYPE ebeln, " PO No.
    ebelp TYPE ebelp, " PO Item
    bstyp TYPE bstyp, " PO Category
    bsart TYPE bbsrt, " PO Type
    ekgrp TYPE bkgrp, " Purchase Group
    waers TYPE waers, " Currency
    bedat TYPE etbdt, " PO Date
    txz01 TYPE txz01, " Material Text
    werks TYPE ewerk, " Plant
    lgort TYPE lgort_d, " Storage Location
    matkl TYPE matkl, " Material Group
    menge TYPE bamng, " PR Quantity
    meins TYPE bamei, " UOM
    bprme TYPE bbprm, " Price Unit
    netpr TYPE netpr, " Net price
    peinh TYPE peinh, " Price Unit UOM
    pstyp TYPE pstyp, " Item Category
    knttp TYPE knttp, " Account Assignment Category
    name1 TYPE name1, " Plant
    orewr TYPE netpr, " To be Invoiced Price
    curr TYPE waers, " Inv Doc Currency
    END OF s_rep.
    D A T A D E C L A R A T I O N S
    DATA: gv_title1 TYPE sylisel, " Report title
    gv_dial. " Color flag
    C O N S T A N T S D E C L A R A T I O N S
    CONSTANTS: c_x VALUE 'X', " Flag X
    c_h VALUE 'H', " Debit
    c_vgabe TYPE vgabe VALUE '2'. " Transaction Type
    I N T E R N A L T A B L E S D E C L A R A T I O N S
    DATA: i_po TYPE STANDARD TABLE OF s_po WITH HEADER LINE,
    " Purchase Order
    i_inv TYPE STANDARD TABLE OF s_inv_sum WITH HEADER LINE,
    " PO Invoice Values
    i_rep TYPE STANDARD TABLE OF s_rep WITH HEADER LINE,
    " PO Invoice Values
    i_ekbe TYPE STANDARD TABLE OF s_account WITH HEADER LINE.
    " PO Invoice Values
    S E L E C T I O N S C R E E N *
    SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
    SELECT-OPTIONS: s_lifnr FOR lfa1-lifnr MATCHCODE OBJECT kred,
    s_ebeln FOR ekko-ebeln MATCHCODE OBJECT mekk,
    s_bsart FOR t161-bsart,
    s_ekgrp FOR t024-ekgrp,
    s_bedat FOR ekko-bedat.
    SELECTION-SCREEN END OF BLOCK b1.
    I N I T I A L I Z A T I O N *
    INITIALIZATION.
    A T S E L E C T I O N - S C R E E N *
    AT SELECTION-SCREEN.
    Validate the screen fields
    PERFORM validate_screen.
    S T A R T - O F - S E L E C T I O N *
    START-OF-SELECTION.
    Fetch main data
    PERFORM fetch_data.
    T O P - O F - P A G E *
    TOP-OF-PAGE.
    Header of the List
    PERFORM header.
    E N D - O F - P A G E *
    Footer
    END-OF-PAGE.
    ULINE.
    E N D - O F - S E L E C T I O N *
    END-OF-SELECTION.
    Display the Report Output data
    PERFORM display_data.
    At Line-Selection
    AT LINE-SELECTION.
    When double clicked on EBELN display the details of Purchase Doc
    PERFORM line_sel.
    *& Form validate_screen
    Validation of Selection Screen fields
    FORM validate_screen .
    Validation of Vendor Number
    CLEAR lfa1-lifnr.
    IF NOT s_lifnr[] IS INITIAL.
    SELECT lifnr UP TO 1 ROWS
    INTO lfa1-lifnr
    FROM lfa1
    WHERE lifnr IN s_lifnr.
    ENDSELECT.
    IF sy-subrc 0.
    MESSAGE e000 WITH 'Invalid Vendor'(002).
    ENDIF.
    ENDIF.
    Validation of PO Number
    CLEAR ekko-ebeln.
    IF NOT s_ebeln[] IS INITIAL.
    SELECT ebeln UP TO 1 ROWS
    INTO ekko-ebeln
    FROM ekko
    WHERE ebeln IN s_ebeln.
    ENDSELECT.
    IF sy-subrc 0.
    MESSAGE e000 WITH 'Invalid Document Number'(003).
    ENDIF.
    ENDIF.
    Validation of PO Document Type
    CLEAR t161-bsart.
    IF NOT s_bsart[] IS INITIAL.
    SELECT bsart UP TO 1 ROWS
    INTO t161-bsart
    FROM t161
    WHERE bsart IN s_bsart.
    ENDSELECT.
    IF sy-subrc 0.
    MESSAGE e000 WITH 'Invalid Purchase Document Type'(004).
    ENDIF.
    ENDIF.
    Validation of Purchasing Group
    CLEAR t024-ekgrp.
    IF NOT s_ekgrp[] IS INITIAL.
    SELECT ekgrp UP TO 1 ROWS
    INTO t024-ekgrp
    FROM t024
    WHERE ekgrp IN s_ekgrp.
    ENDSELECT.
    IF sy-subrc 0.
    MESSAGE e000 WITH 'Invalid Purchasing Group'(005).
    ENDIF.
    ENDIF.
    ENDFORM. " validate_screen
    *& Form fetch_data
    Fetching the PO related data from Database Tables
    FORM fetch_data .
    CLEAR i_po.
    REFRESH i_po.
    SELECT a~ebeln " PO No.
    b~ebelp " PO Item
    a~bstyp " PO Category
    a~bukrs " Company Code
    a~bsart " PO Type
    a~lifnr " Vendor No
    a~ekgrp " Purchase Group
    a~waers " Currency
    a~bedat " PO Date
    b~txz01 " Material Text
    b~werks " Plant
    b~lgort " Storage Location
    b~matkl " Material Group
    b~menge " PR Quantity
    b~meins " UOM
    b~bprme " Price Unit
    b~netpr " Net price
    b~peinh " Price Unit UOM
    b~pstyp " Item Category
    b~knttp " Account Assignment Category
    INTO TABLE i_po
    FROM ekko AS a JOIN ekpo AS b
    ON a~ebeln = b~ebeln
    WHERE a~ebeln IN s_ebeln AND
    a~lifnr IN s_lifnr AND
    a~ekgrp IN s_ekgrp AND
    a~bsart IN s_bsart AND
    a~bedat IN s_bedat.
    SORT i_po BY ebeln ebelp.
    break-point.
    IF NOT i_po[] IS INITIAL.
    Fetch the PO History/Invoice Details from EKBE Table
    CLEAR i_ekbe.
    REFRESH i_ekbe.
    SELECT ebeln " PO No.
    ebelp " PO Item
    gjahr " Fiscal Year
    belnr " PO Invoice No
    menge " PR Quantity
    wrbtr " Price in Local Currency
    dmbtr " Price in Foreign Currency
    waers " Currency
    shkzg " Dr/Cr Indicator
    INTO TABLE i_ekbe
    FROM ekbe
    FOR ALL ENTRIES IN i_po
    WHERE ebeln = i_po-ebeln AND
    ebelp = i_po-ebelp AND
    vgabe = c_vgabe.
    IF sy-subrc = 0.
    SORT i_ekbe BY ebeln ebelp.
    LOOP AT i_ekbe.
    IF i_ekbe-shkzg = c_h.
    i_ekbe-wrbtr = i_ekbe-wrbtr * -1.
    ENDIF.
    MODIFY i_ekbe.
    ENDLOOP.
    break-point.
    Sum up the Item wise Invoice totals
    LOOP AT i_ekbe.
    AT END OF ebelp.
    READ TABLE i_ekbe INDEX sy-tabix.
    SUM.
    MOVE-CORRESPONDING i_ekbe TO i_inv.
    APPEND i_inv.
    ENDAT.
    CLEAR i_inv.
    ENDLOOP.
    SORT i_inv BY ebeln ebelp.
    break-point.
    ENDIF.
    ENDIF.
    Move the Vendor Name and Invoice Values to I_rep Internal Table
    LOOP AT i_po.
    MOVE-CORRESPONDING i_po TO i_rep.
    CLEAR i_inv.
    READ TABLE i_inv WITH KEY ebeln = i_po-ebeln
    ebelp = i_po-ebelp.
    IF sy-subrc = 0.
    i_rep-orewr = ( i_po-menge - i_inv-menge ) * i_po-netpr.
    i_rep-curr = i_inv-waers.
    ELSE.
    i_rep-orewr = i_po-menge * i_po-netpr.
    i_rep-curr = i_po-waers.
    ENDIF.
    break-point.
    Get the Vendor Name
    CLEAR lfa1-name1.
    SELECT SINGLE name1 FROM lfa1 INTO lfa1-name1
    WHERE lifnr = i_po-lifnr.
    IF sy-subrc = 0.
    i_rep-name1 = lfa1-name1.
    ENDIF.
    APPEND i_rep.
    CLEAR i_rep.
    break-point.
    ENDLOOP.
    SORT i_rep BY lifnr ebeln ebelp.
    DELETE i_rep WHERE orewr LE 0.
    break-point.
    ENDFORM. " fetch_data
    *& Form display_data
    Display the Report Output data
    FORM display_data .
    DATA: lv_flag, " New Flag
    lv_rec TYPE i. " No of Records
    CLEAR lv_rec.
    IF i_rep[] IS INITIAL.
    MESSAGE e000 WITH 'No Data found'(022).
    ELSE.
    LOOP AT i_rep.
    Toggle Color
    PERFORM toggle_color.
    IF lv_flag space.
    NEW-LINE.
    ENDIF.
    At New Purchase Document
    AT NEW ebeln.
    WRITE:/1 sy-vline, 2(10) i_rep-ebeln INTENSIFIED OFF.
    lv_flag = c_x.
    lv_rec = lv_rec + 1.
    ENDAT.
    WRITE: 1 sy-vline,
    12 sy-vline,13(4) i_rep-bsart,
    17 sy-vline,18(10) i_rep-lifnr,
    28 sy-vline,29(35) i_rep-name1,
    64 sy-vline,65(4) i_rep-ekgrp,
    69 sy-vline,70(10) i_rep-bedat,
    80 sy-vline,81(5) i_rep-ebelp,
    86 sy-vline,87(40) i_rep-txz01,
    127 sy-vline,128(9) i_rep-matkl,
    137 sy-vline,138(1) i_rep-pstyp,
    139 sy-vline,140(1) i_rep-knttp,
    141 sy-vline,142(4) i_rep-werks,
    146 sy-vline,147(4) i_rep-lgort,
    151 sy-vline,152(13) i_rep-menge UNIT i_rep-meins,
    165 sy-vline,166(3) i_rep-meins,
    169 sy-vline,170(15) i_rep-netpr CURRENCY i_rep-waers,
    185 sy-vline,186(4) i_rep-waers,
    190 sy-vline,191(5) i_rep-peinh,
    196 sy-vline,197(4) i_rep-bprme,
    201 sy-vline,202(15) i_rep-orewr CURRENCY i_rep-curr,
    217 sy-vline,218(4) i_rep-curr,
    222 sy-vline,223(7) i_rep-bstyp centered,
    230 sy-vline.
    NEW-LINE.
    hide: i_rep-ebeln.
    ENDLOOP.
    ULINE.
    FORMAT COLOR OFF.
    WRITE : /2 'Total Number of Purchasing Documents:'(025) COLOR 3,
    lv_rec COLOR 3.
    ENDIF.
    ENDFORM. " display_data
    *& Form header
    Write the Report Header
    FORM header .
    FORMAT RESET.
    header
    WRITE:/1(230) 'LIST OF PURCHASE DOCUMENTS PER VENDOR'(006) CENTERED.
    SKIP.
    FORMAT COLOR COL_HEADING.
    ULINE.
    WRITE:/1 sy-vline,2(10) 'Pur.Doc.No'(006) CENTERED,
    12 sy-vline,13(4) 'Type'(007),
    17 sy-vline,18(10) 'Vendor'(008) CENTERED,
    28 sy-vline,29(35) 'Name'(009) CENTERED,
    64 sy-vline,65(4) 'PGrp'(010) CENTERED,
    69 sy-vline,70(10) 'Doc.Date'(012) CENTERED,
    80 sy-vline,81(5) 'Item'(011),
    86 sy-vline,87(40) 'Material Short Text'(024) CENTERED,
    127 sy-vline,128(9) 'Mat.Group'(013),
    137 sy-vline,138(1) 'I',
    139 sy-vline,140(1) 'A',
    141 sy-vline,142(4) 'Plnt'(014),
    146 sy-vline,147(4) 'SLoc'(015),
    151 sy-vline,152(13) 'Quantity'(016) CENTERED,
    165 sy-vline,166(3) 'UoM'(017),
    169 sy-vline,170(15) 'Net Value'(018) CENTERED,
    185 sy-vline,186(4) 'Curr'(019),
    190 sy-vline,191(5) 'Per'(020),
    196 sy-vline,197(4) 'Unit'(021),
    201 sy-vline,202(15) 'To be Invoiced'(023) CENTERED,
    217 sy-vline,218(4) 'Curr'(019),
    222 sy-vline,223(7) 'Doc.Cat'(026),
    230 sy-vline.
    ULINE.
    ENDFORM. " header
    *& Form toggle_color
    This routine alters the color of the records in the list
    FORM toggle_color.
    IF gv_dial = space.
    FORMAT COLOR COL_NORMAL INTENSIFIED OFF.
    gv_dial = c_x.
    ELSE.
    FORMAT COLOR 1 INTENSIFIED OFF.
    CLEAR gv_dial.
    ENDIF.
    ENDFORM. " toggle_color
    *& Form LINE_SEL
    *When double clicked on EBELN field display the details of Purchase Doc
    FORM line_sel.
    CASE sy-lsind.
    WHEN '1'.
    DATA: lv_field(20),
    lv_value(10),
    lv_bstyp like i_rep-bstyp.
    clear: lv_bstyp,lv_value, lv_field.
    GET CURSOR FIELD lv_field VALUE lv_value.
    IF lv_field = 'I_REP-EBELN'.
    IF NOT lv_value IS INITIAL.
    READ LINE sy-index FIELD VALUE i_rep-bstyp
    INTO lv_bstyp.
    READ CURRENT LINE FIELD VALUE i_rep-bstyp INTO lv_bstyp.
    if lv_bstyp = 'F'.
    SET PARAMETER ID 'BES' FIELD lv_value.
    CALL TRANSACTION 'ME23N' AND SKIP FIRST SCREEN.
    elseif ( lv_bstyp = 'K' or lv_bstyp = 'L' ).
    SET PARAMETER ID 'VRT' FIELD lv_value.
    CALL TRANSACTION 'ME33' AND SKIP FIRST SCREEN.
    elseif lv_bstyp = 'A'.
    SET PARAMETER ID 'ANF' FIELD lv_value.
    CALL TRANSACTION 'ME43' AND SKIP FIRST SCREEN.
    endif.
    ENDIF.
    ENDIF.
    ENDCASE.
    ENDFORM. " line_sel
    kindly reward if helpful.
    cheers,
    Hema.

  • XML Purchase Order Example

    Here are the XML files define an instance of a purchase order and the type definition files and ClassDomains required to define the Purchase Order in iFS
    <?xml version="1.0" standalone="yes"?>
    <PurchaseOrder>
    <REFERENCE>AMILLER:20000328-091508137</REFERENCE>
    <REQUESTER>Angela B. Miller</REQUESTER>
    <USERID>amiller</USERID>
    <COSTCENTER>A10</COSTCENTER>
    <PONUMBER/>
    <SHIPPINGINSTRUCTIONS>
    <SHIPTONAME>George King</SHIPTONAME>
    <ADDRESS>500 Oracle Parkway MS 5op-12 Redwood Shores CA 94065</ADDRESS>
    <PHONE>650 506 7000</PHONE>
    </SHIPPINGINSTRUCTIONS>
    <SPECIALINSTRUCTIONS>Please Expidite this order</SPECIALINSTRUCTIONS>
    <REJECTION>
    <REJECTEDBY/>
    <COMMENTS/>
    </REJECTION>
    <ACTIONS>
    <ACTION>
    <ACTIONEDBY>eclark</ACTIONEDBY>
    <DATEACTIONED/>
    </ACTION>
    </ACTIONS>
    <LINEITEMS>
    <LINEITEM>
    <ITEMNUMBER>1</ITEMNUMBER>
    <QUANTITY>1</QUANTITY>
    <UNITPRICE>2999.0</UNITPRICE>
    <ITEMDESCRIPTION>Dell Laptop CPIx</ITEMDESCRIPTION>
    </LINEITEM>
    <LINEITEM>
    <ITEMNUMBER>2</ITEMNUMBER>
    <QUANTITY>2</QUANTITY>
    <UNITPRICE>299.0</UNITPRICE>
    <ITEMDESCRIPTION>Dell Battery</ITEMDESCRIPTION>
    </LINEITEM>
    <LINEITEM>
    <ITEMNUMBER>3</ITEMNUMBER>
    <QUANTITY>2</QUANTITY>
    <UNITPRICE>250.0</UNITPRICE>
    <ITEMDESCRIPTION>Dell Expansion Bay</ITEMDESCRIPTION>
    </LINEITEM>
    </LINEITEMS>
    </PurchaseOrder>
    Purchase Order Type Definition
    <?xml version="1.0" standalone="yes"?>
    <CLASSOBJECT>
    <NAME>PurchaseOrder</NAME>
    <SUPERCLASS REFTYPE="name">Document</SUPERCLASS>
    <DESCRIPTION>Internet Purchase Order</DESCRIPTION>
    <BEANCLASSPATH>ifs.demo.purchaseOrder.type.PurchaseOrder</BEANCLASSPATH>
    <ATTRIBUTES>
    <ATTRIBUTE>
    <NAME>Reference</NAME>
    <DATATYPE>String</DATATYPE>
    <DATALENGTH>64</DATALENGTH>
    </ATTRIBUTE>
    <ATTRIBUTE>
    <NAME>Requester</NAME>
    <DATATYPE>String</DATATYPE>
    <DATALENGTH>48</DATALENGTH>
    </ATTRIBUTE>
    <ATTRIBUTE>
    <NAME>UserID</NAME>
    <DATATYPE>String</DATATYPE>
    <DATALENGTH>32</DATALENGTH>
    </ATTRIBUTE>
    <ATTRIBUTE>
    <NAME>CostCenter</NAME>
    <DATATYPE>String</DATATYPE>
    <DATALENGTH>3</DATALENGTH>
    </ATTRIBUTE>
    <ATTRIBUTE>
    <NAME>Vendor</NAME>
    <DATATYPE>String</DATATYPE>
    <DATALENGTH>32</DATALENGTH>
    </ATTRIBUTE>
    <ATTRIBUTE>
    <NAME>PONumber</NAME>
    <DATATYPE>Integer</DATATYPE>
    </ATTRIBUTE>
    <ATTRIBUTE>
    <NAME>ShippingInstructions</NAME>
    <DATATYPE>PublicObject</DATATYPE>
    <CLASSDOMAIN REFTYPE="name">
    PurchaseOrderShippingInstructionsDomain
    </CLASSDOMAIN>
    </ATTRIBUTE>
    <ATTRIBUTE>
    <NAME>Rejection</NAME>
    <DATATYPE>PublicObject</DATATYPE>
    <CLASSDOMAIN REFTYPE="name">
    PurchaseOrderRejectionDomain
    </CLASSDOMAIN>
    </ATTRIBUTE>
    <ATTRIBUTE>
    <NAME>Actions</NAME>
    <DATATYPE>PublicObject_Array</DATATYPE>
    <CLASSDOMAIN REFTYPE="name">
    PurchaseOrderActionDomain
    </CLASSDOMAIN>
    </ATTRIBUTE>
    <ATTRIBUTE>
    <NAME>SpecialInstructions</NAME>
    <DATATYPE>String</DATATYPE>
    <DATALENGTH>2048</DATALENGTH>
    </ATTRIBUTE>
    <ATTRIBUTE>
    <NAME>LineItems</NAME>
    <DATATYPE>PublicObject_Array</DATATYPE>
    <CLASSDOMAIN REFTYPE="name">
    PurchaseOrderLineItemDomain
    </CLASSDOMAIN>
    </ATTRIBUTE>
    </ATTRIBUTES>
    </CLASSOBJECT>
    Purchase Order Action
    <?xml version="1.0" standalone="yes"?>
    & lt;CLASSOBJECT>
    <NAME>PurchaseOrderAction</NAME>
    <SUPERCLASS REFTYPE="name">ApplicationObject</SUPERCLASS>
    <DESCRIPTION>Internet Purchase Order</DESCRIPTION>
    <BEANCLASSPATH>ifs.demo.purchaseOrder.type.PurchaseOrderAction</BEANCLASSPATH>
    <DATABASEOBJECTNAME>POActionHistory</DATABASEOBJECTNAME>
    <ATTRIBUTES>
    <ATTRIBUTE>
    <NAME>ActionedBy</NAME>
    <DATATYPE>String</DATATYPE>
    <DATALENGTH>32</DATALENGTH>
    </ATTRIBUTE>
    <ATTRIBUTE>
    <NAME>DateActioned</NAME>
    <DATATYPE>date</DATATYPE>
    </ATTRIBUTE>
    </ATTRIBUTES>
    </CLASSOBJECT>
    Purchase Order Action Domain
    <?xml version="1.0" standalone="yes"?>
    <CLASSDOMAIN>
    <NAME>PurchaseOrderActionDomain</NAME>
    <DOMAINTYPE>1</DOMAINTYPE>
    <CLASSES>
    <CLASS REFTYPE="name">PurchaseOrderaction</CLASS>
    </CLASSES>
    </CLASSDOMAIN>
    Purchase Order Rejection
    <?xml version="1.0" standalone="yes"?>
    <CLASSOBJECT>
    <NAME>PurchaseOrderRejection</NAME>
    <SUPERCLASS REFTYPE="name">ApplicationObject</SUPERCLASS>
    <DESCRIPTION>Internet Purchase Order</DESCRIPTION>
    <DATABASEOBJECTNAME>PORejection</DATABASEOBJECTNAME>
    <BEANCLASSPATH>ifs.demo.purchaseOrder.type.PurchaseOrderRejection</BEANCLASSPATH>
    <ATTRIBUTES>
    <ATTRIBUTE>
    <NAME>RejectedBy</NAME>
    <DATATYPE>String</DATATYPE>
    <DATALENGTH>32</DATALENGTH>
    </ATTRIBUTE>
    <ATTRIBUTE>
    <NAME>DateRejected</NAME>
    <DATATYPE>date</DATATYPE>
    </ATTRIBUTE>
    <ATTRIBUTE>
    <NAME>Comments</NAME>
    <DATATYPE>String</DATATYPE>
    <DATALENGTH>2048</DATALENGTH>
    </ATTRIBUTE>
    </ATTRIBUTES>
    </CLASSOBJECT>
    Purchase Order Rejection Domain
    <?xml version="1.0" standalone="yes"?>
    <CLASSDOMAIN>
    <NAME>PurchaseOrderRejectionDomain</NAME>
    <DOMAINTYPE>1</DOMAINTYPE>
    <CLASSES>
    <CLASS REFTYPE="name">PurchaseOrderRejection</CLASS>
    </CLASSES>
    </CLASSDOMAIN>
    Purchase Order Shipping Instruction
    <?xml version="1.0" standalone="yes"?>
    <CLASSOBJECT>
    <NAME>PurchaseOrderShippingInstructions</NAME>
    <SUPERCLASS REFTYPE="name">ApplicationObject</SUPERCLASS>
    <DESCRIPTION>Internet Purchase Order</DESCRIPTION>
    <DATABASEOBJECTNAME>POShipInst</DATABASEOBJECTNAME>
    <BEANCLASSPATH>ifs.demo.purchaseOrder.type.PurchaseOrderShippingInstructions</BEANCLASSPATH>
    <ATTRIBUTES>
    <ATTRIBUTE>
    <NAME>ShipToName</NAME>
    <DATATYPE>String</DATATYPE>
    <DATALENGTH>48</DATALENGTH>
    </ATTRIBUTE>
    <ATTRIBUTE>
    <NAME>Address</NAME>
    <DATATYPE>String</DATATYPE>
    <DATALENGTH>512</DATALENGTH>
    </ATTRIBUTE>
    <ATTRIBUTE>
    <NAME>Phone</NAME>
    <DATATYPE>String</DATATYPE>
    <DATALENGTH>32</DATALENGTH>
    </ATTRIBUTE>
    </ATTRIBUTES>
    </CLASSOBJECT>
    Purchase Order Shipping Instruction Domain
    <?xml version="1.0" standalone="yes"?>
    <CLASSDOMAIN>
    <NAME>PurchaseOrderShippingInstructionsDomain</NAME>
    <DOMAINTYPE>1</DOMAINTYPE>
    <CLASSES>
    <CLASS REFTYPE="name">PurchaseOrderShippingInstructions</CLASS>
    </CLASSES>
    </CLASSDOMAIN>
    Purchase Order Line Item
    <?xml version="1.0" standalone="yes"?>
    <CLASSOBJECT>
    <NAME>PurchaseOrderLineItem</NAME>
    <SUPERCLASS REFTYPE="name">ApplicationObject</SUPERCLASS>
    <DESCRIPTION>Internet Purchase Order</DESCRIPTION>
    <BEANCLASSPATH>ifs.demo.purchaseOrder.type.PurchaseOrderLineItem</BEANCLASSPATH>
    <DATABASEOBJECTNAME>POLineItem</DATABASEOBJECTNAME>
    <ATTRIBUTES>
    <ATT RIBUTE>
    <NAME>ItemNumber</NAME>
    <DATATYPE>integer</DATATYPE>
    </ATTRIBUTE>
    <ATTRIBUTE>
    <NAME>ItemDescription</NAME>
    <DATATYPE>string</DATATYPE>
    <DATALENGTH>128</DATALENGTH>
    </ATTRIBUTE>
    <ATTRIBUTE>
    <NAME>Quantity</NAME>
    <DATATYPE>integer</DATATYPE>
    </ATTRIBUTE>
    <ATTRIBUTE>
    <NAME>UnitPrice</NAME>
    <DATATYPE>double</DATATYPE>
    </ATTRIBUTE>
    </ATTRIBUTES>
    </CLASSOBJECT>
    Purhcase Order Line Item Domain
    <?xml version="1.0" standalone="yes"?>
    <CLASSDOMAIN>
    <NAME>PurchaseOrderLineItemDomain</NAME>
    <DOMAINTYPE>1</DOMAINTYPE>
    <CLASSES>
    <CLASS REFTYPE="name">PurchaseOrderLineItem</CLASS>
    </CLASSES>
    </CLASSDOMAIN>
    null

    Hi,
    i put the example into my ifs - (it works) - but i have 2 questions:
    1.) when i look at the ifs-schema - for example ODBMS-PURCHASEORDER - i found reference-id's to REJECTIONS, SHIPPINGINSTRUNCTIONS.. but for the attributs with the datatype PublicObject_Array i found only the number of items inside. In which way is the relationship handled ??
    2.) where can i found the referenced classes from your example ?
    TIA
    Oliver

  • At the time of Purchase order creation Material specification how to trace

    Dear all,
    I have an one issue,
    when ever i am creating Purchase order for any material to vendor, the particular material quality specification or Ins plan automatically to flow to purchase order.
    how to address this issue, wheather it is possible or not
    Regards,
    s.sakthivel

    Hi,
    For your requirement only for viewing the data I suggest you to go for below options
    1) In mtrl master itself there is one option Inspection text, here u can maintain the main values so thst during PO
    you can refer these values (To find this click on aditional data tab in mtrl master and inspection long text)
    2) Prepare one report by fetching all the inspection values from below tables so that u can aslo refer this report
       PLKO Inspection plan Header 
       MAPL Material Assignement 
       PLPO Operation Details 
       PLMK Inspection plan characteristics 
       PLMW MAPL-Dependent Charac. Specifications (Inspection Plan) 
    Regards
    Shiva

  • No Matching Record Found 'CRD1' at the time of Purchase Order Creation

    Hi !
    I have transferred business partners record through DTW 2005.0.17 in SAP B1. Now when I go to make purchase order, at the time of selecting business partner, It gives error msg. No matching record found 'CRD1'. I have checked the table CRD1, there the data exists. And when i modify business partner's address through business partner form, the problem is solved. I am not able to trace which value i am missing at the time of data transfer.
    can anyone help?
    Anupam Negi
    [email protected]

    thanks jimmy,
    I tried as per your suggestion, i deleted the following tables OCRD,ACR1,ACRB,ACR3,CRD1,ACRD,ACR2,CRD2,CRD5,CRD3,CRD7, then again imported the BP records. Its still giving the same error. I have imported the Business Partner Main template & Business partner Address template. Is it neccassary to import all other templates i.e. BPNankAccount,BPPaymentDate,BPPaymentMethod,ContactEmployees

Maybe you are looking for

  • Getting FRM-40400 but data is not in table

    I have a form with three data blocks. The first one is Database Data Block = no because it is used for query purposes only. The second one is Database Data Block = yes and is the only data block in which data gets entered into a table. The final data

  • HP Laserjet 1300 installation problem

    Has anyone sucessfully used an HP laserjet 1300n with OS9? If so, how did you install it so it worked correctly. I can't get the desktop printer utility to see it in the select USB printer dialog box. I had already installed the drivers from HP's web

  • DNG Converter 6.7 release candidate

    Which version of the Mac OS is required to run the Adobe DNG Converter 6.7 release candidate application? I have successfully installed it, but seem unable to open it. The converter icon is sitting right there in my Applications folder, but it will n

  • Where can i find dms metrics stored in the server?

    hi, where will be the dms metrics be stored inside the server.how does a spy retrives those data metrics. This is very important.if anyone can answer it will be of great help to us. thank you

  • Why does emac eject tiger DVD?

    I am trying to update my OS from 10.2.8 to Tiger. I have an emac G4 with its original DVD CD-RW/DVD-ROM (vendor: HL-DT-ST). When I click restart to run the installation, before the computer shuts down, it shows "you have inserted a disk containing no