Unassignment of vendor

Hi,
In my organisation, there are 3 import vendors which are also being displayed in total vendor list. Although in total vendor list, they are blocked but are displayed if all vendors are chosen. Please suggest me if they can be unassigned from total list or not.
Regards,
Ashok

when you press F4 button in the vendor field, system will show the total vendor list in a window and this window has icons on the top of the window. There you can find Insert in Personal list icon, select the vendor and click on this icon, in this way next time whenever you press F4, first system will show those vendors which are selcted in personal list.
Rgds
Murali. N

Similar Messages

UNASSIGNMENT OF VENDOR CONTACT PERSON

We have implemented SRM 5.0. Is it possible to unassign a vendor contact person if the contact person are not to be used anymore?
I "unassigned" the contact person in the Org. Structure, but when using transaction BBPMAININT (Manage Business Partner Data), option Business Partner Data and Employee, the Contact person still appears in the selection list. I do not want to delete the contact person, as bid invitations has been sent to this contact.

Hi Marinda,
You can unassign or block this vendor contact person by using transaction code BP. Find out the business partner number of the vendor contact person and go to the status tab in T-code BP for the role vendor in business partner maintanance and click on block business partner.
This will ensure that you are unable to select this business partner in the search criteria.
Please assign points for usefull answers
Sundeep

Blocked vendor master (Ordering address) not considered in PO

Hi Team,
Recently we have upgraded our system to ECC6 from 4.6. After upgrade,
the system is not considering the vendor master (Ordering Address) during
Purchase Order creation if it is blocked at purchase org level under
alternate data. Whereas it was picking in 4.6 system.
Kindly provide the reason for such behavior and provide the solution if
at all we want those blocked vendor codes to be considered.
Thanks.

Hi,
Please try below SAP note for the same
Note 1609717 - Vendors with blocked purch orgs are not replicated correctly
Note 1607331 - Unassign a vendor from its Organizational unit
Regards,
Sandesh Sawant

Contact person of vendors created inconsistently in my organizative structu

Hi,
1.When I create a new contact person for one vendor, is created without position. The vendor is correctly created in vendors organizative structure and the contact person is pointed out there but in organizative structure the user hasn't got position.
2. In order to do a goods receipt the vendor user can't view their purchase order .
Regards
Jorge

Hi Atul
please you can see my response in bold letter
Contact persons for external partners (Vendors/bidders) are to be created from the web interface.
DO NOT USE BP transaction to maintain BUPA & org data !!!
Use web transactions instead. They are handling all the needed objects, and you can not do the same with BP.
In web transation "Maintain Business Partner", you can add contact for an existing vendor.
You can add a contact to a vendor, with or without creating a user ID (you can then create it later when needed).
I'm using BBPMAININT web service. Create employee for Business partner and I'm including the SAP user data.
Please see the related links, which will definitely help ->
Re: How to assign contact person user id to Vendor uploaded from ECC?
UNASSIGNMENT OF VENDOR CONTACT PERSON
Re: User Assignment to Vendor
I have seen the threads but I can't see nothing which resolve my problem
For displaying the POs of all the users, assign the standard SAP roles to the vendor user
Menu entry is 'Manage Buisiness Partners' (BBPMAININT) and is included in roles SAP_BBP_STAL_ADMINISTRATOR and SAP_BBP_STAL_PURCHASER, SAP_BBP_STAL_PURCHASE_MANAGER, SAP_BBP_STAL_OPERAT_PURCHASER, SAP_BBP_STAL_STRAT_PURCHASER.
In my case I am using a SAP_BBP_STAL_ADMINISTRATOR
So, I can create my SRM user with BBPMAININT, but my central person appears without description (with business partner) and there is no position connected to my new user. I suppose I don't need to create the position manually, is this correct?

Purchase block in purchasing data of BP

Hi all.
I have a block in the purchasing data of the BP transaction of one of my vendors, and the field is greyed out and cannot be changed. How can I unblock this vendor? The block is in the local purchasing organization, so I would suspect this block to be removed within the SRM, and not be running any vendor syncs with R/3.
BR Dennis

