Possible to parking payment entry ( Ex.vendor payment and customer payment)

Hi Masters
Are you possible to parking payment entry , payment paid to vendor and payment received from customer if there any configuration or guide me how to parking payments.
Regards
Selva

Hi Javeed,
I thought wrongly you understand my question, Normally parking for sales invoice (T.code: F-22 Or FB70) purchase invoice (T.Code.F-43 Or FB60), General expenses entry (T.code: F-02). Normally the above documents park T.Code: FBV0,
my question is payment paid to vendor (T.Code: F-53) and payment received from customer (T.code: F-28), payment entry we can possible to parking.
If possible what T.code? or any configuration there tell me.
Thanks & regards
Selva.

Similar Messages

Bapi for vendor payment with details of tunover and blocked payment

Dear all
I want to know whether any BAPI available for the details of vendor payment made and the open item with blocked payment (with the reason for the blocked payment) and the turnover of the vendor for a particular fiscal year...................
The client want to get the output as mentioned below.
e.g...
PO no : 45629810
Inv.No : 73409 (Vendor's Invoice no.)
Payment : Paid amt with date and details
Payment : Outstanding (Due and Over Due with no.of days)
Blocked Payment : Amt with the reason for blocking the payment.
Turn Over : Total turn over for that fiscal year.
This is an urgent req. from my client,i will be very grateful if any one can help me over this issue ..............
Appreciate for any relevant answers and suggestion ...........
I am in ECC 6.0
Regards
Praveen

Hello Raj,
Unfortunately there is no BAPI for payment detals and other company code data. The only possibility is via direct input (external data transfer).
Please have a look at the following Easy-Access-path:
SAP Menu
-> Accounting
-> Bank Applications
   -> Loans Management
    -> Environment
     -> External Data Transfer
Within this menu entry you find diverse functions. Please start the function KCLJ to transfer data. Before you can do this you need to
prepare the transfer by creating your own transfer structure and so on. You can get further information on what to do here by navigating to
"Help   > Application help" within transaction KCLJ. From here you get to the right area of SAP library.
Thanks Amber

Scenario:vendor also a customer (payment has to knock off)

Dear Experts
Scenario:vendor also a customer (payment has to knock off)
Vendor invoice $6000
customer invoice$6000
when i am running APP run manually, on editing the payment proposal and assigning house bank and payment method the document is posting.
its updating in REGUH table.
If i run the APP run without edit proposal ,only payment is done for vendor ,customer is showing as a open item.(document is not knock off).
Its showing the error message in display log
Job started
Step 001 started (program SAPF110S, variant &0000000003167, user ID Log for proposal run for payment on 07.04.2011, identification RUN2
Due items with currency INR, pmnt method - items total is > 0
...none of the payment methods defined can be used for these items
Information re. vendor 21 / customer 2600018 / paying company code 9150 ...
... payment not possible because of reported error
Information re. vendor 21 / customer 2600018 / paying company code 9150 ...
Payment with currency INR, payment method P: No valid payment procedure
Information re. vendor 21 / customer 2600018 / paying company code 9150 ...
... payment not possible because of reported error
End of log
Job finished
I have maintained below parameters in vendors and customer master:
1)In control tab i have maintained customer and vendor no.
2)in payment transaction tab i have maintained payment method, house bank ,selected the check box clrg with customer and vendor

Please check that same payment method is assigned to both customer and vendor
Please also check out the OSS note:-
[https://websmp130.sap-ag.de/sap(bD1lbiZjPTAwMQ==)/bc/bsp/spn/sapnotes/index2.htm?numm=305414]
Regards
Gaurav

How to clear the down payment against the vendor invoice in the payment program?

A down payment is made $25 Later an invoice is posted for $100 Now i want to Pay $75 to Vendor But the Automatic payment program is not clearing the down payment against the vendor invoice. Could you please help how to clear the down payment against the vendor invoice in the payment program?

Swathi,
Need your help i have a strange situation
1) F-48 and document posted with document no = 15..... in company code = L002 with payment block getting populated automatically
2) F-48 and document posted with document no= 15..... in company code = Us11 without payment block and the screen does not even show payment block, I had to check this from BSEG table
My question is
a) How and where does this payment block is triggered through configured and how to process next steps.
b) when I use F-48, how do we do the actual payment, is there a check printing and linking it to the KZ document or is check printing done outside the system and the KZ document type does not have any linkage.
c) If I do FB60 for a higher amount how do we pay partial amount.
Your response is appreciated.

Vendor Master and Customer Master for FI AP/AR

