Is there a link between the Journal tables and the Marketing Document tables?

Hi Everyone,
Is there a link back from the Journal Tables (e.g.: OJDT and / or JDT1) to the Marketing Documents tables (e.g.: OINV and / or INV1)?
If there is a link can you please let me know what it is?
Kind Regards,
David

David..
Try This
Select T1.RefDate,
Case
When T1.TransType=13 Then 'Invoice'
When T1.TransType=14 Then 'A/R Credit Memo'
When T1.TransType=15 Then 'Delivery Note'
When T1.TransType=16 Then 'Delivery Return'
When T1.TransType=162 Then 'Stock Revaluation'
When T1.TransType=18 Then 'Purchase Bill'
When T1.TransType=19 Then 'A/P Credit Memo'
When T1.TransType=20 Then 'GRPO'
When T1.TransType=202 Then 'Work Order'
When T1.TransType=21 Then 'Goods Return'
When T1.TransType=24 Then 'Incoming Payment'
When T1.TransType=30 Then 'Journal'
When T1.TransType=46 Then 'Outgoing Payment'
When T1.TransType=59 Then 'Goods Receipt'
When T1.TransType=60 Then 'Goods Issue'
When T1.TransType=67 Then 'Stock Transfer'
Else T1.TransType
End [TransType],
T1.TransId,
Case
-- Sales A/R
When T1.TransType = 13 Then (Select isnull(Comments, '') From OINV Where DocNum = T1.BaseRef and CardCode = T1.ShortName) -- Invoice
When T1.TransType = 14 Then (Select isnull(Comments, '') From ORIN Where DocNum = T1.BaseRef and CardCode = T1.ShortName) -- A/R Credit Memo
When T1.TransType = 15 Then (Select isnull(Comments, '') From ODLN Where DocNum = T1.BaseRef and CardCode = T1.ShortName) -- Delivery
When T1.TransType = 16 Then (Select isnull(Comments, '') From ORDN Where DocNum = T1.BaseRef and CardCode = T1.ShortName) -- Delivery Return
-- Purchase A/P
When T1.TransType = 18 Then (Select isnull(Comments, '') From OPCH Where DocNum = T1.BaseRef and CardCode = T1.ShortName) -- Purchase Bill
When T1.TransType = 19 Then (Select isnull(Comments, '') From ORPC Where DocNum = T1.BaseRef and CardCode = T1.ShortName) -- A/P Credit Memo
When T1.TransType = 20 Then (Select isnull(Comments, '') From OPDN Where DocNum = T1.BaseRef and CardCode = T1.ShortName) -- GRPO
When T1.TransType = 21 Then (Select isnull(Comments, '') From ORPD Where DocNum = T1.BaseRef and CardCode = T1.ShortName) -- Goods Return
-- Production
When T1.TransType = 202 Then (Select isnull(Comments,'') From OWOR Where DocNum = T1.BaseRef and PostDate = T1.RefDate) -- Work Order
-- Banking
When T1.TransType = 24 Then (Select isnull(Comments, '') From ORCT Where DocNum = T1.BaseRef and CardCode = T1.ShortName) -- Incoming Payment
When T1.TransType = 46 Then (Select isnull(Comments, '') From OVPM Where DocNum = T1.BaseRef and CardCode = T1.ShortName) -- Outgoing Payment
When T1.TransType = 30 Then (Select ISNULL(LineMemo, '') From JDT1 Where Ref1 = T1.Ref1 and ShortName = T1.ShortName) --  Journal
-- Inventory
When T1.TransType = 59 Then (Select ISNULL(Comments, '') From OIGE Where DocNum = T1.Ref1 and DocDate = T1.RefDate) -- Goods Receipt
When T1.TransType = 60 Then (Select ISNULL(Comments, '') From OIGN Where DocNum = T1.Ref1 and DocDate = T1.RefDate) -- Goods Issue
When T1.TransType = 67 Then (Select ISNULL(Comments, '') From OWTR Where DocNum = T1.Ref1 and DocDate = T1.RefDate) -- Stock Transfer
When T1.TransType = 162 Then (Select ISNULL(Comments, '') From OMRV Where DocNum = T1.Ref1 and DocDate = T1.RefDate) -- Stock Revaluation
Else ''
End [Remarks],
T1.LineMemo,
Case
When exists (Select AcctCode From OACT Where AcctCode = T1.ContraAct)
Then (Select AcctName From OACT Where AcctCode = T1.ContraAct)
else (Select CardName From OCRD Where CardCode = T1.ContraAct)
End [Account],
Case
When T1.Debit=0.0
Then 0.0
Else T1.Debit
End Debit,
Case
When T1.Credit=0.0
  Then 0.0
Else T1.Credit
End Credit
From JDT1 T1
Where T1.TransType <> -3
And T1.RefDate Between @FromDate and @ToDate
And T1.ShortName = @Account
Order By T1.RefDate,
T1.TransId
Regards
Kennedy