Hi
Please go through this links ->
OSS Note 574604 Various correction reports for EBP business partner
OSS Note 828170 - Not able to change PO that has a blocked preferred vendor
External BP: Mapping Purchasing Org
BP deletion
Re: how do i delete the BP from EBP ssytem
Re: UNASSIGNMENT OF VENDOR CONTACT PERSON
Re: Posting vs Purchasing Block for External Business Partner
Regards
- Atul

How to reduce the query execution time

hai all,
We have created query on Purchasing Cube 0PUR_C01 for
                            Purchase Order (PO) analysis for single vendor materials, but it is taking long time to execute (about 45 sec...).
In the above Query we have used the following things:
In Columns:
i) Exceptional aggregation for maximum & minimum PO Net Price using reference characteristic as Calendar Day.
ii) Minimum PO Price value we have multiplied with Actual GR Quantity for the calculation of Impact of Lowest PO Net Price.
iii) Number of vendors calculated key figure.
In Rows:i)     Only Material
In Filters:
i)     Plant with variable select Option u2013 Optional.
ii)     Calendar Year / Month with Select Option u2013 Optional.
iii)     Material with excluded Unassigned (#).
iv)     Vendor with excluded Unassigned (#).
Following are we have used for Performance:
i)     Aggregates using Propose from query (only for this query).
ii)     Partitioning on Calendar Year / Month (For 1 year 14 partitions) i.e. (04.2007 to 03.2008).
iii)      Collapse.
iv)     In RSRT we have set the following properties
Read Mode = H
Req.Status = 0
Catch Mode = 4
Persistence Mode = 3 (BLOB)
Optimization mode = 0.
Our inputs to this Query:
i)     We are passing plant range 1201 to 1299.
ii)     Calendar Year / Month 04.2007 to 03.2008.
So please suggest me how to reduce the execution time.
please help me.
Thanks,
kiran manyam

Hi,
First of all its a complete question with all the details. Good work.
As you partitioned the cube based on calmonth and you are also giving calmonth in selection, it will definitely work towards improved query performance.
As you are putting plant values in the selection, is there any aggregate available on plant characteristics? If not creating a aggregate on plant will help.
Regards,
Yogesh

BW:Inventory stock Report issue based on Vendor and PO number

Dear Guru's.
Requirement is to report different inventory stock's (Total Stock, blocked stock, stock in transit..etc) based on plant, material, storage location, vendor and purchase order in BW.
For Example:
Plant
material
Stock in Transit
Total Stock
1000
50000001
0,00
100kg
1000
50000002
500kg
600kg
If we drag the Vendor or Purchase Order Number into the report, Data gets Splitted into +ve (Inflow) and -Ve(Outflow) values.
For Example:
Plant
material
Vendor
Purchase Order
Stock in Transit
Total Stock
1000
50000001
54545
567896
+300 kg
+400kg
1000
50000001
-300kg
-300kg
1000
50000002
54549
567899
+900kg
+800kg
1000
50000002
-400kg
-200kg
I Think this is because no vendor assigned to outflow data. this is my guess i don't have much knowledge on MM. i have tried to restrict the keyfig's with stock category, but for most of the vendors or PO 's its unassigned.
But we need the data in single as follows. can any one suggest me any steps to achieve this in BI or BO.
Plant
material
Vendor
Purchase Order
Stock in Transit
Total Stock
1000
50000001
54545
567896
0,00
100 kg
1000
50000002
54549
567899
500 kg
600kg
Thanks in Advance,
Dev

Hi Sheshu and hi Srinu
Already tried constant selection but it did not helped, the same keyfigure value is displayed in all the rows.
that means the total stock value is repeated for all the vendors for a particular material.
For example:
Plant
material
Vendor
Purchase Order
Stock in Transit
Total Stock
1000
50000001
54545
567896
0,00 kg
+400kg
1000
50000001
54546
567898
0,00 kg
400kg
1000
50000001
0,00 kg
400kg
1000
50000002
54549
567899
+900kg
+800kg
1000
50000002
+ 900 kg
+ 800 kg
Regarding the BO settings, i need to try it.
Any more suggestions will be much more helpful.
Thanks and Regards, Sri