hi FICO Gurus,
I am Sapna here and I have questions regarding the Mandatory fields for Vendor Master and Customer Master which would be mandatory for Running FI AP and AR. I am basically a MM Consultant but I have been asked to perform this role of Master Data at my current client.
I am quite familiar with the fact that these feilds are based on the needs of the bussiness and can be configured in IMG as required/optional or suppressed or diaplsy only.
What I am looking is
1. Are there any fileds list which is <b>Mandatory</b> for running FI AP/AR in global financial implemntation.
2. Also from FI Perspective what is <b>Good to have/Recommended fields</b> in Vendor Master and Cusotmer Master for Global Finacial implemtation.
Your help is greatly appreciated. Please point me in right direction...

OK all implementations are different so the client should have some imput here.
However you need to make sure certain address details are mandatory such as name, post code street and city.
You may always want an e mail address or phone number.
All AR & AP customer/ Vendors will need a recon account, so it is important there is one set up, but you also need to make sure in change mode this cannot be changed.
For Vendors you will require some kind of bank details and payment method.
For Customers if Dunning is being used you may need the Dunning Procedure and Accounting Clerk.
Also for a Customer there is the Sales Org view, and it is best to contact the SD consultant to see which fields are required here. The tax code, payment terms are normally mandatory.
For the Purchasing Org, I guess you would know about this...
Hope this helps.
Award points if useful.

Working on IDOC OUTBOUND FOR Vendor Master and Customer Master

Hi Group,
I need to create IDOC's for Vendor master and customer master using ALE. Whenever they create vendor/customer or changes to vendor/customer should create IDOC's.
Can anyone please help me out how to proceed? I know that we can use CREMAS/DEBMAS and CREMAS04/CREMAS...But I would like to know how to use those.
Thank-You,
Venky

Hi Sai,
Welcome to group.
Related to CREMAS/DEBMAS, for your situation, you can use the change pointers. With this, when ever there is an change/create, it will create an entry in CDHDR & CDPOS and based on that it will create the IDOCs for these.
Activate the change pointers for these message types and run the application RBDMIDOC periodically (whenever you want). This application will create the IDOCs based on your entries.
To activate the change pointers, the TCODEs are
BD50 Checking change pointer is activated for Message Type
BD52 Checking which fields are configured change pointer to create. (please make sure, an entry will exist in BDCP table)
I hope you know the remaining configuration related to partner profile entries (WE20) i.e. to which system you want to send the idocs and Inbound or Outbound etc.
Let me know if you need further info.
shylesh

Bapi For creation and change for Vendor Master and Customer Master

I am looking for BAPI to create and change Vendor Master and Customer Master which will not take me to standard SAP transaction but will work in the background
Explanation: BAPI to delete material (BAPI_MATERIAL_DELETE) take you to standard SAP screen of T-Code MM06 but BAPI to create material (BAPI_MATERIAL_SAVEDATA) creates material in the background i.e. does not take you to standard SAP screen of T-Code MM01
So in my case (i.e. to create and change Vendor Master and Customer Master ) I want BAPI which would work like BAPI to create material (BAPI_MATERIAL_SAVEDATA)

For general information,to find BAPIs associated with any business object :
Transaction : BAPI - choose alphabetical tab - Find customer - (right side choose - tools - create bapi list and search ) , you will get all the BAPIs associated with this particular business object
Mathews

Vendor payment allowed although vendor is blocked for payment

Hi
While booking invoice through MIRO, System automatically blocks the vendor line item in case variance exceeds the tolerance limit. The system enters an R in the field Payment block so that Financial Accounting cannot make payment for the invoice.
But when I am making payment through F-53, It is not restricting me to pay the vendor.
What are the settings required for restricting the payment?

Hello,
Payment block in vendor master will not restrict if you do F-53.
This is only being restricted when you make payment through automatic payment program F110.
Regards,
Ravi

DTW for PO's and Customer payments applied to oldest invoices.

Hi everyone in this forum, I'm so glad that there is a community like this one so we can request to expert and not so expert SAP users.
This thread is made with the intention of request help in the following matter: The company I started recently to work with, wants to upload all Purchase Orders via Excel (with information sent by our suppliers) as well as apply customer payments with information of our bank accounts.
And I have read a lot about the DTW (Data Transfer Workbench) and I know that it works for importing information; I know for PO's is possible but not sure about application of payments received.
Does someone out there knows if it's possible to use this functionality DTW for this.
And also guide me in how to fill up the templates, for example how will the records will be match, through the DocEntry field?
What happens if i enter the header manually in SAP, assigning a Document number and providing it to our supplier so we can import only the lines. In the Lines template where can I enter this number so the lines are created automatically without importing the header.
Thanks in advance for your help,

Hi Israel,
This is possible, but you would need to run the uploads in several steps.
Once you have uploaded the Purchase Orders, you would need to convert these to AP Invoices for making payments against (Purchase Orders are non financial documents).
You will need the docentry field from the PO to be created in order to link the invoices to the PO. Then, once you have the doc entry of the AP Invoices you can create vendor payments & link them to the invoices, and a method of payment.
It may be easier to use the SAP function "Payment Wizard" to generate payments based on invoices rather than DTW

