Purchase prder
hi experts,
When i have create purchase order error shows like this "Requisition 10012599, item 00010, assigned to other order account" how to resolve this...
thanks
Hi
In case if you are trying to create the PO with reference to PR then there is a mismatch in the Account assignment in PR to PO for line item 10 so that could be the reason for getting the error message
Check the PR for the account assignment category and see that you maintain the same in PO as well
I hope this helps clears out
Award accordingly if found useful
Regards
Pavan
Similar Messages
-
Prohibit creation of purchase prder
Hi friends,
I want to use user status to prohibit the creation of purchase order (for both material and services) when the Budget of that WBS is not released.
I am able to do this only for material purchase order but not for service purchase orders. This is because the transaction control is available only for "create material PO".
How can this be achieved?
bye
PratapHi Pratap
Yes, you are right. System control is available for material PR & material PO.
There is one more option that you can utilise.
In user status, Apartfrom forbidding material PR & material PO, you also forbid "Release".
So with this user status, no PR/ PO will be generated unless user status allows (user staus should be reste after budgeting).
For example, (In OK02)
1. create user status, "NBUD", which will forbid creation of "material PR", "material PO" & "Release"
2. create another user staus "BUDG" where in you allow business transaction you forbid in "NBUD"
It works well. Just try.
Good luck. -
hi
is there a possibility to make a relation between BOM and purchase order, otherway, to create a purchase order with BOM?
if not, for what serve BOM?
best regarddear
when the user raise the PR of BOM material you can create the PO in the same manner as you create the ordinary POs..
if you want to see the bom material then you can see it in the material tab after clicking the component icon while creating the PO even you can change it as per your requirement.
see. bom is bill of material some times we are fabricating a material every time with a lot of items eery time raise the PR of all the items is not possible because we can missed any one of the list so we maintain the list in BOM every time when the pr raise for the material the list automatically. in the same manner you can create the gr also through order and double click the item line you will get all the list of bom items and you can also change the qty in it.
hope your query will solve ifnot pls back to me.
regds
devesh -
MIRO posting of import Turnover Tax from the customs agent
Dear SAP Gurus,
I need your inputs for the below described issue:
Customs agent send us invoice for import turnover tax which he pays at customs in behalf of our company.
We have purchase prders for the imported materials.
How can we handle such import turnover taxes which is a compensation for the VAT to be paid for that materials in the importing country.
Do we need to create a new tax code and if yes which % , bcs. the paid import turnover tax is different depending on imported goods. How can we post in miro directly on the import turnover tax account? The system does not allow it bcs. of base amount problem.
I am not sure if the creation of a new condition record for this tax type can help bcs. we need it to post in Miro from another vendor (customs agent) than the vendor of the Purchase order.
We should be able to show these taxes in VAT report too.
Your inputs higly appreciated.
Thanks and Kind Regards
Tarikpost via FB60 onto VAT Acccount (indicator < and flag 'calculate tax base' while posting)
depending on the VAT reporting requirements, you can need a new VAT code. -
Check on PO matching profit ctr with plant & cost ctr with plat
Hi Expert ,
I am working on Enhance check on restrict purchase prder the logic of matching profit center with plant and cost center with plant . Code is-
IF SY-TCODE = 'ME21N' OR SY-TCODE = 'ME22N'.
LOOP AT XEKPO WHERE KNTTP = 'A'.
read table KNT with key ebeln = XEKPO-ebeln ebelp = XEKPO-ebelp prctr = XEKPO-KO_prctr.
if sy-subrc NE 0 .
MESSAGE ID 'ZMESSAGE' type 'E' NUMBER 005.
/'Asset Profit Center Should be Same as Plant'/
*EXIT.
endif.
ENDLOOP.
endif.
loop at knt.
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
EXPORTING
input = knt-prctr
IMPORTING
OUTPUT = knt-prctr.
modify knt.
endloop.
now i need this ligic with also work in case of service order ( SRO & SER) check asset code (cost center-plant) instead of material code( Profit center u2013plant).
because in service order no material exist
Edited by: Aditya_rkj on Jan 20, 2011 6:06 PM
Edited by: Aditya_rkj on Jan 20, 2011 6:07 PMhi,
I think your cost centre is not assigned the above given bussiness area...
Take help of FI consultant and check whether its assigned at KS02 or not...
You can also change it...
or
if you are just doing testing, then better use other cost centre which assigned to the above given business area..
Regards
Priyanka.P -
Want to add new status while searching PO in EBP
Hi All,
While in EBP, I want to search for POs at link: PURCHASE ORDERS>>PROCESS PURCHASE PRDERS>>FIND.
At this position i want to search for the POs with some statuses like: ordered,awaiting approval,in your inbox etc..
I want to add 2 more statuses while searching POs. These statuses are "Transaction Completed" and "Error in Process".
Please tell me how to add these 2 extra statuses there.
Reg,
BisHello Bis,
You can find PO in status 'Error in process' using status drop-down list with wording 'Transfer Failed': this is standard.
Regarding status 'Transaction completed', why do you want to make a difference with standard status 'Ordered' ?
Regards.
Laurent. -
How to link EKBE and MKPF tables
HI all
plz help me,
how to link EKBE and MKPF tables
thanks
ramesh redddyHI,
EKPO-EBELN = EKKO-EBELN has Purchase Documnet no.
MSEG=MBLNR = MKPF-MBLNR has material document no
Link MSEG-EBELN = EKPO-EBELN ( MSEG purchase prder no and EKPO purhcase document no.)
and you should have to add one more table MSEG which is provide three table.
check this link
EKPO-EBELN = EKKO-EBELN
MSEG-EBELN = EKPO-EBELN
MSEG=MBLNR = MKPF-MBLNR
regards,
PK. -
AIA FP 11.1.1.3 - Deployment Plan Generation for migrating from Dev to Test
Hi All,
Can you please validate the following from a Deployment from Dev to Test perspective. We have almost completed the development for an interface using AIA 11g, and are in the process of moving the interface from one instnace to another, and any help is highly appreciated.
Let us the take Purchase Order Integration between a legacy application and Oracle Purchasing, File Adapter-> Requester ABCS -> EBS -> Provider ABCS -> DB Adapter, which is a classical flow.
1. The Functional person defines a project in the Project Life Cycle Workbench
2. Functional decomposition done through Purchase Prder Business Task, and Service Solution components for each composite in the classical flow
3. The ABCSs are created by linking the corresponding Service Solution Components from the LCW using Service Contructor. These composite.xmls will have the annotation populated by the Service Constructor. It is okay for these composites to have concrete wsdls during development phase, but the concreate ones have to be replaced with abstract ones before geenrating deployment plans.
4. The EBS is not changed, it will have the annotations prepopulated, and there is no need to add any annoations to them
5. The File Adapter and DB Adapters (Transport Adapters?) have to be annotated based on the developer guide
6. The xsds and wsdl go into the mds based using the scripts provided. Any other common components can also be placed into MDS.
7. Once the development is done, Harvest the composites using the AIA Harvester.
8. After harvesting, from the AIA LCW, Generate the BOM. If we harvest all the 5 composites for the Business Task together, and do Generate BOM, does it capture all the composites? Or do they capture only the composites created using the Service Constructor? Or we have to add all the compistes manually to the Business Task?
9. Add Harvested Contents by Editing the BOM -> "Search and Add Existing Composite" option. We couldnt locate the "Add Harvested Composite" option while right clicking the Business Task.
10. Once all the harvested composites have been added to the BOM, export as XML
11. Using the BOM, generate the DeploymentPlan. The deployment plan will have references to the xsds and wsdls in the MDS
12. Using the Deployment Plan and AID, deploy the composites into a new instanec.
These are the questions I have,
1. Is the above understanding correct?
2. Since the MDS is in the Dev database, a pre-requisite for AID seems to be deployment of xsds and wsdls into the Test MDS schema. Can you please validate?
3. What happens to the bpels, xsls, mplans etc? How do they move from one instance to another?
Regards,
AnishHi Anish,
Following are the responses -
These are the questions I have,
1. Is the above understanding correct?
1. The Functional person defines a project in the Project Life Cycle Workbench - Yes
2. Functional decomposition done through Purchase Prder Business Task, and Service Solution components for each composite in the classical flow - Yes
3. The ABCSs are created by linking the corresponding Service Solution Components from the PLWB using Service Contructor. These composite.xmls will have the annotation populated by the Service Constructor. It is okay for these composites to have concrete wsdls during development phase, but the concreate ones have to be replaced with abstract ones before geenrating deployment plans.-Yes but location attribute in binding.ws section of composite.xml should always have concrete WSDL location.Use <replaceToken> in DeploymentPlan to replace the ip and port.
4. The EBS is not changed, it will have the annotations prepopulated, and there is no need to add any annoations to them - Yes
5. The File Adapter and DB Adapters (Transport Adapters?) have to be annotated based on the developer guide-Yes
6. The xsds and wsdl go into the mds based using the scripts provided. Any other common components can also be placed into MDS.- Yes
7. Once the development is done, Harvest the composites using the AIA Harvester.-Yes
8. After harvesting, from the AIA PLWB, Generate the BOM. If we harvest all the 5 composites for the Business Task together, and do Generate BOM, does it capture all the composites? Or do they capture only the composites created using the Service Constructor? Or we have to add all the compistes manually to the Business Task?-The 5 composites created by you should have a corresponding service solution component defined.When you define a service solution component in PLWB then a GUID is generated in the database table.You need to retrieve that value and manually enter in the annotation section of composite.xml except for ABCS.Then only the BOM will contain information on all the composites.
9. Add Harvested Contents by Editing the BOM -> "Search and Add Existing Composite" option. We couldnt locate the "Add Harvested Composite" option while right clicking the Business Task.*-Once you harvest it will be visible.*
10. Once all the harvested composites have been added to the BOM, export as XML - Yes
11. Using the BOM, generate the DeploymentPlan. The deployment plan will have references to the xsds and wsdls in the MDS - Yes
12. Using the Deployment Plan and AID, deploy the composites into a new instance.-Yes
2. Since the MDS is in the Dev database, a pre-requisite for AID seems to be deployment of xsds and wsdls into the Test MDS schema. Can you please validate?
Yes the 'UpdateMetaData' section under 'Configurations' in the DeploymentPlan will upload XSDs, WSDLs, DVM,Xrefs into MDS.
3. What happens to the bpels, xsls, mplans etc? How do they move from one instance to another?
The 'Deployments' section will deploy the project into server and write the information into MDS.
Rgds,
Mandrita -
Goods Movement & MB01 - Tables Used
I want to know what are the tables and type of data updated in those tables when a goods receipt is posted.
Similarly when goods movement updation is done using MB01 transaction against purchase prder what are the tables involved.The most important tables involved in MB01 are:
MKPF and MSEG.
If you want all the tables that are updated, then you can run a ST05 trace on the MB01 transaction and find the tables that are updated.
Regards,
Ravi -
Dear Experts,
I am creating a po,the material is domestic spares excisable i.eDOM-S(E).valuation categarised as H.while saving purchase prder the system is displaying warning message as "valuation data for material xxxxxxxxx valuation type DOM-S(E) not maintained.why message is showing.what i can do ,to rectify the warning.please answer it.
Regards,
RamakrishnaHi,
Just check the material in the display mode T Code MM03, whether any Valuation type is maintained for this material . Check the valuation class/Price control/Procurement type also. Eg If it is Raw material then whatever valuation type defined in your company has to be given and procurement type -External has to be selected. After getting the correct valuation type u can go to T Code. MM01 and put the same material . Then it will ask for plant , storage location , valuation type , u can just put the particular valuation type. Select the views u want to maintain and then keep on entering and save it.
Go to PO , same valuation type has to be given..it will show a 'X' mark against that particular valuation type if u press F4. (Eg. x - Lcxin where Lcxin is valuatiopn type)
If its not appearing that means its still not assigned to that material . Then u have to again check in MM03.
resgards,
somu c -
hi
i have to make a smart form for maintenance order.
i would be required for following fields-
mant. order no, equipment no, maint date, task performed, purchase prder no, vendor no, spare to be used, reservation no.
kindly give the process for the same.
regards,
santoshHi Santosh
Pls see [here |http://www.sap-img.com/smartforms/sap-smart-forms.htm]
May be this will give u some inputs
Regards
Jignesh -
PO to delivery, PGI and Invoice(profarma) in Background
Hello experts,
when I am saving the PO(purchase prder), In background (Automtically) should create Delivery, PGI and Invoice(Profarma Invoice).
In PO Base price should pick from Legasy system, same price should reflect Invoice, But in Invoice Excise duties should pick from sap R3 system based on Condition Records. with reference to profarma invoice we can create the Excise invoice.
Could any one please help me for this.
Is any standard settings available for this, or shell we have any standard progrm/ exits?
please explain how to reach this requirment.
Thanks
RavindraHi Ravindra,
Why do you need to do all this automation?
Have you thought that how much technically complicated will it become?
How your Picking will be updated with Batch or Serial number data?
If any changes needs to be done then how will it be happened?
How you will manage other special scenarios related to your cycle?
Client will just assume saying that when they had said automation you are already considering all the scenarios related to business and they all will be executed properly.
It is easy for users to ask for end to end automation, but it is tough for Functional and Technical consultant to make it happen with all the scenarios of Client running properly with exact results.
I will suggest convince them to do process in part basis. You can think to create Delivery automatically, but tell them to Do Picking / PGI manually. (All complex scenarios will come while Picking and PGI only)
You can create BDC for Invoice creation.
Regards,
MJ. -
Custom purchase requsitionto vendor open and cleared payment report
dear all i develop report but i cant ableto show in that open amount and cleared amount of vender in that report so please see this report and feedback me for logic to show open and clear amount of vendor purchase orderwise or vendorwise
report zpo_purchase_history no standard page heading message-id 00.
TABLES : bsik, bsak, lfa1, lfb1, skb1, t001, bapifvdexp_vzzbepp.
type-pools:slis,ICON.
types :begin of ty_po,
banfn type eban-banfn,
"Purchase Requisition Number
bnfpo type eban-bnfpo,
"Item Number of Purchase Requisition
ekgrp type eban-ekgrp, "Purchasing Group
badat type eban-badat,
"Requisition (Request) Date
menge type eban-menge,
KNTTP TYPE EBAN-KNTTP,
PSTYP type eban-PSTYP,
"Purchase Requisition Quantity
meins type eban-meins,
"Purchase Requisition Unit of Measure
lifnr type ekko-lifnr, "Vendor Account Number
bedat type ekko-bedat, "Purchasing Document Date
ebeln type ekpo-ebeln,
"Purchasing Document Number
ebelp type ekpo-ebelp,
"Item Number of Purchasing Document
matkl type ekpo-matkl, "Material Group
mtart type ekpo-mtart, "Material Type
matnr type ekpo-matnr, "Material Number
txz01 type ekpo-txz01, "Short Text
menge1 type ekpo-menge, "Purchase Order Quantity
meins1 type ekpo-meins,
"Purchase Order Unit of Measure
balqty type ekpo-menge, "Balance Quantity
netpr type ekpo-netpr,
"Net Price in Purchasing Document
peinh type ekpo-peinh, "Price Unit
mblnr type mseg-mblnr,
"Number of Material Document
zeile type mseg-zeile, "Item in Material Document
menge2 type mseg-menge, "GR Quantity
meins2 type mseg-meins, "GR Unit of Measure
werks type mseg-werks, "Plant
charg type mseg-charg, "Batch
belnr type rbkp-belnr,
"Document Number of an Invoice Document
bldat type ekbe-bldat, "Document Date in Document
belnr_b type rbkp-belnr,
SHKZG type ekbe-SHKZG , "Debit/Credit Indicator
DMBTR type bsik-dmbtr, "Amount in Local Currency
DMBTR_C type bsAk-dmbtr, "Amount in Local Currency
thick(10) type c, "Thickness
width(10) type c, "Width
length(10) type c, "Length
grade(10) type c, "Grade
BELNR_d type bseg-belnr,
xblnr type bkpf-xblnr,
awkey type bkpf-awkey,
RMWWR type rbkp-RMWWR,
WMWST1 type rbkp-WMWST1,
end of ty_po.
types :begin of ty_ekko,
ebeln type ekko-ebeln,
lifnr type ekko-lifnr,
bedat type ekko-bedat,
end of ty_ekko.
types:begin of ty_ekpo,
ebeln type ekpo-ebeln,
ebelp type ekpo-ebelp,
matnr type ekpo-matnr,
txz01 type ekpo-txz01,
menge type ekpo-menge,
meins type ekpo-meins,
netpr type ekpo-netpr,
peinh type ekpo-peinh,
banfn type ekpo-banfn,
bnfpo type ekpo-bnfpo,
mtart type ekpo-mtart,
end of ty_ekpo.
types :begin of ty_eban,
banfn type eban-banfn,
bnfpo type eban-bnfpo,
matnr type eban-matnr,
menge type eban-menge,
meins type eban-meins,
end of ty_eban.
types : begin of ty_ekbe,
ebeln type ekbe-ebeln,
ebelp type ekbe-ebelp,
belnr type ekbe-belnr,
bldat type ekbe-bldat,
gjahr type ekbe-gjahr,
buzei type ekbe-buzei,
matnr type ekbe-matnr,
DMBTR type ekbe-dmbtr,
shkzg type ekbe-shkzg,
end of ty_ekbe.
types : begin of ty_mseg,
mblnr type mseg-mblnr,
mjahr type mseg-mjahr,
zeile type mseg-zeile,
menge type mseg-menge,
meins type mseg-meins,
ebeln type mseg-ebeln,
ebelp type mseg-ebelp,
matnr type mseg-matnr,
werks type mseg-werks,
charg type mseg-charg,
end of ty_mseg.
types : begin of ty_rbkp,
belnr type rbkp-belnr,
gjahr type rbkp-gjahr,
bldat type rbkp-bldat,
lifnr type rbkp-lifnr,
ZUONR type rbkp-ZUONR,
RMWWR type rbkp-RMWWR,
WMWST1 type rbkp-WMWST1,
end of ty_rbkp.
types : begin of ty_bseg,
bukrs type bseg-bukrs,
belnr type bseg-belnr,
gjahr type bseg-gjahr,
buzei type bseg-buzei,
valut type bseg-valut,
wrbtr type bseg-wrbtr ,
augbl type bseg-augbl,
matnr type bseg-matnr,
lifnr type bseg-lifnr,
ebeln type bseg-ebeln,
end of ty_bseg.
types : begin of ty_rseg,
belnr type rseg-belnr,
gjahr type rseg-gjahr,
ebeln type rseg-ebeln,
ebelp type rseg-ebelp,
matnr type rseg-matnr,
bukrs type rseg-bukrs,
end of ty_rseg.
types : begin of ty_bsik,
belnr type bsik-belnr,
buzei type bsik-buzei,
DMBTR type bsik-DMBTR,
budat type bsik-budat,
shkzg type bsik-shkzg,
ebeln type bsik-ebeln,
lifnr type bsik-lifnr,
end of ty_bsik.
types : begin of ty_bsak,
belnr type bsak-belnr,
lifnr type bsak-lifnr,
ebeln type bsak-ebeln,
DMBTR_C type bsak-DMBTR,
ZUONR type bsak-ZUONR,
end of ty_bsak.
types: begin of ty_bkpf,
BELNR type bkpf-belnr,
xblnr type bkpf-xblnr,
awkey type bkpf-awkey,
end of ty_bkpf.
data: it_po type standard table of ty_po,
it_ekko type standard table of ty_ekko,
it_ekpo type standard table of ty_ekpo,
it_eban type standard table of ty_eban,
it_ekbe type standard table of ty_ekbe,
it_mseg type standard table of ty_mseg,
it_rbkp type standard table of ty_rbkp,
it_rseg type standard table of ty_rseg,
it_bseg type standard table of ty_bseg,
it_bsik type STANDARD TABLE OF ty_bsik with header line,
it_bsak type STANDARD TABLE OF ty_bsak,
it_bkpf type standard table of ty_bkpf,
wa_po type ty_po,
wa_ekko type ty_ekko,
wa_ekpo type ty_ekpo,
wa_eban type ty_eban,
wa_mseg type ty_mseg,
wa_rbkp type ty_rbkp,
wa_rseg type ty_rseg,
wa_bseg type ty_bseg,
wa_ekbe type ty_ekbe,
wa_bsik type ty_bsik,
wa_bsak type ty_bsak,
wa_bkpf type ty_bkpf.
data: it_fcat type slis_t_fieldcat_alv,
it_lshead type slis_t_listheader,
it_sort type slis_t_sortinfo_alv,
wa_fcat type slis_fieldcat_alv,
wa_lshead type slis_listheader,
wa_layout type slis_layout_alv,
wa_sort type slis_sortinfo_alv.
data :it_cl_data like table of clobjdat,
wa_cl_data like clobjdat.
data: values(10) type n.
data: value1(4) type N.
data: c_matkl type ekpo-matkl,
c_matnr type ekpo-matnr,
c_ekgrp type eban-ekgrp,
c_badat type eban-badat,
c_index type sy-tabix,
c_grmenge type mseg-erfmg,
c_low(10) type c,
c_high(10) type c,
c_date type string,
c_bukrs type ekko-bukrs,
c_WERKS type eban-WERKS.
data: gd_date(10).
DATA: V_EVENTS TYPE SLIS_T_EVENT,
WA_EVENT TYPE SLIS_ALV_EVENT.
*********Selection screen variables*********
selection-screen:begin of block b1 with frame title text-001.
select-options: s_bukrs for c_bukrs DEFAULT 'bmp1',
s_WERKS for c_WERKS,
s_matnr for c_matnr DEFAULT 'rm-01',
s_matkl for c_matkl ,
s_badat for c_badat ,"obligatory,
s_ekgrp for c_ekgrp.
parameters: ch_bal as checkbox.
selection-screen:end of block b1.
*initialization.
* PERFORM EVENT_CALL.
* PERFORM POPULATE_EVENT.
start-of-selection.
PERFORM EVENT_CALL.
PERFORM POPULATE_EVENT.
perform getdata.
perform setdata.
perform fieldcat.
perform display.
*& Form GETDATA
form getdata .
select a~BANFN
a~bnfpo
a~ekgrp
a~badat
a~KNTTP
a~PSTYP
b~ebeln
b~ebelp
b~matkl
b~matnr
b~bukrs
into corresponding fields of table it_po
from eban as a inner join ekpo as b
on a~banfn = b~banfn and
a~bnfpo = b~bnfpo AND
A~KNTTP = B~KNTTP and
a~PSTYP = b~PSTYP
where a~badat in s_badat and
a~ekgrp in s_ekgrp and
a~WERKS in s_WERKS and
b~matnr in s_matnr and
b~matkl in s_matkl and
b~bukrs in s_bukrs and
b~loekz <> 'L' and
a~loekz <> 'X'.
if it_po[] is not initial.
select ebeln
ebelp
matnr
txz01
menge
meins
netpr
peinh
banfn
bnfpo
mtart
from ekpo into table it_ekpo
for all entries in it_po
where ebeln = it_po-ebeln and
ebelp = it_po-ebelp and
loekz <> 'L'.
select banfn
bnfpo
matnr
menge
meins
from eban into table it_eban
for all entries in it_po
where banfn = it_po-banfn and
bnfpo = it_po-bnfpo and
loekz <> 'X'.
if it_ekpo[] is not initial.
select ebeln
lifnr
bedat
from ekko into table it_ekko
for all entries in it_ekpo
where ebeln = it_ekpo-ebeln.
select ebeln
ebelp
belnr
bldat
gjahr
buzei
matnr
DMBTR
shkzg
from ekbe into table it_ekbe
for all entries in it_ekpo
where ebeln = it_ekpo-ebeln and
ebelp = it_ekpo-ebelp .
*if it_ekbe-shkzg = 'H'.
**ekbe-dmbtr = ekbe-dmbtr * -1.
**ekbe-menge = ekbe-menge * -1.
*endif.
* select belnr
* gjahr
* ebeln
* ebelp
* from bseg into table it_bseg
* for all entries in it_ekpo
* where ebeln = it_ekpo-ebeln and
* ebelp = it_ekpo-ebelp.
select belnr
gjahr
ebeln
ebelp
matnr
bukrs
from rseg into table it_rseg
for all entries in it_ekpo
where ebeln = it_ekpo-ebeln and
ebelp = it_ekpo-ebelp.
endif.
if it_ekbe[] is not initial.
select mblnr
mjahr
zeile
menge
meins
ebeln
ebelp
matnr
werks
charg
from mseg into table it_mseg
for all entries in it_ekbe
where mblnr = it_ekbe-belnr and
mjahr = it_ekbe-gjahr and
zeile = it_ekbe-buzei and
bwart = '101'.
endif.
if it_rseg[] is not initial.
select belnr
gjahr
bldat
lifnr
ZUONR
RMWWR
WMWST1
from rbkp into table it_rbkp
for all entries in it_rseg
where belnr = it_rseg-belnr.
endif.
*if it_rseg[] is not initial.
* SELECT bukrs
* belnr
* gjahr
* buzei
* valut
* wrbtr
* augbl
* matnr
* lifnr
* ebeln
* INTO TABLE it_bseg
* FROM bseg
* FOR ALL ENTRIES IN it_rseg
* WHERE bukrs = it_rseg-bukrs and ebeln = it_rseg-ebeln and mwskz = ''.
*endif.
*loop at it_BKPF into wa_BKPF.
* values = wa_rbkp-belnr.
* value1 = wa_rbkp-gjahr.
data: aekey_1 type string .
*CONCATENATE values value1 into aekey_1.
* if it_BSEG[] is not initial.
*MESSAGE aekey_1 type 'I'.
SELECT single belnr xblnr awkey into wa_bkpf
from bkpf
where awkey = aekey_1.
SELECT SINGLe belnr
buzei
dmbtr
budat
shkzg
ebeln
lifnr
FROM bsik
INTO CORRESPONDING FIELDS OF wa_bsik
*FOR ALL ENTRIES IN it_bseg
WHERE
bukrs in s_bukrs and
lifnr = wa_rbkp-lifnr
and
*AND gjahr = it_bseg-gjahr
* AND
belnr = wa_bkpf-belnr.
insert wa_bsik into table it_bsik.
CLEAR wa_bsik.
CLEAR it_bsik.
*endloop.
* and ebeln = it_bseg-ebeln .
* select BELNR
** SHKZG
** DMBTR
* from bkpf into table it_bkpf
* for ALL ENTRIES IN it_rbkp
* where belnr = it_rbkp-belnr.
* ENDif.
IF IT_bseg[] IS NOT INITIAL.
select belnr
LIFNR
ebeln
DMBTR
ZUONR
from bsik into table it_bsik
for all entries in it_bseg
where belnr = it_bseg-belnr.
select belnr
LIFNR
ebeln
DMBTR
ZUONR
from bsak into table it_bsak
for all entries in it_bseg
where belnr = it_bseg-belnr.
ENDIF.
else.
message s002.
leave list-processing.
endif.
endform. " GETDATA
*& Form SETDATA
form setdata .
clear wa_po.
loop at it_po into wa_po.
c_index = sy-tabix.
********Calculate PR Quantity**********
clear wa_eban.
read table it_eban into wa_eban
with key banfn = wa_po-banfn
bnfpo = wa_po-bnfpo.
if sy-subrc eq 0.
move:wa_eban-menge to wa_po-menge,
wa_eban-meins to wa_po-meins.
endif.
********Calculate PO Quantity**********
clear wa_ekpo.
read table it_ekpo into wa_ekpo
with key banfn = wa_po-banfn
bnfpo = wa_po-bnfpo .
if sy-subrc eq 0.
move:wa_ekpo-txz01 to wa_po-txz01,
wa_ekpo-netpr to wa_po-netpr,
wa_ekpo-peinh to wa_po-peinh,
wa_ekpo-mtart to wa_po-mtart,
wa_ekpo-menge to wa_po-menge1,
wa_ekpo-meins to wa_po-meins1.
endif.
********Calculate Balance Quantity******
clear wa_mseg.
loop at it_mseg into wa_mseg
where ebeln = wa_po-ebeln and
ebelp = wa_po-ebelp.
c_grmenge = c_grmenge + wa_mseg-menge.
endloop.
move:wa_mseg-mblnr to wa_po-mblnr,
c_grmenge to wa_po-menge2,
wa_mseg-meins to wa_po-meins2,
wa_mseg-werks to wa_po-werks,
wa_mseg-charg to wa_po-charg.
wa_po-balqty = wa_eban-menge - c_grmenge.
clear : wa_rseg,wa_rbkp.
read table it_rseg into wa_rseg with key
ebeln = wa_mseg-ebeln
ebelp = wa_mseg-ebelp.
read table it_rbkp into wa_rbkp
with key belnr = wa_rseg-belnr
gjahr = wa_rseg-gjahr.
if sy-subrc eq 0.
move : wa_rbkp-belnr to wa_po-belnr,
wa_rbkp-bldat to wa_po-bldat,
wa_rbkp-RMWWR to wa_po-RMWWR,
WA_RBKP-WMWST1 TO WA_PO-WMWST1.
endif.
read table it_bseg into wa_bseg with key
ebeln = wa_rseg-ebeln
bukrs = wa_rseg-bukrs.
if sy-subrc eq 0.
move wa_bseg-belnr to wa_po-belnr_d.
endif.
* read table it_bkpf into wa_bkpf
* with key belnr = wa_ekbe-belnr.
* read table it_bseg into wa_bseg
* with key belnr = wa_bkpf-belnr.
CLEAR wa_bsik.
clear it_bsik.
read table it_bsik into wa_bsik
with key belnr = wa_bkpf-belnr.
* if wa_bsik-shkzg = 'H'.
* wa_bsik-DMBTR = wa_bsik-DMBTR * 1.
* endif.
if sy-subrc eq 0.
move : wa_bsik-belnr to wa_po-belnr,
wa_bsik-DMBTR to wa_po-DMBTR.
endif.
* clear wa_bsik.
* read table it_bsik into wa_bsik
* with key belnr = wa_bseg-belnr.
* if sy-subrc eq 0.
* move : wa_bsik-DMBTR to wa_po-DMBTR.
* endif.
*clear wa_bsak.
* read table it_bsak into wa_bsak
* with key belnr = wa_bseg-belnr.
* if sy-subrc eq 0.
* move : wa_bsak-DMBTR_C to wa_po-DMBTR_C.
* endif.
*clear : wa_rbkp.
*loop at it_bsik into wa_bsik.
*read table it_bsik into wa_bsik with key belnr = wa_rbkp-belnr.
*if sy-subrc eq 0.
* move : wa_bsik-DMBTR to wa_po-DMBTR.
* endif.
*endloop.
*********Assign Vendor,PO Date*********
clear wa_ekko.
read table it_ekko into wa_ekko
with key ebeln = wa_po-ebeln.
if sy-subrc eq 0.
move:wa_ekko-lifnr to wa_po-lifnr,
wa_ekko-bedat to wa_po-bedat.
endif.
*clear wa_ekko.
*read table it_ekko into wa_ekko
*with key lifnr = wa_po-lifnr.
*if sy-subrc eq 0.
* move: wa_bsik-DMBTR to wa_po-DMBTR.
* endif.
* call function 'ZSD_BATCH_CLASSIFICATION_DATA'
* exporting
** ch_charg = wa_po-charg
* ch_matnr = wa_po-matnr
* ch_werks = wa_po-werks
* tables
* cl_data = it_cl_data
** I_SEL_CHARACTERISTIC =
loop at it_cl_data into wa_cl_data.
if wa_cl_data-ausp1 ne '?'.
if wa_cl_data-atnam eq 'THICKNESS'.
move wa_cl_data-ausp1 to wa_po-thick.
elseif wa_cl_data-atnam eq 'LENGTH'.
move wa_cl_data-ausp1 to wa_po-length.
elseif wa_cl_data-atnam eq 'WIDTH'.
move wa_cl_data-ausp1 to wa_po-width.
elseif wa_cl_data-atnam eq 'GRADE'.
move wa_cl_data-ausp1 to wa_po-grade.
endif.
endif.
endloop.
modify it_po from wa_po index c_index.
clear :c_grmenge,wa_po,wa_ekpo,wa_mseg,c_index.
endloop.
endform. " SETDATA
*& Form FIELDCAT
* text
* --> p1 text
* <-- p2 text
form fieldcat .
perform buildfields using '1' 'BANFN' 'IT_PO' 'PR Number' '' ''.
* perform buildfields using '2' 'BNFPO' 'IT_PO' 'PR Item Number' '' ''.
perform buildfields using '2' 'KNTTP' 'IT_PO' 'A/c Assignment Cat' '' ''.
perform buildfields using '2' 'PSTYP' 'IT_PO' 'Item Cat' '' ''.
perform buildfields using '3' 'EKGRP' 'IT_PO' 'Purchase Group' '' ''.
perform buildfields using '4' 'BADAT' 'IT_PO' 'Request Date' '' ''.
perform buildfields using '5' 'MENGE' 'IT_PO' 'PR Quantity' 'X' ''.
perform buildfields using '6' 'MEINS' 'IT_PO' 'PR Unit' '' ''.
perform buildfields using '7' 'LIFNR' 'IT_PO' 'Vendor Number' '' ''.
perform buildfields using '8' 'EBELN' 'IT_PO' 'Purchasing Doc No' '' '' .
perform buildfields using '9' 'BEDAT' 'IT_PO' 'PO Date' '' ''.
perform buildfields using '10' 'MTART' 'IT_PO' 'Material Type' '' ''.
perform buildfields using '11' 'MATKL' 'IT_PO' 'Material Group' '' ''.
perform buildfields using '12' 'MATNR' 'IT_PO' 'Material Number' '' ''.
perform buildfields using '13' 'TXZ01' 'IT_PO' 'Material Desc' '' ''.
perform buildfields using '18' 'MENGE1' 'IT_PO' 'PO Quantity' 'X' ''.
perform buildfields using '19' 'MEINS' 'IT_PO' 'PO Unit' '' ''.
perform buildfields using '20' 'NETPR' 'IT_PO' 'Net Price' '' ''.
perform buildfields using '21' 'PEINH' 'IT_PO' 'Price Unit' '' ''.
perform buildfields using '22' 'MBLNR' 'IT_PO' 'GR Number' '' ''.
perform buildfields using '23' 'MENGE2' 'IT_PO' 'GR Quantity' 'X' ''.
perform buildfields using '24' 'MEINS2' 'IT_PO' 'GR Unit' '' ''.
perform buildfields using '25' 'BELNR' 'IT_PO' 'Invoice doc. number' '' ''.
perform buildfields using '26' 'BLDAT' 'IT_PO' 'Invoice Date' '' ''.
* perform buildfields using '26' 'BELNR_D' 'IT_POP' 'A/C Doc. No.' '' ''.
* perform buildfields using '26' 'AUGBL' 'IT_PO' 'Clearing Doc No.' '' ''.
perform buildfields using '26' 'DMBTR' 'IT_PO' 'OPEN AMOUNT' '' ''.
perform buildfields using '26' 'DMBTR' 'IT_PO' 'clear AMOUNT' '' ''.
* perform buildfields using '26' 'DMBTR_C' 'IT_PO' 'Clear balance' '' ''.
if ch_bal = 'X'.
perform buildfields using '27' 'BALQTY' 'IT_PO' 'Balance Quantity'
'X' ''.
endif.
perform buildfields using '26' 'WMWST1' 'IT_PO' 'TOTAL TAX ADDED' 'X' ''.
perform buildfields using '26' 'RMWWR' 'IT_PO' 'TOTAL AMOUNT IN INVOICE' 'X' ''.
endform. " FIELDCAT
*& Form BUILDFIELDS
* text
* -->P_0449 text
* -->P_0450 text
* -->P_0451 text
* -->P_0452 text
form buildfields using value(p_col_pos) like sy-cucol
value(p_fldname) type slis_fieldname
value(p_tabname) type slis_tabname
value(p_reptext) like dd03p-reptext
value(p_do_sum) type char1
value(hotspot) type char1.
wa_fcat-col_pos = p_col_pos.
wa_fcat-fieldname = p_fldname.
wa_fcat-tabname = p_tabname.
wa_fcat-reptext_ddic = p_reptext.
wa_fcat-do_sum = p_do_sum.
wa_fcat-hotspot = hotspot.
append wa_fcat to it_fcat.
clear wa_fcat.
endform. " BUILDFIELDS
*& Form DISPLAY
form display .
clear wa_layout.
wa_layout-zebra = 'X'.
wa_layout-colwidth_optimize = 'X'.
* wa_layout-box_fieldname = 'SEL'.
* wa_layout-edit = 'X'.
perform build_sort using 'BANFN' '1' 'X'.
call function 'REUSE_ALV_GRID_DISPLAY'
exporting
* I_INTERFACE_CHECK = ' '
* I_BYPASSING_BUFFER = ' '
* I_BUFFER_ACTIVE = ' '
i_callback_program = sy-cprog
* I_CALLBACK_PF_STATUS_SET = ' '
I_CALLBACK_USER_COMMAND = 'USER_COMMAND '
i_callback_top_of_page = 'TOP_OF_PAGE'
* I_CALLBACK_HTML_TOP_OF_PAGE = ' '
* I_CALLBACK_HTML_END_OF_LIST = ' '
* I_STRUCTURE_NAME =
i_background_id = 'ALV_BACKGROUND'
* I_GRID_TITLE =
* I_GRID_SETTINGS =
is_layout = wa_layout
it_fieldcat = it_fcat
* IT_EXCLUDING =
* IT_SPECIAL_GROUPS =
it_sort = it_sort
* IT_FILTER =
* IS_SEL_HIDE =
* I_DEFAULT = 'X'
I_SAVE = 'A'
* IS_VARIANT =
* IT_EVENTS =
* IT_EVENT_EXIT =
* IS_PRINT =
* IS_REPREP_ID =
* I_SCREEN_START_COLUMN = 0
* I_SCREEN_START_LINE = 0
* I_SCREEN_END_COLUMN = 0
* I_SCREEN_END_LINE = 0
* I_HTML_HEIGHT_TOP = 0
* I_HTML_HEIGHT_END = 0
* IT_ALV_GRAPHICS =
* IT_HYPERLINK =
* IT_ADD_FIELDCAT =
* IT_EXCEPT_QINFO =
* IR_SALV_FULLSCREEN_ADAPTER =
* IMPORTING
* E_EXIT_CAUSED_BY_CALLER =
* ES_EXIT_CAUSED_BY_USER =
tables
t_outtab = it_po[]
exceptions
program_error = 1
others = 2
if sy-subrc <> 0.
message id sy-msgid type sy-msgty number sy-msgno
with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
endif.
endform. " DISPLAY
*& Form top_of_page
* text
form top_of_page. "#EC *
**********Create report header*********
refresh it_lshead.
clear wa_lshead.
**********To display date in header*********
* write: s_badat-low to c_low dd/mm/yyyy,s_badat-high to c_high
* dd/mm/yyyy.
* if s_badat-high is initial.
* concatenate 'Dated on' c_low into c_date separated by space.
* else.
* concatenate 'Dated between' c_low 'and' c_high into c_date separated
* by space.
* endif.
wa_lshead-typ = 'H'.
wa_lshead-info = 'PR To Payment History'.
* 'Pending Indents History -We had a requirement to retrieve "aging of receiveables" by customer. Basically, it goes thru each record and depending on the due date places the amounts in the following buckets (example). 0-30 day Overdue, 31-60 days Overdue, 61-90 days overdue, 30+ days overdue, 60+ days overdue) etc all the way to 6+ years overdue.
There are also cooresponding buckets for coming due analysis. For example, what is: 0-30 days coming due, 31-60 days coming due, 30+ days coming due, etc...
To do this, first I needed to be able be able to produce an open items statement at any given time in the past. Now, this seems impossible because of how the items go from open to cleared all the time. And an item that was open one month ago, may not be open anymore.
What I did was first remove any selections on item status. Then compare the posting date with teh key date in the past, if the posting date is less than or equal to the key date, keep the record.
Then compare the clearing date with the key date. First, keep all that are #. (This keeps all records still open from that posting date/key date)
Then, add another check for all items that were cleared after the key date (GT Key Date). This gives you the open items on that date.
Hope that makes sense. Let me know if you want clarification.
/smw -
Can I purchase Creative Cloud subscriptions for longer than one year at a time?
I work in the design department of a large business, currently using Creative Suite 6 (Design Standard edition, which includes PS and AI).
I'd like to get the some of the new CC features, but my manager won't commit to a turnkey month-to-month or even annual rental of Creative Cloud apps (it's a pain for our department's purchaser to have to do orders more than once a year). That said, if they could take care of, say, two years at once, I might get the software. Is this an option? I'm one of only a few folks who use Adobe software (it's not a design business; we're just part of a small design department, and all software purchases need to go through this person, after which they're reimbursed). I'm not interested in any of the extra storage or central administration options that come with the higher priced business subscription.
Thanks!http://www.adobe.com/au/products/creativecloud/faq.html
Are there any unique benefits that come with my paid membership?
Yes, as a member of Creative Cloud, you get many benefits that you do not get when you purchase a traditional shrinkwrapped product:
Access to both the Mac OS and Windows® versions of the desktop applications and the ability to install them on your primary computer and one backup computer. So, if you have a Mac at home and a PC at work, you can install your applications on both as long as they are not running at the same time. See the product license agreements page for more information. -
Can my family members share our purchases on separate computers with separate accounts?
We have several apple products in our home and a new one today. Is it possible to use these products on different computers sharing all of our purhcases or do we need to stay on one computer on one account? I know we can do that with the home sharing, but we don't all want all the same things, just some of the purchases.
Use Find My Friends app instead. Much easier to manage, and you won't need each other's id/pw's to do it. They only need to accept your invitations and vice versa.
Maybe you are looking for
-
Opening New Browser window for click event on an image
hi all, I want someone to help me out solving the problem of opening a new browser window on the mouse click event of an image or a button etc.... The new window would contain the datagrid details from the main window, but in an expanded form. If at
-
Content and Font Compression using ASCII85Decode filter alone in Adobe Acrobat Pro
I want to convert FlateDecode to ASCII85Decode for specifically Fonts , Colorspaces and Content. Is there a way to do it ?? @
-
Getting crackling sound on any audio on X305-Q701
Any audio that is playing (internet, itunes, rhapsody, video games, etc.) is getting a crackling sound. Anyone else getting this? or have a fix Solved! Go to Solution.
-
Formula Functions - A basic question
Hi, This must be very basic. Please bare with me. What is the difference in defining a formula function as 'External' and 'User Defined Function' and 'Formula' class? I read some where that you can use contexts in class 'External' and cannot in user
-
Playing game and all of a sudden phone went silent
just got the new phone don't quite know all the functions yet. was playing a game and the game went silent. can't get my sound back and the mute is not enabled