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 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 WickramaHi
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.
-
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
JoSee 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
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.
soniHi,
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,
KumarHi,
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
DMI 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 advanceHi,
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 + + -DLN
In VOV5,
For Itemcatagory DLN+ --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
-
On my iMac OS-X 10.9.3 I am able to view a downloaded .pdf in my browser , if however I want to print out the .pdf via the File tab and Print in Safari, the message comes up that Adobe either does not support this format, or it s corrupted as an atta
-
Remote Desktop Connection for Mac to Windows - logout error
Hello I'm trying to use Remote Desktop Connection (RDC) to get from my Mac into a MacMini running Windows XP Professional. I can log into the Windows computer, but once I put in my password and click OK, it logs out of the Windows machine. Is there s
-
Output type not appearing in interco. document - Req. 905 not fulfilled
Hi everyone. WHen i am creating my intercompany document, no output type is appearing. I have maintained VV31 condition records as well as WE20 settings. Also i have set output device to LOCL .When i click on Analysis output , it gives me RD00 50
-
Dear Verizon, I want to let you know that you have failed me in this desperate time of need. This is my last semester, my last class, my very last paper in college ever... and guess what Verizon?! I cannot complete it. Guess why?! Because my Internet
-
[b]Events Managment Application[/b]
Hi All, I'm working on an events management application. The purpose of this application is to handle multipurpose events organized by my organization. Not sure what is the best practice to handle the following 1- On-line registration will be all