Portugal Payment medium format - PS2 - configuration and custom program

Hello,
this is my first post here, so first of all "hi!" and second, sorry if this thread isn't in the right forum.
I need to do a custom copy of the PS2 payment medium format, which is used in Portugal. It would be a short development, I just need that the line starting with ":08:" only appears when using a pre-defined payment method.
I've seen that in the FBZP tcode, in the "Pmnt method in company code" customizing point, at the bottom there is this section, "Payment medium", where you can inform the Format (which it should be PS2) or the payment medium program (i think that for Portugal it's RFFOM100). You can only inform one option. Which one do you recommend? (I'm more used to work with purchase orders, so this are my first steps in the payment program)
So my question is, in order to do this custom code, should it be a copy of the PS2 format (ZPS2?) or a copy of the RFFOM100 program? In any case, where can i look for the code section where to replace the standard SAP code for our custom program?
Thank you very much!
Warm regards,
Gustavo

Hi Gustavo,
If you take a look in FBZP - Payment Method Country, you will see a "Payment Mathod" section. There you will have 2 payments programs type: Paymt Medium Workbench (PMW) and Classical.
PS2 payment medium format is only used for PMW type and RFF* for Classical PM. These work to print and execute payments through F110.
In my understading you should use PS2 because is the original need on your question.
I hope I help you. Reply me if you have more questions.

Urgent : Auto Clear Down Pyament with Vendor IV and Customer Billing

Dear friends,
I have problem about how to set the vendor invoice clear with down payment agianst PO automatically. BTW, customer billing how could be cleared automatically with down payment please give me suggesstion.
Thank for all of your help.

Dear Padma,
Thanks for your reply.
Caus my unclear statement make you confuse. Let me explain clearly.
I have two scenario:
1.One is customer down payment which should be cleaed wiht later billing,
2.The other scenario is vendor down payment also have to be cleared with later IV.
What my problem is, is that possible to make both clear transaction automatically generated after billing or IV ?
Or any suggestion processes should bo done to get the information of which items should be cleared.
Thank you very much!
Muriel

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

Rounding off differences for Vendor and Customer payment

Dear All,
Rounding off differences for vendor payment in T Code F-53 is giving the following error when I want to post.
Item category 06000 not allowed in accounting transaction 1000/0001
Message no. GLT2001
Diagnosis
The online document splitting is active in your system. Here, each document is assigned to a accounting transaction variant and each document row to an item category.
You determine for each business transaction variant which item categories can or must be posted here.
The following error occurred for the document you entered:
Item category 06000 in accounting transaction 1000, variant 0001 is not allowed.
System Response
The document cannot be posted.
Procedure
Check the document entered, the derivation of the business transaction variant, the derivation of the item category, and the assignment of the item categories to the business transaction variant.
Please advice
Regards
BIJUDAS

Thx for the quick answer Andreas. n further discussions we found that the actual requirement is to only have the payment history data for both the vendor and the customer only as a referece. I mean they dont want to have the actual accounts posted for historical data, since we have to anyway have a conversion for the GL accounts related data afterwards.
I hope i cleared what we want here. Do we have any way we can update the data in this case. Is there anyway we can have data stored in LIS possibly for such cases..
Any ideas

Vendor and customer payment

Hi Gurus,
i am developing a report to show details of vendor payment who is also a customer deducting all his payments Receivable i want to link the customer and vendor which is the fields.
Thanks
Nilesh

Dear Nilesh
Go to customer master General Data and select Control Data tab. There you can see a field "Vendor". Table is KNA1 - Field Name LIFNR. If you maintain the vendor code here, you can generate the rquired report.
thanks
G. Lakshmipathi

SAP IHC Payment notes and customer payment automation

Hi,
I have two questions related to IHC (In-house Cash):
1. Is there a way to customize payment notes in a payment order when it is created after a payment run in subsidiary company code? By default it has IDOC creation date, payment document (subsidiary) and company code (Subs) information. I would like to also add trading partner and invoice number to it so that the same is included in internal EBS notes to payee information.
2. How do you automate posting and clearing of customer account by internal EBS in intra-company settlement? For example, subsidiary 1 is making payment to subsidiary 2 in which case Subsidiary 1 is created as a customer in Subs 2 and the receivable needs to be automatically cleared when Subs 1 makes payment.
Thanks in advance.
Thanks,
Abhinav

Hi Manish,
we have the same issue in our system. Could you please help us know what you have done to correct this?
Regards
Gearoid

Possible to parking payment entry ( Ex.vendor payment and customer payment)

Similar Messages

Maybe you are looking for