Unassigned nodes in the Stock report

Dear Gurus,
 We designed a "Stock Overview Report -Vendor wise".Now,we got 2 issues.The report output is as follows:
Vendor Batchno. MaterialNo. 0quantityTotalStock
 ABC HA123 MAT001 -20
 HB124 MAT002 -10
Unassigned HC120 MAT003 40
 RESULT 10.
Checked in MB5B,for each material and the values(-ve stock and Unassigned stock)eg..(-10+40=30),values are right.
Issue1
 Why do i get these Negative Values for stock against Vendor,whereas there's no Negative values against Unassgned??
 Issue2
 Client(SAP Consultant aswell)! doesnt want the "Unassigned"node and goes on to say that the report is wrong ,if Unassigned gets displayed!!
Am really stuck up with this for more than 2weeks,still unable to move ahead.Any Light on this would be really appreciative.
Manythanks

No Solution

Wich user-exit for Creating Vendor I must use?

Hi, experts
I have a requiriment on T/C XK01 & XK02 when customer is creating or modifying Vendor; it is when user put value on screen field "Payment Terms" (LFB1-ZTERM) this values must be same on next screen "PURCHASING DATA" on screen field "Terms of paymnt" (LFM1-ZTERM).
Which user exit do I use for this ( RFKRRANZ/SAPMF02K )?
Where to check value on screen field "Payment Terms" ( RFKRRANZ/SAPMF02K ) ?
I will appreciate any helpfull information, as soon as possible, thanks in advance.
Regards,
mgg
P.D. Points reward

Hi,
Why do you need user to input if you can copy automatically the value ZTERM from screen purchasing data into ZTERM in accounting screen? You can also pop up a message if user's selected value in accounting screen is different from purchasing data.
DATA: WA_STRUC(100) TYPE C,
 WA_LFB1 TYPE LFB1,
 WA_LFM1 TYPE LFM1.
FIELD-SYMBOLS: <FS_LFB1>, <FS_LFM1>.
WA_STRUC = '(SAPMF02K)LFB1'.
ASSIGN (WA_STRUC) TO <FS_LFB1>.
WA_LFB1 = <FS_LFB1>.
WA_STRUC = '(SAPMF02K)LFM1'.
ASSIGN (WA_STRUC) TO <FS_LFM1>.
WA_LFM1 = <FS_LFM1>.
WA_LFB1-ZTERM = WA_LFM1-ZTERM. "<-- change here
or
IF WA_LFB1-ZTERM <> WA_LFM1-ZTERM.
* pop up message
ENDIF.
<FS_LFB1> = WA_LFB1. "<-- change here
UNASSIGN <FS_LFB1>. "<-- change here
Regards,
Ferry Lianto

PAN NO. mandatory in Vendor Master

Hi,
Did anyone got solution for making PAN No. field mandatory in Vendor Master. Please share it with me.
Thanks

Hi,
In the system that I am using screen '103' is not defined. So the tab "Withholding Tax" also does not appear. So I cannot tell you exactly whether any Implicit Enhancement/Enhancement Point is available. Also I am unaable to find the exact table/structure and field name of the screen field VAT.
But you can try the implemenating the below mentioned code in the Function Exit.
If I suppose that the field VAT is present in structure RF02K, the code would be as follows:
FIELD-SYMBOLS <fs_rf02k> TYPE rf02k.
ASSIGN ('(SAPMF02K)RF02K') TO <fs_rf02k>.
IF <fs_rf02k> IS ASSIGNED.
 IF <fs_rf02k>-field1 is initial.
 MESSAGE 'VAT is a mandatory Field' TYPE 'E'.
 ENDIF.
 UNASSIGN <fs_rf02k>.
ENDIF.
Hope this helps.
Regards,
Abhisek.

Want to upload vendor masters thru FK01