Similar Messages

  • I did re-set my password and when I click on Install for Mavericks, I still get a box for "administrator password" and it still won't accept my new password. Is there a difference between my Apple ID and the administrator password they're asking for?

    I downloaded Mavericks and it won't install. I did re-set my password and when I click on Install for Mavericks, I still get a box for "administrator password" and it still won't accept my new password. Is there a difference between my Apple ID and the administrator password they're asking for? I never had an administrator password-- I just hit enter and have never had a problem before with previous installations. I'm on an iMac, from 2007, running Mt. Lion (version 10.8.5). I've been looking for other's posts who may be having the same problem, but haven't found any. Can anyone help?

    Ugh. The 'no password, no work' thing is a recent Apple development. I ran into it on my system and ended up having to do a clean install on a partition I fully erased.
    I suppose, if you have the ability to, go online and look up how to burn a bootable DVD image. Download the 10.8.4 image then use the Disk Utility to make a boot image of it. You'll need a dual-layer DVD or a USB drive (or memory stick at least 8GB) If you've got an optical drive, burn the disk, if you've a USB device, use that.
    Then get a pocket drive and copy your important files off the system or let Time Machine do a full backup.
    When the backup is done, insert the disk and hold down the C key until the machine boots off of the DVD. At the point you get to the start window, go to the menu and choose the Disk Utility.
    In the Disk Utility, reformat the drive. You go to the actual DRIVE (not the Macintosh HD, but the root above it that is the actual hard drive device)
    I always do this and *partition* it into several volumes, the benefit being, you can store all of your music, documents and importans stuff on that secondary storage volume you make - it will have it's own index and then the first volume is where you put the OS and it will have it's own index as well. That way, if the OS throws a wobbler and you need to reinstall, you don't lose your data.
    Depending on the size of your hard drive, it is good to give your OS partition at least 60GB and optimally 100GB, and the rest for storage.
    Name your volumes, use the little box sliders to manually size them or put that number in the size window, select for the format, Mac OS Extended (Journaled) and hit Apply and then the Disk Utility will quickly create your new partitions.
    Once finished, quit the Utility and it will return you to the OS installer. Select the volume you want to install to and it should start up and install.
    Once the installation is done, you'll get the new machine startup then you MUST put in a password for the computer. Once you're in, and to the desktop, don't bother with any Mountain Lion updates, go right to the App Store and get the Mavericks update and let it install the app to your Applicaitons folder, then do that install.
    On a side note, there MAY be a way to make a disk image from the Mavericks application and avoid the entire Mountain Lion step.. I honestly do not know, but a bit of hitting the search engines may find out if there is. I think that if you looked for "make Mavericks boot disk or boot image' you may find something.
    Good luck!

  • Link between A/R Invoice and the A/R credit memo

    dear all
    how do we find the link between A/R invoice and it's credit memo from the database level.
    Thanks & Regards
    Kanishka Wickrama

    Hi
    You can link AR Invoice and AR Credit memo through internal reconciliation for that customer.
    Go to banking --> bank reconciliation --> Automatic Reconciliation --> internal reconciliation.
    Regards
    Kamlesh Vagal
    Edited by: kamlesh vagal on Jul 21, 2008 10:59 AM

  • Is there a difference between LR4 full version and the upgrade.

    I purchased the upgrade for LR4. I now have LR3. I want to download and install now and them put in the serial number to license it when it arrives. Is there a difference between installing the full version and the upgrade version. I don't want to screw up my catalog or anything else for that matter.

    There is no difference and you're actually better off downloading and installing rather than installing a shipped version. The download will likely be newer.

  • Link between SD invoice item and corresponding accounting document item

    Hi,
    I have a problem regarding the link between the items of an SD invoice ( or
    credit note ) and those of the corresponding accounting document. There's a
    custom report which extracts information about each credit/debit note
    produced within a certain period. This program has recently failed due to a
    particular case: a credit note was generated starting by two note requests;
    in other terms, cardinality: 1:N exists between the credit note and the
    request document. Currently, the program generates duplicated records in
    this case, because of the following schema:
    -> main loop on VBAK data ( request document header data )
       -> inner loop on BSEG data ( accounting document items );
    our current access criteria in reading tb_bseg is only:
    ... where tb_bseg-belnr = tb_vbrk-vbeln.
    Providing that tb_vbrk-vbeln doesn't differ and that both tb_vbak and tb_bseg
    contain two records ( the two requests the first and the two accounting
    document items the second ), the program fails as follows:
    ° first request  -> two lines
    ° second request -> two lines.
    Is there any way to link each invoice item with the corresponding credit
    note item?
    Thanks in advance to all of you.
    Adrian.

    Hi,
    I have a problem regarding the link between the items of an SD invoice ( or
    credit note ) and those of the corresponding accounting document. There's a
    custom report which extracts information about each credit/debit note
    produced within a certain period. This program has recently failed due to a
    particular case: a credit note was generated starting by two note requests;
    in other terms, cardinality: 1:N exists between the credit note and the
    request document. Currently, the program generates duplicated records in
    this case, because of the following schema:
    -> main loop on VBAK data ( request document header data )
       -> inner loop on BSEG data ( accounting document items );
    our current access criteria in reading tb_bseg is only:
    ... where tb_bseg-belnr = tb_vbrk-vbeln.
    Providing that tb_vbrk-vbeln doesn't differ and that both tb_vbak and tb_bseg
    contain two records ( the two requests the first and the two accounting
    document items the second ), the program fails as follows:
    ° first request  -> two lines
    ° second request -> two lines.
    Is there any way to link each invoice item with the corresponding credit
    note item?
    Thanks in advance to all of you.
    Adrian.

  • Is there a difference between apple app store and the mac app store

    i keep hearing about the mac app store, is there a difference between that and the regualr app store i use for iphone         

    Depends upon to whom you are speaking. There is the iTunes Store, sometimes called the App Store, from which Apple vends apps for iPhones, iPads, and iPods. Then there is the Mac App Store, MAS, also sometimes referred to as the App Store rather than the Mac App Store where Apple vends software for Mac computers.

  • Is anyone else having trouble with linking between Xfinity Comcast email and the new iOS7 on iPhone 4s ?

    I downloaded the new iOS7 update for my iPad and iPhone 4s today.  Everything works fine on both devices EXCEPT I get my Comcast emails but when I attempt to reply and send I get a message telling me it is not the correct STMP address/password.
    I called Apple Support, they tried a number of things with me then suggested I call Comcast. Comcast charged me $49.95 to get tech support only to be told in 3 minutes or less: " sorry, it seems Comcast Xfinity and iOS7 upgrade are not communicating on iPhones.
    They then told me to download the Xfinity mobile app and utilize my emails from there.
    Totally inconvenient !
    Is it an Apple fix or Comcast ?
    Thanks
    Jo

    See the tip here,
    https://discussions.apple.com/message/20096362#20096362
    And here's Comcast's guide to email
    http://customer.comcast.com/help-and-support/internet/email-client-programs-with -xfinity-email/
    So comcast charges $50 to get POP/SMTP setup instructions?
    That's annoying...

  • What is the link between iphone's IOS and the iTunes version?

    Hi, I have an iPhone 3gs using IOS 4.1. I do not want to upgrade this. What Itunes version is compatible w/ this? Can I keep the IOS and just make all updates in iTunes, or the newer versions do not work w/ IOS 4.1?

    This looks like an Oracle Financials question.
    I don't think anyone here can answer that.
    You need to look for a Financials or E-business forum.
    Sybrand Bakker
    Senior Oracle DBA

  • Link between schedule Line Number and Delivery

    Is there a link between Schedule line Number and Delivery number ?
    Eg. Line item 10 with quantity 100. 
    has 5 schedule lines..with 5 different delivery dates.
    1 .  quanity 40
    2.   quantity 30
    3.   quantity 20
    4.   quanity  6
    5    quantity  4
    For schedule line 1, 2 deliveries were created,
    one      with quantity 20
    another with quantity 15
    quantity 5 is still not delivered.
    also schedule lines 2,3,4 and 5 are fully delivered.
    Is there any table, FM etc in SAP which will give me the link between the schedule line and delivery number ?
    Total deliveries created : 6. - But which delivery corresponds to which schedule line ?
    Please dont tell me to look VGBEL and VGPOS.. that will just give line item number 10.. I need to get the schedule line number.
    Also, RV_SCHEDULE_CHECK_DELIVERIES --> will give me the delivered quantity against each schedule line.
    My purpose is to create an ontime delivery report .
    a report which list each schedule lines, and tell, how many shipments were late/ontime/early etc..
    and for Late ones, how many days late has to be found.
    this is where i need the delivery.
    No. Of days Late = Actual GI Date - Planned GI Date.
    Actual GI date is in the delivery.
    Any suggestions ?
    Thank you in advance.

    Hi,
    Check in the below link.
    relation between VBEP-ETENR and LIKP-VBELN
    Thanks,
    Sree.

  • Link Between Sales Order Type and Customer/Material Exclusion

    Hi,
    Any one know the  Link Between Sales Order Type  and Customer/Material exclusion tables (Transaction: VB03 ) ?

    Hello,
    For Tcode VB03 you can check KOTG001 for Customer/Material.
    Thanks &Regards,
    Abhijit

  • Is there any link between oe_order_headers_all and hz_cust_accounts tables. I need to find the cust_account_id for some order_number. Please help me with this

    Is there any link between oe_order_headers_all and hz_cust_accounts tables. I need to find the cust_account_id for some order_number. Please help me with this

    you can link
    OOH.invoice_to_org_id=CUST.cust_account_id   -- invoice customer
    OOH.sold_to_org_id=CUST.cust_account_id   -- sold to customer
    OOH.ship_to_org_id=CUST.cust_account_id   -- ship to customer

  • How to get the link between mara, ausp, cawn and cawnt tables

    hello ABAPERS
    i have got a requiremet in that i have to get the relation .
    how to get the link between mara, ausp, cawn and cawnt tables and also type how can we get link between  char value and char description in cawn and cawnt tables through ausp and mara tables.
    I would be very thankful  for ur help in advance.
    Thanks & Regards.
    soni

    Hi,
    Sample report using the linkage between tables;
    report batch_char no standard page heading
                              line-size  132
                              line-count 58(1)
                              message-id mm.
           Report by Batch Characteristic                                *
    Description          : Report by Batch Characteristic                *
    Declaration for Tables
    tables: mara,    " Material Master
            mard,    " Storage Location Data for Material
            t001w,   " Plants/Branches
            t001l,   " Storage Locations
            cabn,    " Characteristics
            inob.    " Link between Internal Number and Object
    Declaration for Constants
    constants : c_klart like ausp-klart value '023',     " Class Type
                c_obtab like inob-obtab value 'MCH1',    " Database Table
                c_flag  type c          value 'X',       " Flag
                c_c23   type i          value '23',      " Ratio
    Constants for Ratio Categories
                c_13    type p decimals 2 value '13.00', " For Ratio 13
                c_1499  type p decimals 2 value '14.99', " For Ratio 14.99
                c_15    type p decimals 2 value '15.00', " For Ratio 15
                c_1699  type p decimals 2 value '16.99', " For Ratio  16.99
                c_17    type p decimals 2 value '17.00', " For Ratio 17
                c_1899  type p decimals 2 value '18.99', " For Ratio 18.99
                c_19    type p decimals 2 value '19.00', " For Ratio 19
                c_2099  type p decimals 2 value '20.99', " For Ratio 20.99
                c_21    type p decimals 2 value '21.00', " For Ratio 21
                c_2299  type p decimals 2 value '22.99', " For Ratio 22.99
                c_23    type p decimals 2 value '23.00', " For Ratio 23
                c_g23(4) type c value '>=23',            " For Ratio >=23
                c_ratio(5) value 'RATIO',                  " For Ratio
    Constants for Storing Selected item field information
                c_cursor1(15) value 'I_OUTPUT1-MEINS',   " For Selected Base
                                                         " Unit of Measure
                c_cursor2(15) value 'I_OUTPUT1-MATNR',   " For Selected Base
                                                         " Material Number
                c_cursor3(15) value 'I_OUTPUT1-MAKTX',   " For Selected Base
                                                         " Material Des.
                c_cursor4(15) value 'I_OUTPUT1-CLABS',   "For Selected Base
                                                         " Stock Value
                c_cursor5(15) value 'I_OUTPUT1-ATFLV',   " For Selected Base
                                                        " Char.Value (Ratio)
                c_cursor6(5) value 'C_G23'.
    Declaration for Global Variables
    data : g_exit  type c,                            " Flag
           g_clabs1(16) type c,                       " Quantity
           g_clabs(18)  type c,                       " Quantity
           g_cursor(15) type c,                       " Cursor field name
           g_matnr     type mara-matnr,               " Material Number
           g_werks     type mchb-werks,               " Plant
           g_atinn(30) type c.                        " Character.
    Declaration for Internal tables
    Internal table to hold Batch Stock data
    data : begin of i_mchb occurs 0,
             matnr like mchb-matnr,      " Material Number
             werks like mchb-werks,      " Plant
             lgort like mchb-lgort,      " Storage Location
             charg like mchb-charg,      " Batch Number
             clabs like mchb-clabs,      " Stock Value
             meins like mara-meins,      " Unit of measure
             atflo like ausp-atflv,      " Char.Value (Ratio)
             atflv like ausp-atflv,      " Char.Value (Ratio)
           end of i_mchb.
    Internal table to hold Secondary List data
    data : begin of i_mchb1 occurs 0,
             werks like mchb-werks,      " Plant
             matnr like mchb-matnr,      " Material Number
             lgort like mchb-lgort,      " Storage Location
             charg like mchb-charg,      " Batch Number
             atinn like ausp-atinn,      " Char.Value
             clabs like mchb-clabs,      " Stock Value
             atflo like ausp-atflv,      " Char.Value (Ratio)
             atflv like ausp-atflv,      " Char.Value (Ratio)
           end of i_mchb1.
    Internal table to get the Plant Name
    data : begin of i_plant occurs 0,
             werks like t001w-werks,     " Plant
             name1 like t001w-name1,     " Name
           end of i_plant.
    Internal table to get the Material Description
    data : begin of i_makt occurs 0,
             matnr like makt-matnr,      " Material
             maktx like makt-maktx,     " Description
           end of i_makt.
    Internal table to hold AUSP data
    data : begin of i_ausp occurs 0,
             objek like ausp-objek,      " Object No
             atinn like cabn-atinn,      " Characteric value
             atflv like ausp-atflv,      " Characteristic Value
           end of i_ausp.
    Internal table to hold output data
    data : begin of i_output occurs 0,
             atinn like cabn-atinn,      " Characteric value
             werks like mchb-werks,      " Plant
             matnr like mchb-matnr,      " Material Number
             atnam like cabn-atnam,      " Characteristic
             atflv like ausp-atflv,      " Char.Value (Ratio)
             name1 like t001w-name1,     " Plant Description
             maktx like makt-maktx,      " Material Description
             clabs like mchb-clabs,      " Stock Value
             meins like mara-meins,      " Base Unit of Measure
           end of i_output.
    Internal table to hold final Output data
    data : begin of i_output1 occurs 0,
             atinn like cabn-atinn,      " Characteric value
             werks like mchb-werks,      " Plant
             matnr like mchb-matnr,      " Material Number
             atnam like cabn-atnam,      " Characteristic
             atflv(32) type c,           " Char.Value (Ratio)
             name1 like t001w-name1,     " Plant Description
             maktx like makt-maktx,      " Material Description
             clabs like mchb-clabs,      " Stock Value
             meins like mara-meins,      " Base Unit of Measure
           end of i_output1.
           Selection screen
    selection-screen begin of block b1 with frame title text-001.
    select-options: s_werks for t001w-werks obligatory,  " Plant
                    s_lgort for t001l-lgort,             " Stor.Location
                    s_matnr for mara-matnr  obligatory,  " Material No
                    s_atinn for cabn-atinn.              " Character.
    selection-screen end of block b1.
    At selection screen
    at selection-screen.
    Validation of Selection Screen Fields
      perform validate_screen.
    Start of selection
    start-of-selection.
    Get the Material and Batch Stock data from MARA and MCHB Tables
      perform get_mat_stock_data.
    Get the Material Group Text and Plant Name from T023T and T001W Tables
      perform get_plant_grp_data.
    Append the data into final Output Internal Table after getting the
    Characteristic Values data from INOB and AUSP Tables
      perform append_final_data.
    Processing if the Characteristics contain 'RATIO'
      perform collect_ratio.
    End-of-Page
    end-of-page.
      write /1(125) sy-uline.
    End of selection
    end-of-selection.
      if g_exit <> c_flag.
    Display the Report Output data
        perform display_report.
      endif.
    Top-of-Page
    top-of-page.
    Write the Report and Column Headings
      perform get_headings.
    at line-selection
    at line-selection.
      if sy-lsind = 1.
        perform display_batch.
      endif.
    Top of page during line-selection
    top-of-page during line-selection.
      perform heading_seclist.
          Form validate_screen
    Validation of Selection Screen fields
    form validate_screen.
    Validation of Plant
      clear t001w.
      if not s_werks[] is initial.
        select werks
          into t001w-werks
          from t001w
          up to 1 rows
          where werks in s_werks.
        endselect.
        if sy-subrc <> 0.
          message e899 with 'Enter Valid Plant'(002).
        endif.
      endif.
    Validation of Material Number
      clear mara.
      if not s_matnr[] is initial.
        select matnr
          into mara-matnr
          from mara
          up to 1 rows
          where matnr in s_matnr.
        endselect.
        if sy-subrc <> 0.
          message e899 with 'Enter Valid Material'(003).
        endif.
      endif.
    Validation of Storage Location
      clear t001l.
      if not s_lgort[] is initial.
        select lgort
          into t001l-lgort
          from t001l
          up to 1 rows
          where lgort in s_lgort.
        endselect.
        if sy-subrc <> 0.
          message e899 with 'Enter Valid Storage Location'(004).
        endif.
      endif.
    Validation of Characteristic Value
      clear cabn.
      if not s_atinn[] is initial.
        select atinn
          into cabn-atinn
          from cabn
          up to 1 rows
          where atinn in s_atinn.
        endselect.
        if sy-subrc <> 0.
          message e899 with 'Enter Valid Characteristic Value'(005).
        endif.
      endif.
    Validation of Plant, Material and Storage Location
      clear mard.
      select matnr werks lgort
        into (mard-matnr, mard-werks, mard-lgort)
        from mard
        up to 1 rows
        where matnr in s_matnr and
              werks in s_werks and
              lgort in s_lgort.
      endselect.
      if sy-subrc <> 0.
        message e899 with 'No Data found for the Selection Criteria'(006).
      endif.
    endform.                          "validate_screen
    *&      Form  get_headings
    Write the Report and Column Headings
    form get_headings.
      data: l_repid type sy-repid.
      l_repid =  sy-repid.
      call function 'Y_STANDARD_HEADING'
           exporting
                repid    = l_repid
                heading1 = sy-title.
      write:/1(125) sy-uline.
      format color col_heading on.
      write : /1  sy-vline,  2(18)   'Material Number'(008) centered,
              20  sy-vline,  21(40)  'Material Description'(011) centered,
              61  sy-vline,  62(22)  'Ratio'(009) centered,
              84  sy-vline,  85(18)  'Quantity'(010) centered,
             103  sy-vline, 104(20)  'Base Unit of Measure'(015) centered,
             125  sy-vline.
      write:/1(125) sy-uline.
      format color off.
    endform.                    "get_headings
    *&      Form  get_mat_stock_data
    Get the Material and Batch Stock data from MARA and MCHB Tables
    form get_mat_stock_data.
      clear: i_mchb,i_output, i_output1.
      refresh: i_mchb,i_output, i_output1.
      select a~matnr       " Material Number
             b~werks       " Plant
             b~lgort       " Storage Location
             b~charg       " Batch Number
             b~clabs       " Stock Value
             a~meins       " Base Unit of Measure
          into table i_mchb
          from mara as a inner join mchb as b
          on amatnr eq bmatnr
          where b~matnr in s_matnr and
                b~werks in s_werks and
                b~lgort in s_lgort.
      if sy-subrc <> 0.
        g_exit = c_flag.
        message s899 with 'No Data found for the Selection Criteria'(006).
        stop.
      endif.
      sort i_mchb by matnr werks lgort charg.
    endform.                    " get_mat_stock_data
    *&      Form  get_plant_grp_data
    Get the Material Group Text and Plant Name from T023T and T001W
    form get_plant_grp_data.
      if not i_mchb[] is initial.
    Get the Plant Description from t001w Table
        clear i_plant.
        refresh i_plant.
        select werks      " Plant
               name1      " Name
          into table i_plant
          from t001w
          for all entries in i_mchb
          where werks = i_mchb-werks.
    Get the Material Description from MAKT Table
        clear i_makt.
        refresh i_makt.
        select matnr      " Material number
               maktx      " Material Description
          into table i_makt
          from makt
          for all entries in i_mchb
          where matnr = i_mchb-matnr and
                spras = sy-langu.
        sort i_plant by werks.
        delete adjacent duplicates from i_plant comparing werks.
        sort i_makt by matnr.
        delete adjacent duplicates from i_makt comparing matnr.
      endif.
    endform.                   "form get_plant_grp_data.
    *&      Form  append_final_data
    Append the data into final Internal Table
    form append_final_data.
      data : l_matbatch(28),
             l_tabix like sy-tabix.
      if not i_mchb[] is initial.
        loop at i_mchb.
          l_tabix = sy-tabix.
          clear l_matbatch.
          concatenate i_mchb-matnr i_mchb-charg into l_matbatch.
          move-corresponding i_mchb to i_output.
    Get the Plant Description from i_plant Table
            read table i_plant with key werks = i_mchb-werks binary search.
            if sy-subrc = 0.
              i_output-name1 = i_plant-name1.
            endif.
    Get the Material Description from i_makt Table
          read table i_makt with key matnr = i_mchb-matnr binary search.
          if sy-subrc = 0.
            i_output-maktx = i_makt-maktx.
          endif.
    Get the Characteristic Values data from INOB and AUSP Tables
          clear inob.
          select single cuobj from inob
              into inob-cuobj
              where klart = c_klart and
                    obtab = c_obtab and
                    objek = l_matbatch.
          if sy-subrc = 0.
            select objek
                   atinn
                   atflv
               from ausp
               into table i_ausp
               where objek = inob-cuobj and
                     atinn in s_atinn   and
                     klart = c_klart.
            sort i_ausp by objek atinn.
            loop at i_ausp.
              clear cabn.
              select single atinn atnam from cabn
                         into (cabn-atinn,cabn-atnam)
                         where atinn = i_ausp-atinn.
              if sy-subrc = 0.
    If the ratio value is between 13-14.99, display 13
                if cabn-atnam cs c_ratio.
                  if i_ausp-atflv between c_13 and c_1499.
                    i_mchb-atflo = i_ausp-atflv.
                    i_mchb-atflv = c_13.
    If the ratio value is between 15-16.99, display 15
                  elseif i_ausp-atflv between c_15 and c_1699.
                    i_mchb-atflo = i_ausp-atflv.
                    i_mchb-atflv = c_15.
    If the ratio value is between 17-18.99, display 17
                  elseif i_ausp-atflv between c_17 and c_1899.
                    i_mchb-atflo = i_ausp-atflv.
                    i_mchb-atflv = c_17.
    If the ratio value is between 19-20.99, display 19
                  elseif i_ausp-atflv between c_19 and c_2099.
                    i_mchb-atflo = i_ausp-atflv.
                    i_mchb-atflv = c_19.
    If the ratio value is between 21-22.99, display 21
                  elseif i_ausp-atflv between c_21 and c_2299.
                    i_mchb-atflo = i_ausp-atflv.
                    i_mchb-atflv = c_21.
    If the ratio value is greater than or equal to 23, display 23
                  elseif i_ausp-atflv >= c_23.
                    i_mchb-atflo = i_ausp-atflv.
                    i_mchb-atflv = c_23.
                  endif.           " Condition for RATIO values
                else.              " If characteristic does contain RATIO
                  i_mchb-atflv = i_ausp-atflv.
                endif.
                i_output-atinn = cabn-atinn.
                i_output-atnam = cabn-atnam.
                i_output-atflv = i_ausp-atflv.
                i_mchb1-matnr = i_mchb-matnr.
                i_mchb1-werks = i_mchb-werks.
                i_mchb1-lgort = i_mchb-lgort.
                i_mchb1-charg = i_mchb-charg.
                i_mchb1-clabs = i_mchb-clabs.
                i_mchb1-atinn = i_ausp-atinn.
                i_mchb1-atflo = i_mchb-atflv.
                i_mchb1-atflv = i_ausp-atflv.
                append : i_output, i_mchb1.
                clear i_mchb1.
                modify i_mchb index l_tabix transporting atflo atflv .
              endif.
            endloop.
          endif.
        endloop.
      endif.
    Checking whether the table is filled or not
      if not i_output[] is initial.
        sort i_output by atinn werks matnr atflv.
      else.
        g_exit = c_flag.
        message s899 with 'No Data found for the Selection Criteria'(006).
      endif.
    Delete the records where RATIO is less than 13.
      delete i_output where atnam cs c_ratio and atflv lt c_13.
    endform.                    "append_final_data
    *&      Form  display_report
    Display the Report Output data
    form display_report.
    data: l_tabix like sy-tabix.
      loop at i_output1.
        l_tabix = sy-tabix.
    At new Characteristic
         at new atinn.
          read table i_output1 index l_tabix.
          format color 1 intensified on.
          write: /1 sy-vline, 2(20) 'Characteristic Name:'(007),
                 23(40) i_output1-atnam,
                 125 sy-vline.
          format color off.
          format color 4 intensified on.
          write: /1 sy-vline, 2(20) 'Plant Name         :'(022),
                 23(4) i_output1-werks, 29(30) i_output1-name1,
                 125 sy-vline.
          format color off.
          write /1(125) sy-uline.
        endat.
        clear: g_clabs, g_clabs1.
        format color col_normal.
        write :/1 sy-vline,  2(18)   i_output1-matnr,
               20 sy-vline,  21(40)  i_output1-maktx,
               61 sy-vline.
        if i_output1-atflv = c_c23.
          write: 62(22)  c_g23 centered.
        else.
          shift i_output1-atflv left deleting leading space.
          write: 62(22)  i_output1-atflv centered.
        endif.
        write:  84     sy-vline,
               103     sy-vline,
               110(5)  i_output1-meins.
    If the quantity value is negative
        if i_output1-clabs ge 0.
          write: 85(18) i_output1-clabs unit i_mchb-meins,
                125     sy-vline.
        else.
          i_output1-clabs = - i_output1-clabs.
          write i_output1-clabs unit i_mchb-meins to g_clabs1.
          condense g_clabs1.
          concatenate '(' g_clabs1 ')' into g_clabs separated by space.
          write: 85(18) g_clabs right-justified,
               125 sy-vline.
        endif.
        format color off.
        hide : i_output1.
        new-line.
    At end of material
        at end of matnr.
          sum.
          move : i_output1-matnr to g_matnr.
          format color 3 intensified on.
          write /1(125) sy-uline.
          write :/1 sy-vline,  2(25) 'Total for Material      :'(012),
                 28(18) g_matnr.
          if i_output1-clabs ge 0.
            write: 85(18) i_output1-clabs  unit i_mchb-meins,
            125 sy-vline.
          else.
            i_output1-clabs = - i_output1-clabs.
            write i_output1-clabs unit i_mchb-meins to g_clabs1.
            condense g_clabs1.
            concatenate '(' g_clabs1 ')' into g_clabs separated by space.
            write: 85(18) g_clabs right-justified,
                 125 sy-vline.
          endif.
          write: 125 sy-vline.
          format color off.
          write /1(125) sy-uline.
        endat.
    At end of plant
        at end of werks.
          sum.
          move : i_output1-werks to g_werks.
          format color 3 intensified off.
          write :/1 sy-vline,  2(25) 'Total for Plant          :'(013),
                 28(4) g_werks.
          if i_output1-clabs ge 0.
            write:  85(18) i_output1-clabs  unit i_mchb-meins,
            125 sy-vline.
          else.
            i_output1-clabs = - i_output1-clabs.
            write i_output1-clabs unit i_mchb-meins to g_clabs1.
            condense g_clabs1.
            concatenate '(' g_clabs1 ')' into g_clabs separated by space.
            write: 85(18) g_clabs right-justified,
                 125 sy-vline.
          endif.
          format color off.
          write /1(125) sy-uline.
        endat.
    At end of  characteristic
        at end of atinn.
          read table i_output1 index l_tabix.
          sum.
          format color 3 intensified on.
          write :/1 sy-vline,  2(25) 'Total for Characteristic:'(014),
                 28(25) i_output1-atnam.
          if i_output1-clabs ge 0.
            write:  85(18) i_output1-clabs  unit i_mchb-meins,
            125 sy-vline.
          else.
            i_output1-clabs = - i_output1-clabs.
            write i_output1-clabs unit i_mchb-meins to g_clabs1.
            condense g_clabs1.
            concatenate '(' g_clabs1 ')' into g_clabs separated by space.
            write: 85(18) g_clabs right-justified,
                 125 sy-vline.
          endif.
          format color off.
          write /1(125) sy-uline.
        endat.
      endloop.
    endform.                    " display_report
    *&      Form  DISPLAY_BATCH
         Display the batch details for the seclected material            *
    form display_batch.
    Get the batch details for the selected material
      get cursor field g_cursor.
      if g_cursor = c_cursor1 or
         g_cursor = c_cursor2 or
         g_cursor = c_cursor3 or
         g_cursor = c_cursor4 or
         g_cursor = c_cursor5 or
         g_cursor = c_cursor6.
        format color 3.
        write: /1 sy-vline,
                2(17) 'Material Number :'(020),
               20(17) i_output1-matnr,
               94 sy-vline.
        format color off.
        write /1(94) sy-uline.
        loop at i_mchb1 where matnr = i_output1-matnr and
                              atinn = i_output1-atinn and
                              atflo = i_output1-atflv.
          format color col_normal.
          shift i_mchb1-charg left deleting leading '0'.
          write :/1 sy-vline,  2(16) i_mchb1-lgort centered,
                 18 sy-vline, 19(17) i_mchb1-charg centered,
                 36 sy-vline.
          if i_output1-atnam cs c_ratio.
            write: 37(29) i_mchb1-atflv
                           exponent 0 decimals 2 centered.
          else.
            write : 37(29) i_mchb1-atflv
                          exponent 0 decimals 0 centered.
          endif.
          write : 66 sy-vline, 67(27) i_mchb1-clabs unit i_mchb-meins,
                  94 sy-vline.
          format color off.
        endloop.
        write /1(94) sy-uline.
      else.
        message s899 with 'Invalid cursor position'(016).
        exit.
      endif.
    endform.                    " DISPLAY_BATCH
    *&      Form  HEADING_SECLIST
          Write the Column Headings for Interactive Report
    form heading_seclist.
      write /1(94) sy-uline.
      format color col_heading on.
      write :/1 sy-vline,  2(16) 'Storage Location'(021),
             18 sy-vline, 19(17) 'Batch Number'(017) centered,
             36 sy-vline, 37(29) 'Characteristic Value'(018) centered,
             66 sy-vline, 67(27) 'Quantity'(019) centered,
             94 sy-vline.
      write /1(94) sy-uline.
      format color off.
    endform.                    " HEADING_SECLIST
    *&      Form  COLLECT_RATIO
          Display the Characteristic ratio data
    form collect_ratio.
      loop at i_output.
        clear g_atinn.
        i_output1-atinn = i_output-atinn.
        i_output1-atnam = i_output-atnam .
        i_output1-werks = i_output-werks.
        i_output1-name1 = i_output-name1.
        i_output1-matnr = i_output-matnr.
        i_output1-maktx = i_output-maktx.
        i_output1-clabs = i_output-clabs.
        i_output1-meins = i_output-meins.
        call function 'CONVERSION_EXIT_ATINN_OUTPUT'
             exporting
                  input  = i_output-atinn
             importing
                  output = g_atinn.
        if g_atinn cs c_ratio.
    If the ratio value is between 13-14.99, display 13
          if i_output-atflv between c_13 and c_1499.
            i_output1-atflv = c_13.
    If the ratio value is between 15-16.99, display 15
          elseif i_output-atflv between c_15 and c_1699.
            i_output1-atflv = c_15.
    If the ratio value is between 17-18.99, display 17
          elseif i_output-atflv between c_17 and c_1899.
            i_output1-atflv = c_17.
    If the ratio value is between 19-20.99, display 19
          elseif i_output-atflv between c_19 and c_2099.
            i_output1-atflv = c_19.
    If the ratio value is between 21-22.99, display 21
          elseif i_output-atflv between c_21 and c_2299.
            i_output1-atflv = c_21.
    If the ratio value is greater than or equal to 23, display 23
          elseif i_output-atflv >= c_23.
            i_output1-atflv = c_23.
          endif.
          write i_output1-atflv to i_output1-atflv .
        else.
          write i_output-atflv to i_output1-atflv exponent 0 decimals 0.
        endif.
        collect i_output1.
        clear   i_output1.
      endloop.
      sort i_output1 by atinn werks matnr atflv.
    endform.                    " COLLECT_RATIO
    Reward if useful..
    Regards,
    Anji

  • How to get the link between MCH1, AUSP, CAWN and CAWNT tables

    Hi,
        Can anyone let me know how to get the link between MCH1, AUSP, CAWN and CAWNT tables as I want to get the description (CAWNT-ATWTB) for a particular Batch (MCH1-CHARG).
    Thanks & Regards,
    Kumar

    Hi,
        Can anyone let me know how to get the link between MCH1, AUSP, CAWN and CAWNT tables as I want to get the description (CAWNT-ATWTB) for a particular Batch (MCH1-CHARG).
    Thanks & Regards,
    Kumar

  • 'Is there a link between OLM and iProcurement'

    I have been asked 'Is there a link between OLM and iProcurement'? The person posing the question is wanting to create trainers as suppliers and I know that the supplier information is shared between OLM and the A/P, A/R and G/L modules and I presume that the link to iProcurement will be via one of these modules however is there a more direct vanilla link between OLM and iprocurement?
    Any help would be great
    Thanks
    DM

    I am afraid there is no link between the iProc and OLM.
    The closest that apps can offer you is that your learner/delegates can be of type external i.e. being an Organization or a Customer. Hence there exists a link for your delegate to be a customer(hz_parties).
    However this might be a future integration i.e. Trainers being suppliers. I am saying so because in 11.5.10 there is a table named OTA_VENDOR_SUPPLIES that has reference to vendor_id. Currently this table is not being used by OLM.
    You may look into the code of packages OTA_VSP_API, OTA_TEA_BUS & OTA_PLE_BUS and see if Oracle's future functionality will converge towards your business requirement.
    Thanks,
    Anil Passi
    http://oracle.anilpassi.com

  • Is there any link between movement types and documents

    hi
    is there any link between sales doc and movement types ?
    is it the only source dependig on schedule line movement type will determined?
    if with out order we are doing delivery how system will determine movement type
    Thanks in advance

    Hi,
    Deliveries that are created without reference to order , contained movement type because to process a delivery you need to have some of the control criteria that are copied from sales document header to delivery document header, as system processes delivery in that way ,that is why you will find default order type is assigned to the delivery document type ie DL. .which helps the delivery document to process without reference to sales document.
    In Addition to above information,
    In VOV4,
    DL+ NORM +   +    -&#61664;DLN
    In VOV5,
    For Itemcatagory DLN+        --&#61664;CN
    From this schedule line category CN,movement type 601 is taken during without reference to order –delivery creation.
    MCM

Maybe you are looking for