< MODERATOR: All points have been UNASSIGNED and the message locked. Please do not share email addresses, documents, or links to copyrighted or company confidential information on these forums. If you have some information, please consider posting it to the [Wiki|https://wiki.sdn.sap.com/wiki/display/ERPFI/Home] rather than sharing via email.>
Is there any standard program, to upload vendor masters.
I have , vendor name, address, reco a/c, payment terms ....
I have tried thru BDC, but while recording, i am not getting all the address lines. Ony first address line is coming,
what is to be done ??
Thanks
amit

Use lsmw
Take direct input method with object 0040 with Method Standard 0001.
You can select the feilds that you wanted and upload directly.
Alternatively, Check the Feild status group settings of the Vendor group for teh suppression of Address details. You enable and record teh BDC.
reward if useful.
sarma

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

Trying to Submit an App to Vendor Portal. Can't get it to work.

HI,
I've spent about 14 hours trying to submit an App to the Vendor portal.   Running FIrefox 3.0.19 on Windows XP, SP3. Seems the push-buttons and forms just won't work. I've updated to the latest JRE 6.0.250.10 runtime, and still no luck.
Several folks reported this issue back in 2011 on other developer forums. Solution then was to use latest IE9,
with the upgrade to latest Java Runtime 6.   Is IE9 the only browser Vendor Portal works with?
FOr example, I can log into the Vendor Portal (ver. 4.0.1.3, i think, as of now, 24Sept2012), and update fields such as address, name, etc. But if I try to upload a 480x480 logo, it just keeps reporting "Invalid logo file" (or whatever the red error message is). And, when I press the button to do the "Add Rating" on the app description screen, I get
all the radio buttons, but when I click submit, the form disappears, (without indicating any update - ie no green
"G" for General Audience).   Attempts to press "Next" to get to next page, report that "Rating has not been added"
and must be added.
SO, I am stymied. I even tried the browser on the PLaybook, and even it will not allow a 480x480 logo file to be
uploaded successfully.
Is the Vendor Portal disabled? My Firefox+WinXP(sp3) platform is used to connect to numerous secure
sites, and has all the features enabled to allow secure uploads, and Java/Javascript operation.
This is a remarkably difficult process.   Any suggestions? Is there a Linux flavour combo that might work, or is
the Vendor Portal not online right now, for app submission?    Thanx for any info...
- Rus

More details: Trying to add a logo picture, using Vendor Portal website version 4.0.3.1.   I have confirmed,, using three different graphics packages, that my logo picture is 480x480 pixels.   Latest attempt is using Firefoix 13.0.1, from a MacBook Air!   (Bought in June 2012, latest Firefox.. all new code, latests JRE, etc. This platform works everywhere folks... )   Attempts to load a logo .jpg file fail, with a message "Please Select valid logo".
This is the Vendor Portal for adding Playbook Apps, and managing Vendor accounts. Pretty important thingy, no?
Website URL is: https://appworld.blackberry.com/isvportal
Been trying for two days to add a logo-picture, and the details of a completed app.   Anyone minding the store on this?? Anyone got any suggestions?   If I can determine what the problem is, I will post my solution here.   It occurs to me that this must be possible, somehow, no?
- Rus

Open advances given to vendor-urgent

Hi,
I want to know list of purchase orders which have open advances.
plz suggest me the report or transaction name where i will get this details of vendor/ purchase order and balance advance amount.

Hi,
Check this report in Accounts Payable Information systems
S_ALR_87012105 - List of Down Payments Open On Key Date - Vendors
Please let me know if you need more information.
Assign points if useful.
Regards
Sridhar M

Vendor Line Item not cleared after F110

Hi Gurus,
We encountered an issue. The payment run was processed last April 18 and the vendor invoices were captured during the payment run and in the aging report, these invoices didn't appear as Open Item.
In between April 19 until August 19, these invoices are not part of the proposal list until the when they run payment on August 20. The value is zero and in the proposal list, there is a value in the Reason to Print Advice "A".
What is the reason for this?
Thank you.

Hi Dianne Obviar,
For that invoice payment delete uncompleted payment
proposal.
U go through this path select F4 in run date field
There check it any un completed proposal is there and delete
that invoice line item will come for payable
Regards
Surya

Unassignment of vendor

Similar Messages

Maybe you are looking for