Vendor Balances extractions
Hi Gurus!
I need extract the the open items from Vendor Balances but they gave me an output file format that have 3 parts:
1. header
2. Vendor line item
3. GL line items
I don't uderstand the difference between vendor line item and gl line item. Can a vendor line item have a gl line item or only header can have gl line items?
I found a bapi for extract open items ( BAPI_AP_ACC_GETOPENITEMS ), but I don't found the gl line items inside it.
How can I extract the gl line items? and what are the difference between both?
Thanks!
Go to transaction FBL1N and leave the vendor number blank, run the balances for all the vendor line items.
You need to restrict the balances to the reconciliation account in the selection parameters.
This will show you all the balances in your Trade accounts payables in your balance sheet account.
Usually there might be several reconciliation account created in the balance sheet for different vendor categories, i.e. inter co vendor, trade vendors, employee expenses, subcontractors etc.
Please choose which account you want to reconcile to the vendor balances. Usually companies choose default A/P Rec account as 200000 and will proceed to build up rec accounts in this series. Review your reconciliation accounts in the vendor master and use this information in the FBL1N transaction. Hope this helps.
Best - S
Similar Messages
-
Hi Gurus!
I need extract the the open items from Vendor Balances but they gave me an output file format that have 3 parts:
1. header
2. Vendor line item
3. GL line items
I don't uderstand the difference between vendor line item and gl line item. Can a vendor line item have a gl line item or only header can have gl line items?
I found a bapi for extract open items ( BAPI_AP_ACC_GETOPENITEMS ), but I don't found the gl line items inside it.
How can I extract the gl line items? and what are the difference between both?
Thanks!
Moderator message - Cross post locked
Edited by: Rob Burbank on May 27, 2009 4:22 PMHi
If there is any other parallel ledger active, you need to transfer the balance of that also in addition to ledger 00.
Then you will be able to see the balance of vendor/customers in addition to recon account balances
Thanks
Ashok -
Hi!
I need a BAPI for extract the Vendor Balances and other for load the Vendor Balances.
Do they exist?try to search in Se37
BAPI_AP_ACC_GETBALANCEDITEMS Vendor Account Clearing Transactions in a given Period
BAPI_AP_ACC_GETCURRENTBALANCE Vendor Account Closing Balance in Current Fiscal Year
BAPI_AP_ACC_GETKEYDATEBALANCE Vendor Account Balance at Key Date
BAPI_AP_ACC_GETPERIODBALANCES Posting Period Balances per Vendor Account in Current Fiscal Year
regards
Prabhu -
Hi,
We are developing a report on vendor balances.
We want to take the vendor total open items upto March 31, 2007 as a single figure, after that we want to show as invoice level.
In which table we can get consolidated fiscal year wise open items for vendor.
SateeshHi Anupam,
Thanks for Quick reply.
If we extract all the years data it will be big pain to our local database table.
Thats why we want to take consolidate balnces upto last fiscal year, after that we want to show the invoice level.
Sateesh -
Urgent - "Vendor balances carried forward and line items report."
Hello,
Is there any report which will give me the vendor balance carried forward and the line items during that period.
==============================================
Format-
eg: statement taken from 1.8.2006 to 30.9.2006 is required as
Bal b/f 25000 cr.
3.8.2006 Purchase Inv XXX 3000 cr.
5.9.2006 Payment Chq XX 26000 dr.
Bal c/f 2000 cr.
==============================================
Please advise on this.....
Regards,
Jthanks for the response, but i have already tried those transactions.
FK10N will give me the periodic bal statements and NOT line items display which will also have balance carried forward.
F.41 and F.43 again gives the periodic and line items...but i want the vendor balances to be in the format given above..
like say, account statement.
Please advise............
Regards,
J -
Hello,
I need to run a query or transaction to find the vendor opening and closing balances at the beginning and end of the financial years. Is there any standard report that can provide both these amounts? or any transparent tables that hold them?
Thanks a lot!Hi,
Go to SAP Menu >Accounting >Accounts Payable >Information System >Reports for Accounts Payable Accounting >Vendor Balances
Here you can find variety of reports for vendor.
Thanks,
Nirav -
Difference between vendor open items and vendor balance
Hi all,
I have the following problem: When I display open items for a vendor with a special general ledger code, it happens that for some vendors, the total of these open items do not equal the vendor balance concerning this special GL code.
Or in other words, the sum of BSIK and BSAK entries are not equal to the totals in table LFC3.
I identified SAP standard program RFEWA003, that gives me exactly these differences, but how can I correct the entry in LFC3?
The difference only occurs in the current fiscal year and is in the carryforward amount of LFC3. I checked the totals of debits and credits for the current year which are 100% correct.
Our last fiscal year was shortened (only 11 months). Could this be the reason?
How to correct LFC3 entries? Any correction program existing that is not related to Euro conversion?
Thanks for your appreciated help,
andie.m
Edited by: andie.m on Jul 2, 2009 2:49 PMHi Michael,
Thanks for your answer, but I tried already the carry forward. It just says there is nothing to be treated.
I thought there might be a special carry forward transaction for special general ledger accounts, but it does not seem.
Any other ideas?
Thanks for your help.
Andreas -
Vendor Master Extraction from Legacy
Hi guys,
We have 2 different legacy systems here (4.5b and 4.6c) and I am trying to extract the vendor master from both of them and integrate them into the new mysap2004.
What is the best way to extract the vendor master along with the address , punchasing doc, bank details, partner functions,etc ? Any sample program for vendor master extraction is most welcome. Here is my extract layout.
ADDRESS
Source File /Table Name Field Name Field Type / Length Format Rule / Logic
Source File /Table Name Field Name Field Type / Length Format Rule / Logic
SZA1_D0100 Title (TITLE_MEDI) CHAR/30 Not used
ADDR1_DATA Name (NAME1) CHAR/40 Bring values over as is.
ADDR1_DATA Name (NAME 2) CHAR/40 Bring values over as is.
ADDR1_DATA Name (NAME 3) CHAR/40 Bring values over as is.
ADDR1_DATA Name (NAME 4) CHAR/40 Bring values over as is.
ADDR1_DATA Search Term 1 (SORT1) CHAR/20 Convert to HPC methodology.
O-First 8 char. of vendor name
R- First 8 char. of vendor name
B- First 8 char. of vendor name
ADDR1_DATA Search Term 2 (SORT2) CHAR/20 Bring values over as is.
ADDR1_DATA Street/House Number
(Street) CHAR/60 Bring values over as is.
ADDR1_DATA House Number
(HOUSE_NUM1) CHAR/10 Bring values over as is.
ADDR1_DATA Building (number or code)
(BUILDING) CHAR/20 Bring values over as is.
ADDR1_DATA Room or apartment number
(ROOMNUMBER) CHAR/10 Bring values over as is.
ADDR1_DATA Floor in building
(FLOOR) CHAR/10 Bring values over as is.
ADDR1_DATA c/o name
(NAME_CO) CHAR/40 Bring values over as is.
ADDR1_DATA Street 2
(STR_SUPPL1) CHAR/40 Bring values over as is.
ADDR1_DATA Street 3
(STR_SUPPL2) CHAR/40 Bring values over as is.
ADDR1_DATA Street 4
(STR_SUPPL3) CHAR/40 Bring values over as is.
ADDR1_DATA Street 5
(LOCATION) CHAR/40 Bring values over as is.
ADDR1_DATA City
(CITY1) CHAR/40 Bring values over as is.
ADDR1_DATA District
(CITY2) CHAR/40 Bring values over as is.
ADDR1_DATA City (different from postal city)
HOME_CITY CHAR/40 Bring values over as is.
ADDR1_DATA City postal code
(POST_CODE1) CHAR/10 Zip Code. Bring values over as is.
ADDR1_DATA Country
(COUNTRY) CHAR/3 Bring values over as is.
ADDR1_DATA Region (State, Province, County)
(REGION) CHAR/3 E.g., NJ New Jersey, CO Colorado, etc. Bring values over as is.
ADDR1_DATA Time Zone
(TIME_ZONE) CHAR/6 Bring values over as is.
ADDR1_DATA Transportation Zone
(TRANSPZONE) CHAR/10 Bring values over as is.
ADDR1_DATA Regional Structure Group
(REGIOGROUP) CHAR/8 Bring values over as is.
ADDR1_DATA P. O. Box
(PO_BOX) CHAR/10 Bring values over as is.
ADDR1_DATA P.O. Box Postal Code
(POST_CODE2) CHAR/10 Bring values over as is.
ADDR1_DATA Language Key
(LANGU) LANG/1 Bring values over as is.
SZA1_D0100 Telephone
(TEL_NUMBER) CHAR/30 Bring values over as is.
SZA1_D0100 Telephone Number Extension
(TEL_EXTENS) CHAR/10 Bring values over as is.
SZA1_D0100 Fax
(FAX_NUMBER) CHAR/30 Bring values over as is.
SZA1_D0100 Fax Extension Number
(FAX_EXTENS) CHAR/10 Bring values over as is.
SZA1_D0100 E-mail
(SMTP_ADDR) CHAR/240 Bring values over as is.
ADDR1_DATA Standard Communication Type
(DEFLT_COMM) CHAR/3 Bring values over as is.
ADDR1_DATA Data Line
(EXTENSION1) CHAR/40 Not used. Do not bring over field values.
Note: This field will be available to populate with other data during the conversion.
ADDR1_DATA Telebox
(EXTENSION2 CHAR/40 Not used. Do not bring over field values.
Note: This field will be available to populate with other data during the conversion.
ADDR1_DATA Comments
(REMARK) CHAR/50 Bring values over as is.
CONTROL
Source File /Table Name Field Name Field Type / Length Format Rule / Logic
LFA1 Customer
(KUNNR) CHAR/10 Bring values over as is.
LFA1 Authorization
(BEGRU) CHAR/4 It is to be determined if this field will be used in the future. If yes, bring values over as is from HPC and populate with vendor account group code for Foods.
LFA1 Trading Partner
(VBUND) CHAR/6 Bring values over as is.
LFA1 Group Key
(KONZS) CHAR/10 Not used
LFA1 Tax Code 1
(STCD1) CHAR/16 Bring values over as is.
LFA1 Tax Code 2
(STCD2) CHAR/11 Bring values over as is.
LFA1 Fiscal Address
(FISKN) CHAR/10 Bring values over as is.
LFA1 Jurisdiction Code
(TXJCD) CHAR/15 Bring values over as is.
LFA1 VAT Registration No.
(STCEG) CHAR/20 Bring values over as is.
LFA1 Tax Office
(FISKU) CHAR/10 Bring values over as is.
LFA1 Tax Number
(STENR) CHAR/18 Bring values over as is.
LFA1 Industry
(BRSCH) CHAR/4 Bring values over as is.
LFA1 Train Station
(BAHNS) CHAR/25 Not used.
LFA1 Transportation Zone
(LZONE) CHAR/10 Bring values over as is.
LFA1 Actual QM Sys.
(QSSYS) CHAR/4 Bring values over as is.
LFA1 QM System To
(QSSYSDAT) DATS/8 Bring values over as is.
LFA1 DAK
(J_1FDAK) CHAR/8 Bring values over as is.
PAYMENT TRANSACTIONS
Source File /Table Name Field Name Field Type / Length Format Rule / Logic
LFBK Bank Country Key
(BANKS) CHAR/3 Bring values over as is.
LFBK Bank Key
(BANKL) CHAR/15 Bring values over as is.
LFBK Bank Account
(BANKN) CHAR/18 Bring values over as is.
BNKA Bank Name
(BANKA) CHAR/60 Foods - Bring values over as is.
HPC Populate with Bank Account Number
LFA1 Alternative Payee
(LNRZA) CHAR/10 Bring values over as is.
LFA1 Individual Spec.
(XZEMP) CHAR/1 Bring values over as is.
LFA1 Spec. Per. Reference
(XLFZA) CHAR/1 Bring values over as is.
ACCOUNTING INFORMATION ACCOUNTING
Source File /Table Name Field Name Field Type / Length Format Rule / Logic
LFB1 Recon. Account
(AKONT) CHAR/10 Bring values over as is.
LFB1 Sort Key
(ZUAWA) CHAR/3 Bring values over as is.
LFB1 Head Office
(LNRZE) CHAR/10 Bring values over as is.
LFB1 Authorization
(BEGRU) CHAR/4 Bring values over as is.
LFB1 Cash Mgmnt Group
(FDGRV) CHAR/10 Bring values over as is.
LFB1 Release Group
(FRGRP) CHAR/4 Bring values over as is.
LFB1 Minority Indicator
(MINDK) CHAR/3 Bring values over as is.
LFB1 Certification Date
(CERDT)
DATS/8 Bring values over as is.
LFB1 Interest Indicator
(VZSKZ) CHAR/2 Bring values over as is.
LFB1 Last Key Date
(ZINDT) DATS/8 Bring values over as is.
LFB1 Interest Cycle
(ZINRT) NUMC/2 Bring values over as is.
LFB1 Last Interest Run
(DATLZ) DATS/8 Bring values over as is.
LFB1 Withholding Tax Code
(QSSKZ) CHAR /2 Bring values over as is.
LFB1 Withholding Tax Country
(QLAND) CHAR /3 Bring values over as is.
LFB1 Recipient Type
(QSREC) CHAR /2 Bring values over as is.
LFB1 Exemption Number
(QSZNR) CHAR /10 Bring values over as is.
LFB1 Valid Until
(QSZDT) DATS/8 Bring values over as is.
LFB1 Exemption Authority
(QSBGR) CHAR /1 Bring values over as is.
LFB1 Previous Account No.
(ALTKN) CHAR /10 Do not bring over existing values. Will populate during vendor conversion when legacy vendor number is replaced by a new vendor number.
LFB1 Personnel Number
(PERNR) NUMC/8 Bring values over as is.
PAYMENT TRANSACTIONS ACCOUNTING
Source File /Table Name Field Name Field Type / Length Format Rule / Logic
LFB1 Payment Terms
(ZTERM) CHAR/4 Refer to data mapping spreadsheet later in this spec.
LFB1 Tolerance Group
(TOGRU) CHAR/4 Bring values over as is.
LFB1 Credit Memo Terms
(GUZTE) CHAR/4 Bring values over as is.
LFB1 Chk. Double Inv.
(REPRF) CHAR/1 Bring values over as is.
LFB1 Chk. Cashing Time
(KULTG) DEC/3 Bring values over as is.
LFB1 Payment Methods
(ZWELS) CHAR/10 Refer to data mapping spreadsheet later in this spec.
LFB1 Alternate Payee
(LNRZB) CHAR/10 Bring values over as is.
LFB1 Individual Payment
(XPORE) CHAR/1 Bring values over as is.
LFB1 Bill of Exchange Limit
(WEBTR) CURR/13
Decimal/2 9999999999999.99 Bring values over as is.
LFB1 Payment Advance By EDI
(XEDIP) CHAR/1 Bring values over as is.
LFB1 Payment Block
(ZAHLS) CHAR/1 Bring values over as is.
LFB1 House Bank
(HBKID) CHAR/5 Not used. Do not bring forward existing values.
LFB1 Grouping Key
(ZGRUP) CHAR/2 Bring values over as is.
LFB1 Payment Method Supplement
(UZAWE) CHAR/2 Bring values over as is.
LFB1 Alternate Payee Indicator
(XLFZB) CHAR/1 Bring values over as is.
LFB1 Tolerance Group
(TOGRR) CHAR/4 Bring values over as is.
CORRESPONDENCE ACCOUNTING
Source File /Table Name Field Name Field Type / Length Format Rule / Logic
LFB5 Dunning Procedure
(MAHNA) CHAR/4 Bring values over as is.
LFB5 Dunning Recipient
(LFRMA) CHAR/10 Bring values over as is.
LFB5 Last Dunned
(MADAT) DATS/8 Bring values over as is.
LFB5 Dunning Clerk
(BUSAB) CHAR/2 Bring values over as is.
LFB5 Dunning Block
(MANSP) CHAR/1 Bring values over as is.
LFB5 Legal Dunning Proceedings
(GMVDT) DATS/8 Bring values over as is.
LFB5 Dunning Level
(MAHNS) NUMC/1 Bring values over as is.
LFB1 Grouping Key
(MGRUP) CHAR/2 Bring values over as is.
LFB1 Local Processing
(XDEZV) CHAR/1 Bring values over as is.
LFB1 Acct. Clerk
(BUSAB) CHAR/2 Bring values over as is.
LFB1 Account with Vendor
(EIKTO) CHAR/12 Bring values over as is.
LFB1 Clerk at Vendor
(ZSABE) CHAR/15 Bring values over as is.
LFB1 Acct. Clk. Tel. No.
(TLFNS) CHAR/30 Bring values over as is.
LFB1 Clerks Fax
(TLFXS) CHAR/31 Bring values over as is.
LFB1 Clerks Internet
(INTAD) CHAR/130 Bring values over as is.
LFB1 Account Memo
(KVERM) CHAR/30 Bring values over as is.
PURCHASING DATA
Source File /Table Name Field Name Field Type / Length Format Rule / Logic
LFM1 Order Currency
(WAERS) CUKY/5 Bring values over as is.
LFM1 Terms of Payment
(ZTERM) CHAR/4 Refer to data mapping spreadsheet later in this spec.
LFM1 Incoterms (Part 1)
(INCO1) CHAR/3 Refer to data mapping spreadsheet later in this spec.
LFM1 Incoterms (Part 2)
(INCO2)
CHAR/28 Bring values over as is.
LFM1 Minimum Order Value
(MINBW) CURR/13
Decimal/2 9999999999999.99 Bring values over as is.
LFM1 Schema group, vendor
(KALSK) CHAR/2 Bring values over as is.
LFM1 Pricing Date Cat.
(MEPRF) CHAR/1 Bring values over as is.
LFM1 Order Optim. Rest
(BOPNR) CHAR/4 Bring values over as is.
LFM1 Salesperson
(VERKF) CHAR/30 Bring values over as is.
LFM1 Telephone
(TELF1) CHAR/16 Bring values over as is.
LFM1 Acc. With Vendor
(EIKTO) CHAR/12 Bring values over as is.
LFM1 GR. Based Inv. Verif.
(WEBRE) CHAR/1 Bring values over as is.
LFM1 Auto.Eval. GR Setmt. Del.
(XERSY) CHAR/1 Bring values over as is.
LFM1 Auto.Eval. GR Setmt. Ret.
(XERSR) CHAR/1 Bring values over as is.
LFM1 Acknowledgement Reqd.
(KZABS) CHAR/1 Bring values over as is.
LFM1 Automatic Purchase Order
(KZAUT) CHAR/1 Bring values over as is.
LFM1 Subsequent Settlement
(BOLRE) CHAR/1 Bring values over as is.
LFM1 Subseq. Sett. Index
(BOIND) CHAR/1 Bring values over as is.
LFM1 B. Vol.Comp./Ag. Nec.
(UMSAE) CHAR/1 Bring values over as is.
LFM1 Doc. Index Active
(BLIND) CHAR/1 Bring values over as is.
LFM1 Returns Vendor
(KZRET) CHAR/1 Bring values over as is.
LFM1 Srv.-Based Inv. Ver.
(LEBRE) CHAR/1 Bring values over as is.
LFM1 ABC Indicator
(LFABC) CHAR/1 Bring values over as is.
LFM1 Mode Of Transport-Border
(EXPVZ) CHAR/1 Bring values over as is.
LFM1 Office of Entry
(ZOLLA) CHAR/6 Bring values over as is.
LFM1 Sort Criterion
(SKRIT) CHAR/1 Bring values over as is.
LFM1 PROACT Control Prof.
(PAPRF) CHAR/4 Bring values over as is.
LFM1 Revaluation Allowed
(XNBWY) CHAR/1 Bring values over as is.
LFM1 Grant Discount In Kind
(NRGEW) CHAR/1 Bring values over as is.
LFM1 Relevant for Price Determination
(PRFRE) CHAR/1 Bring values over as is.
LFM1 Relevant for Agency Business
(AGREL) CHAR/1 Bring values over as is.
LFM1 Shipping Conditions
(VSBED) CHAR/2 Bring values over as is.
LFM1 Purchasing Group
(EKGRP) CHAR/3 Bring values over as is.
LFM1 Planned Delivery Time
(PLIFZ) DEC/3 Bring values over as is.
LFM1 Confirmation Control
(BSTAE) CHAR/4 Bring values over as is.
LFM1 Unit of Measure Group
(MEGRU) CHAR/4 Bring values over as is.
LFM1 Rounding Profile
(RDPRF) CHAR/4 Bring values over as is.
LFM1 Price Marking Agreed
(LIPRE) CHAR/2 Bring values over as is.
LFM1 Rack jobbing service agreed
(LISER) CHAR/1 Bring values over as is.
LFM1 Order entry by vendor
(LIBES) CHAR/1 Bring values over as is.
LFM1 Serv. Level
(VENSL) DEC/4
Decimal/1 Bring values over as is.
PARTNER FUNCTIONS
Source File /Table Name Field Name Field Type / Length Format Rule / Logic
WYT3 Partner Function
(PARVW) CHAR/2 Bring values over as is.
WRF02K Number (Partner)
(GPARN) CHAR/10 Map to new partner number in vendor correlation table.
ALTERNATE DATA
(Purchasing Data)
Source File /Table Name Field Name Field Type / Length Format Rule / Logic
LFM2 Order Currency
(WAERS) CUKY/5 Bring values over as is.
LFM2 Terms of Payment
(ZTERM) CHAR/4 Refer to data mapping spreadsheet later in this spec.
LFM2 Incoterms (Part 1)
(INCO1) CHAR/3 Refer to data mapping spreadsheet later in this spec.
LFM2 Incoterms (Part 2)
(INCO2)
CHAR/28 Bring values over as is.
LFM2 Minimum Order Value
(MINBW) CURR/13
Decimal/2 Bring values over as is.
LFM2 Schema group, vendor
(KALSK) CHAR/2 Bring values over as is.
LFM2 Pricing Date Cat.
(MEPRF) CHAR/1 Bring values over as is.
LFM2 Order Optim. Rest
(BOPNR) CHAR/4 Bring values over as is.
LFM2 Salesperson
(VERKF) CHAR/30 Bring values over as is.
LFM2 Telephone
(TELF1) CHAR/16 Bring values over as is.
LFM2 Acc. With Vendor
(EIKTO) CHAR/12 Bring values over as is.
LFM2 GR. Based Inv. Verif.
(WEBRE) CHAR/1 Bring values over as is.
LFM2 Auto.Eval. GR Setmt. Del.
(XERSY) CHAR/1 Bring values over as is.
LFM2 Auto.Eval. GR Setmt. Ret.
(XERSR) CHAR/1 Bring values over as is.
LFM2 Acknowledgement Reqd.
(KZABS) CHAR/1 Bring values over as is.
LFM2 Automatic Purchase Order
(KZAUT) CHAR/1 Bring values over as is.
LFM2 Subsequent Settlement
(BOLRE) CHAR/1 Bring values over as is.
LFM2 Subseq. Sett. Index
(BOIND) CHAR/1 Bring values over as is.
LFM2 B. Vol.Comp./Ag. Nec.
(UMSAE) CHAR/1 Bring values over as is.
LFM2 Doc. Index Active
(BLIND) CHAR/1 Bring values over as is.
LFM2 Returns Vendor
(KZRET) CHAR/1 Bring values over as is.
LFM2 Srv.-Based Inv. Ver.
(LEBRE) CHAR/1 Bring values over as is.
LFM2 ABC Indicator
(LFABC) CHAR/1 Bring values over as is.
LFM2 Mode Of Transport-Border
(EXPVZ) CHAR/1 Bring values over as is.
LFM2 Office of Entry
(ZOLLA) CHAR/6 Bring values over as is.
LFM2 Sort Criterion
(SKRIT) CHAR/1 Bring values over as is.
LFM2 PROACT Control Prof.
(PAPRF) CHAR/4 Bring values over as is.
LFM2 Revaluation Allowed
(XNBWY) CHAR/1 Bring values over as is.
LFM2 Grant Discount In Kind
(NRGEW) CHAR/1 Bring values over as is.
LFM2 Relevant for Price Determination
(PRFRE) CHAR/1 Bring values over as is.
LFM2 Relevant for Agency Business
(AGREL) CHAR/1 Bring values over as is.
LFM2 Shipping Conditions
(VSBED) CHAR/2 Bring values over as is.
LFM2 Purchasing Group
(EKGRP) CHAR/3 Bring values over as is.
LFM2 Planned Delivery Time
(PLIFZ) DEC/3 Bring values over as is.
LFM2 Confirmation Control
(BSTAE) CHAR/4 Bring values over as is.
LFM2 Unit of Measure Group
(MEGRU) CHAR/4 Bring values over as is.
LFM2 Rounding Profile
(RDPRF) CHAR/4 Bring values over as is.
LFM2 Price Marking Agreed
(LIPRE) CHAR/2 Bring values over as is.
LFM2 Rack jobbing service agreed
(LISER) CHAR/1 Bring values over as is.
LFM2 Order entry by vendor
(LIBES) CHAR/1 Bring values over as is.
LFM2 Serv. Level
(VENSL) DEC/4
Decimal/1 Bring values over as is.
ALTERNATE DATA
(Partner Functions)
Source File /Table Name Field Name Field Type / Length Format Rule / Logic
WYT3 Partner Function
(PARVW) CHAR/2 Bring values over as is.
WRF02K Number (Partner)
(GPARN) CHAR/10 Map to new partner number in vendor correlation table.Hi Shareen,
Have you looked Master Data Distribution (ALE) for Vendor since your legacy system are SAP?
Please check t/code BD14 (Send Vendor Master Data) and BD15 (Get Vendor Master Data).
Hope this will give you an idea.
Regards,
Ferry Lianto -
Vendor balance shows discrepancy between S_ALR_87012082 and FAGLB03.
Dear expert,
These 2 reports currently shows discrepancy in balance.
I came to know S_ALR_87012082 report ( vendor balance in local currnecy) has more vendor records than FAGLB03.
Namely, some of vendors are not displaying in FAGLB03 but showing S_ALR_87012082 .
Could you inspire me why this problem arised and how to fix it?
Is it related to balance carry forward something?
where should i doubt?
Sincerely,
J.
Edited by: Jimmy Choi on Jan 3, 2011 5:51 PMIf you do not see balance carryforward amounts in FAGBL03 are you using all vendor Recon accounts?
-
I want to find the vendor balance as from fbl1n?
Hi all,
I am preparing a report where I need to get the vendor balance till date, for a particular employee, as I see in t-code fbl1n.
Can anyone specify how can i get that in my report , where it is stored???
Also I checked out t-code pc00_m40_term, where there is notice date and relieving date of employee.
The relieving date is stored in pa0000, but where is this notice date stored, actually this is the resignation date, and i want it in my program.
Any help would be highly appreciated.
Regards
TarunHi Tarun,
I think you have to choose wrong forum.
T-Code is related to SAP R/3 and its SAP B1 forum.
choose right forum to get desired result.
Thanks,
Srujal Patel -
Hi Friends,
my client wants to know, what is the other side of the entry made to vendors balance.
I couldnt find any field in vendor reports which tells me what is other side of the entry, if I pull GL account number it gives me the recon. account for the vendor and not the other side of entry.
Please let me know if there is any way through which I can show that in vendor balance report.
ThanksHi Gurus
can you please help me with this issue.
We have a regular invoice of 5000$ and a Vendor credit for 900$, but the F110 payment run is not picking the 900$ credit but picking the invoice 5000
It gives me the error "No pymt possible because items with a debit bal.still exist; see job log".
Both the documents has the payment method on them, but still the credits are not being cleared...please advise.
Thanks
MSJ -
Hi Seniors,
Please help me with this issue........i have to develope a New report Vendor balance Reconcillation ......Using the Standard report S_ALR_87012082 vendor balances in local currency.....it should be same like this Standard report but this Report is not Designed to give Line Items Because it has Picked up the Data only from few tables like LFA1 LFB1 LFC3.....which give Direct Balances in these tables......But i have Developed a report to Some Extent....But Finding it Difficult in Adding a Special GL Date which is Reflecting in the LFC3 Table....I have to Keep a Check Box Special GL balances in the Selection-Screen when when ever i select Special GL Balances indicator ....Date from LFC3
should be Selected and Addred to the Final in the Internal Table....I have Written a program .......Based on GSBER And LIFNR SUBTOTALS.....I have to Add this New check box in this Slection-Screen.....this report should be same like this Standard Report....S_ALR_87012082...the Program for this Report is RFKSLD00...please tel me the logic or help me with the Modification my below Report.....If i am not clear please reply me back...
waiting for your replys...
Thank you...
*& Report ZVENDOR_BALANCES
REPORT ZMM_PO_CHECKLIST.
TYPE-POOLS : SLIS.
DATA: it_fcat TYPE slis_t_fieldcat_alv,
wa_fcat LIKE LINE OF it_fcat,
lt_top_of_page TYPE slis_t_listheader,
ls_layout TYPE slis_layout_alv,
gt_events TYPE slis_t_event.
TYPES : BEGIN OF TY_BSEG,
LIFNR TYPE BSEG-LIFNR,
BUKRS TYPE BSEG-BUKRS,
BELNR TYPE BSEG-BELNR,
GJAHR TYPE BSEG-GJAHR,
SHKZG TYPE BSEG-SHKZG,
GSBER TYPE BSEG-GSBER,
DMBTR TYPE BSEG-DMBTR,
WRBTR TYPE BSEG-WRBTR,
SGTXT TYPE BSEG-SGTXT,
buzei TYPE bseg-buzei,
buzid TYPE bseg-buzid,
augdt TYPE bseg-augdt,
augcp TYPE bseg-augcp,
augbl TYPE bseg-augbl,
bschl TYPE bseg-bschl,
koart TYPE bseg-koart,
umskz TYPE bseg-umskz,
zuonr TYPE bseg-zuonr,
saknr TYPE bseg-saknr,
hkont TYPE bseg-hkont,
END OF TY_BSEG,
BEGIN OF TY_LFA1,
LIFNR TYPE LFA1-LIFNR,
LAND1 TYPE LFA1-LAND1,
NAME1 TYPE LFA1-NAME1,
END OF TY_LFA1,
BEGIN OF TY_LFC1,
LIFNR TYPE LFC1-LIFNR,
BUKRS TYPE LFC1-BUKRS,
GJAHR TYPE LFC1-GJAHR,
UMSAV TYPE LFC1-UMSAV,
END OF TY_LFC1,
BEGIN OF TY_BKPF,
BUKRS TYPE BKPF-BUKRS,
BELNR TYPE BKPF-BELNR,
GJAHR TYPE BKPF-GJAHR,
BLart type bkpf-blart,
BUDAT TYPE BKPF-BUDAT,
bldat TYPE bkpf-bldat,
monat TYPE bkpf-monat,
usnam TYPE bkpf-usnam,
xblnr TYPE bkpf-xblnr,
END OF TY_BKPF,
BEGIN OF it_bsak,
bukrs TYPE bsak-bukrs,
lifnr TYPE bsak-lifnr,
umskz TYPE bsak-umskz,
augdt TYPE bsak-augdt,
augbl TYPE bsak-augbl,
zuonr TYPE bsak-zuonr,
gjahr TYPE bsak-gjahr,
belnr TYPE bsak-belnr,
buzei TYPE bsak-buzei,
budat TYPE bsak-budat,
bldat TYPE bsak-bldat,
xblnr TYPE bsak-xblnr,
blart TYPE bsak-blart,
monat TYPE bsak-monat,
bschl TYPE bsak-bschl,
shkzg TYPE bsak-shkzg,
gsber TYPE bsak-gsber,
dmbtr TYPE bsak-dmbtr,
wrbtr TYPE bsak-wrbtr,
sgtxt TYPE bsak-sgtxt,
saknr TYPE bsak-saknr,
hkont TYPE bsak-hkont,
END OF it_bsak,
BEGIN OF it_skat,
spras TYPE skat-spras,
saknr TYPE skat-saknr,
txt20 TYPE skat-txt20,
txt50 TYPE skat-txt50,
END OF it_skat,
BEGIN OF TY_ITAB,
GSBER TYPE BSEG-GSBER,
LIFNR TYPE BSEG-LIFNR,
BUKRS TYPE BSEG-BUKRS,
BELNR TYPE BSEG-BELNR,
GJAHR TYPE BSEG-GJAHR,
SHKZG TYPE BSEG-SHKZG,
GSBER TYPE BSEG-GSBER,
DMBTR TYPE BSEG-DMBTR,
WRBTR TYPE BSEG-WRBTR,
SGTXT TYPE BSEG-SGTXT,
buzei TYPE bseg-buzei,
buzid TYPE bseg-buzid,
augdt TYPE bseg-augdt,
augcp TYPE bseg-augcp,
augbl TYPE bseg-augbl,
bschl TYPE bseg-bschl,
koart TYPE bseg-koart,
umskz TYPE bseg-umskz,
zuonr TYPE bseg-zuonr,
saknr TYPE bseg-saknr,
hkont TYPE bseg-hkont,
LIFNR TYPE LFA1-LIFNR,
LAND1 TYPE LFA1-LAND1,
NAME1 TYPE LFA1-NAME1,
DMBTR_H TYPE BSEG-WRBTR,
DMBTR_S TYPE BSEG-WRBTR,
DH TYPE BSEG-WRBTR,
DS TYPE BSEG-WRBTR,
HS TYPE BSEG-WRBTR,
BAL TYPE BSEG-WRBTR,
FLAG TYPE C,
LIFNR TYPE LFC1-LIFNR,
BUKRS TYPE LFC1-BUKRS,
GJAHR TYPE LFC1-GJAHR,
UMSAV TYPE LFC1-UMSAV,
UM(15) TYPE P DECIMALS 2,
BUKRS TYPE BKPF-BUKRS,
BELNR TYPE BKPF-BELNR,
GJAHR TYPE BKPF-GJAHR,
BLart type bkpf-blart,
BUDAT TYPE BKPF-BUDAT,
bldat TYPE bkpf-bldat,
monat TYPE bkpf-monat,
usnam TYPE bkpf-usnam,
xblnr TYPE bkpf-xblnr,
spras TYPE skat-spras,
saknr TYPE skat-saknr,
txt20 TYPE skat-txt20,
txt50 TYPE skat-txt50,
LINE_COLOR(4) TYPE C,
LINE_CTR(4) TYPE C,
END OF TY_ITAB,
BEGIN OF TY_TEMP,
LIFNR TYPE BSEG-LIFNR,
GSBER TYPE BSEG-GSBER,
BUKRS TYPE BSEG-BUKRS,
BELNR TYPE BSEG-BELNR,
GJAHR TYPE BSEG-GJAHR,
SHKZG TYPE BSEG-SHKZG,
GSBER TYPE BSEG-GSBER,
DMBTR TYPE BSEG-DMBTR,
WRBTR TYPE BSEG-WRBTR,
SGTXT TYPE BSEG-SGTXT,
buzei TYPE bseg-buzei,
buzid TYPE bseg-buzid,
augdt TYPE bseg-augdt,
augcp TYPE bseg-augcp,
augbl TYPE bseg-augbl,
bschl TYPE bseg-bschl,
koart TYPE bseg-koart,
umskz TYPE bseg-umskz,
zuonr TYPE bseg-zuonr,
saknr TYPE bseg-saknr,
hkont TYPE bseg-hkont,
LIFNR TYPE LFA1-LIFNR,
LAND1 TYPE LFA1-LAND1,
NAME1 TYPE LFA1-NAME1,
LIFNR TYPE LFC1-LIFNR,
BUKRS TYPE LFC1-BUKRS,
GJAHR TYPE LFC1-GJAHR,
UMSAV TYPE LFC1-UMSAV,
DMBTR_H TYPE BSEG-WRBTR,
DMBTR_S TYPE BSEG-WRBTR,
HS TYPE BSEG-WRBTR,
BAL TYPE BSEG-WRBTR,
FLAG TYPE C,
FLAG TYPE C,
BUKRS TYPE BKPF-BUKRS,
BELNR TYPE BKPF-BELNR,
GJAHR TYPE BKPF-GJAHR,
BLart type bkpf-blart,
BUDAT TYPE BKPF-BUDAT,
bldat TYPE bkpf-bldat,
monat TYPE bkpf-monat,
usnam TYPE bkpf-usnam,
xblnr TYPE bkpf-xblnr,
bukrs TYPE bsak-bukrs,
lifnr TYPE bsak-lifnr,
umskz TYPE bsak-umskz,
augdt TYPE bsak-augdt,
augbl TYPE bsak-augbl,
zuonr TYPE bsak-zuonr,
gjahr TYPE bsak-gjahr,
belnr TYPE bsak-belnr,
buzei TYPE bsak-buzei,
budat TYPE bsak-budat,
bldat TYPE bsak-bldat,
xblnr TYPE bsak-xblnr,
blart TYPE bsak-blart,
monat TYPE bsak-monat,
bschl TYPE bsak-bschl,
shkzg TYPE bsak-shkzg,
gsber TYPE bsak-gsber,
dmbtr TYPE bsak-dmbtr,
wrbtr TYPE bsak-wrbtr,
sgtxt TYPE bsak-sgtxt,
saknr TYPE bsak-saknr,
hkont TYPE bsak-hkont,
spras TYPE skat-spras,
saknr TYPE skat-saknr,
txt20 TYPE skat-txt20,
txt50 TYPE skat-txt50,
LINE_COLOR(4) TYPE C,
LINE_CTR(4) TYPE C,
END OF TY_TEMP.
DATA : IT_BSEG TYPE STANDARD TABLE OF TY_BSEG WITH HEADER LINE,
IT_LFA1 TYPE STANDARD TABLE OF TY_LFA1 WITH HEADER LINE,
IT_LFC1 TYPE STANDARD TABLE OF TY_LFC1 WITH HEADER LINE,
IT_BKPF TYPE STANDARD TABLE OF TY_BKPF WITH HEADER LINE,
IT_BSIK TYPE STANDARD TABLE OF TY_BSIK WITH HEADER LINE,
IT_BSAK TYPE STANDARD TABLE OF TY_BSAK WITH HEADER LINE,
IT_BSIP TYPE STANDARD TABLE OF TY_BSIP WITH HEADER LINE,
IT_SKAT TYPE STANDARD TABLE OF IT_SKAT WITH HEADER LINE,
IT_ITAB TYPE STANDARD TABLE OF TY_ITAB WITH HEADER LINE,
IT_TEMP TYPE STANDARD TABLE OF TY_TEMP WITH HEADER LINE.
TABLES : BSEG, LFA1, LFC1, BKPF ,SKAT.
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE T001.
SELECT-OPTIONS: Vendor FOR BSEG-LIFNR OBLIGATORY.
PARAMETERS : CoCd LIKE BSEG-BUKRS OBLIGATORY.
PARAMETERS : Fiscal LIKE BSEG-GJAHR OBLIGATORY.
SELECT-OPTIONS : Period FOR BKPF-MONAT .
*SELECT-OPTIONS : b_monate for rfsdo-allgbmon "Berichtsperioden
no-extension,
*SELECT-OPTIONS: SO_LIFNR FOR BSEG-LIFNR.
SO_BELNR FOR BSEG-BELNR.
SELECTION-SCREEN END OF BLOCK B1.
PERFORM DATA_RETRIVE.
*PERFORM SUB_MOVE_DATA.
**PERFORM SUB_FETCH_EXTRA_DATA.
**PERFORM SUB_MOVE_EXTRA_DATA.
PERFORM SUB_CALC.
PERFORM SUB_FIELDCAT.
PERFORM SUB_DISPLAY.
*& Form DATA_RETRIVE
text
--> p1 text
<-- p2 text
form DATA_RETRIVE .
SELECT LIFNR BUKRS BELNR GJAHR SHKZG GSBER DMBTR WRBTR SGTXT BUZEI
BUZID AUGDT AUGCP AUGBL BSCHL KOART UMSKZ ZUONR SAKNR HKONT
FROM BSEG INTO TABLE IT_BSEG
WHERE LIFNR IN vendor AND BUKRS = CoCd AND GJAHR = Fiscal.
IF NOT IT_BSEG[] IS INITIAL.
SELECT LIFNR LAND1 NAME1
FROM LFA1 INTO TABLE IT_LFA1 FOR ALL ENTRIES IN IT_BSEG
WHERE LIFNR = IT_BSEG-LIFNR.
ENDIF.
IF NOT IT_BSEG[] IS INITIAL.
SELECT LIFNR BUKRS GJAHR UMSAV
FROM LFC1 INTO TABLE IT_LFC1 FOR ALL ENTRIES IN IT_BSEG
WHERE LIFNR = IT_BSEG-LIFNR AND BUKRS = IT_BSEG-BUKRS AND GJAHR = IT_BSEG-GJAHR.
ENDIF.
IF NOT IT_BSEG[] IS INITIAL.
SELECT BUKRS BELNR GJAHR BLART BUDAT BLDAT MONAT USNAM XBLNR
FROM BKPF INTO TABLE IT_BKPF FOR ALL ENTRIES IN IT_BSEG
WHERE MONAT IN Period AND BUKRS = IT_BSEG-BUKRS AND GJAHR = IT_BSEG-GJAHR AND BELNR = IT_BSEG-BELNR.
ENDIF.
LOOP AT IT_BSEG.
IT_ITAB-LIFNR = IT_BSEG-LIFNR.
IT_ITAB-BUKRS = IT_BSEG-BUKRS.
IT_ITAB-BELNR = IT_BSEG-BELNR.
IT_ITAB-GJAHR = IT_BSEG-GJAHR.
IT_ITAB-SHKZG = IT_BSEG-SHKZG.
IT_ITAB-GSBER = IT_BSEG-GSBER.
IT_ITAB-DMBTR = IT_BSEG-DMBTR.
IT_ITAB-WRBTR = IT_BSEG-WRBTR.
IT_ITAB-SGTXT = IT_BSEG-SGTXT.
IT_ITAB-BUZEI = IT_BSEG-BUZEI.
IT_ITAB-BUZID = IT_BSEG-BUZID.
IT_ITAB-AUGDT = IT_BSEG-AUGDT.
IT_ITAB-AUGCP = IT_BSEG-AUGCP.
IT_ITAB-AUGBL = IT_BSEG-AUGBL.
IT_ITAB-BSCHL = IT_BSEG-BSCHL.
IT_ITAB-KOART = IT_BSEG-KOART.
IT_ITAB-UMSKZ = IT_BSEG-UMSKZ.
IT_ITAB-ZUONR = IT_BSEG-ZUONR.
IT_ITAB-SAKNR = IT_BSEG-SAKNR.
IT_ITAB-HKONT = IT_BSEG-HKONT.
READ TABLE IT_LFA1 WITH KEY LIFNR = IT_ITAB-LIFNR.
IF SY-SUBRC = 0.
IT_ITAB-LAND1 = IT_LFA1-LAND1.
IT_ITAB-NAME1 = IT_LFA1-NAME1.
ENDIF.
READ TABLE IT_LFC1 WITH KEY LIFNR = IT_ITAB-LIFNR
BUKRS = IT_ITAB-BUKRS
GJAHR = IT_ITAB-GJAHR
BINARY SEARCH.
IF SY-SUBRC = 0.
IT_ITAB-UMSAV = IT_LFC1-UMSAV.
ENDIF.
READ TABLE IT_BKPF WITH KEY BUKRS = IT_ITAB-BUKRS
BELNR = IT_ITAB-BELNR
GJAHR = IT_ITAB-GJAHR.
IF SY-SUBRC = 0.
IT_ITAB-BLART = IT_BKPF-BLART.
IT_ITAB-BUDAT = IT_BKPF-BUDAT.
IT_ITAB-BLDAT = IT_BKPF-BLDAT.
IT_ITAB-MONAT = IT_BKPF-MONAT.
IT_ITAB-USNAM = IT_BKPF-USNAM.
IT_ITAB-XBLNR = IT_BKPF-XBLNR.
ENDIF.
APPEND IT_ITAB.
CLEAR IT_ITAB.
ENDLOOP.
endform. " DATA_RETRIVE
*& Form SUB_CALC
text
--> p1 text
<-- p2 text
form SUB_CALC .
*SORT IT_ITAB BY LIFNR GSBER GJAHR.
*LOOP AT IT_ITAB.
*IF IT_ITAB-SHKZG = 'S'.
IT_ITAB-DMBTR = IT_ITAB-DMBTR * ( -1 ).
*ENDIF.
*CLEAR IT_ITAB-DMBTR_S.
*MODIFY IT_ITAB.
*ENDLOOP.
*LOOP AT IT_ITAB.
*IT_ITAB-BAL = IT_ITAB-UMSAV + IT_ITAB-DMBTR.
*MODIFY IT_ITAB.
*CLEAR IT_ITAB.
*ENDLOOP.
*LOOP AT IT_ITAB.
IF IT_ITAB-SHKZG = 'S'.
IT_ITAB-DMBTR = IT_ITAB-DMBTR * ( -1 ).
ENDIF.
MODIFY IT_ITAB.
*ENDLOOP.
LOOP AT IT_ITAB.
IF IT_ITAB-SHKZG = 'S'.
IT_ITAB-DMBTR_S = IT_ITAB-DMBTR .
ELSE.
IF IT_ITAB-SHKZG = 'H'.
IT_ITAB-DMBTR_H = IT_ITAB-DMBTR.
ENDIF.
ENDIF.
IT_ITAB-DMBTR = ''.
MODIFY IT_ITAB INDEX SY-TABIX TRANSPORTING DMBTR_H DMBTR_S DMBTR.
"VAR.
CLEAR IT_ITAB.
ENDLOOP.
*MOVE CORRESPONDING IT_LFC1-UMSAV = IT_ITAB-UMSAV.
SORT IT_ITAB BY LIFNR GSBER.
LOOP AT IT_ITAB.
IT_ITAB-DMBTR_H = IT_ITAB-DMBTR_H.
IT_ITAB-DMBTR_S = IT_ITAB-DMBTR_S.
IT_ITAB-DH = IT_ITAB-DMBTR_H.
IT_ITAB-DS = IT_ITAB-DMBTR_S.
IT_ITAB-FLAG = 'X'.
IT_ITAB-CTR = 'X'.
IT_ITAB-HS = IT_ITAB-DMBTR_H - IT_ITAB-DMBTR_S.
IT_ITAB-BAL = IT_ITAB-UMSAV + IT_ITAB-HS.
MODIFY IT_ITAB INDEX SY-TABIX TRANSPORTING DMBTR_H DMBTR_S HS
FLAG BAL.
CLEAR IT_ITAB.
ENDLOOP.
*LOOP AT IT_ITAB.
**IF IT_ITAB-MONAT = ''.
DELETE IT_ITAB[] WHERE MONAT = ''.
*MODIFY IT_ITAB.
*ENDLOOP.
LOOP AT IT_ITAB.
AT END OF GSBER.
SUM.
IT_ITAB-DMBTR_H = IT_ITAB-DMBTR_H.
IT_ITAB-DMBTR_S = IT_ITAB-DMBTR_S.
IT_ITAB-DH = IT_ITAB-DMBTR_H.
IT_ITAB-DS = IT_ITAB-DMBTR_S.
IT_ITAB-FLAG = 'X'.
IT_ITAB-CTR = 'X'.
IT_ITAB-DMBTR_H = IT_ITAB-DMBTR_H.
IT_ITAB-DMBTR_S = IT_ITAB-DMBTR_S.
IT_ITAB-HS = IT_ITAB-DMBTR_S - IT_ITAB-DMBTR_H.
IT_ITAB-BAL = IT_ITAB-UMSAV - IT_ITAB-HS.
MODIFY IT_ITAB INDEX SY-TABIX TRANSPORTING DMBTR_H DMBTR_S HS
FLAG BAL.
ENDAT.
CLEAR IT_ITAB.
ENDLOOP.
LOOP AT IT_ITAB.
AT END OF GSBER.
SUM.
IT_ITAB-DMBTR_H = IT_ITAB-DMBTR_H.
IT_ITAB-DMBTR_S = IT_ITAB-DMBTR_S.
IT_ITAB-DH = IT_ITAB-DMBTR_H.
IT_ITAB-DS = IT_ITAB-DMBTR_S.
IT_ITAB-FLAG = 'X'.
IT_ITAB-CTR = 'X'.
IT_ITAB-DMBTR_H = IT_ITAB-DMBTR_H.
IT_ITAB-DMBTR_S = IT_ITAB-DMBTR_S.
IT_ITAB-BAL = IT_ITAB-UMSAV + ( IT_ITAB-DMBTR_H - IT_ITAB-DMBTR_S ).
MODIFY IT_ITAB INDEX SY-TABIX TRANSPORTING DMBTR_H DMBTR_S DH DS
FLAG BAL.
ENDAT.
CLEAR IT_ITAB.
ENDLOOP.
DELETE IT_ITAB[] WHERE FLAG <> 'X'.
SORT IT_ITAB BY LIFNR GSBER.
LOOP AT IT_ITAB.
MOVE-CORRESPONDING IT_ITAB TO IT_TEMP.
APPEND IT_TEMP.
ENDLOOP.
REFRESH IT_ITAB.
SORT IT_TEMP BY LIFNR GSBER.
LOOP AT IT_TEMP.
MOVE-CORRESPONDING IT_TEMP TO IT_ITAB.
APPEND IT_ITAB.
CLEAR IT_ITAB.
AT END OF LIFNR.
SUM.
IT_TEMP-FLAG = ''.
MODIFY IT_TEMP INDEX SY-TABIX TRANSPORTING DMBTR_H DMBTR_S FLAG.
MOVE-CORRESPONDING IT_ITEMP TO IT_ITAB.
IT_ITAB-LIFNR = ''.
IT_ITAB-NAME1 = ''.
IT_ITAB-BELNR = ''.
IT_ITAB-BUKRS = ''.
IT_ITAB-GJAHR = ''.
IT_ITAB-GSBER = ''.
IT_ITAB-UMSAV = '0000'.
IT_ITAB-DMBTR_H = IT_TEMP-DMBTR_H.
IT_ITAB-DMBTR_S = IT_TEMP-DMBTR_S.
IT_ITAB-BAL = IT_TEMP-DMBTR_H - IT_TEMP-DMBTR_S.
IT_ITAB-FLAG = 'Y'.
IT_ItAB-CTR = IT_TEMO-CTR.
APPEND IT_ITAB.
ENDAT.
IF IT_ITAB-FLAG = 'Y'.
it_itab-line_color = 'C600'.
MODIFY IT_ITAB.
ENDIF.
CLEAR IT_TEMP.
ENDLOOP.
LOOP AT IT_ITAB WHERE FLAG = 'Y'.
it_itab-line_color = 'C602'.
MODIFY IT_ITAB INDEX SY-TABIX.
CLEAR IT_ITAB.
ENDLOOP.
loop at it_itab WHERE FLAG = ''.
it_itab-line_color = 'C103'.
IT_ITAB-LINE_CTR = 'C103'.
MODIFY IT_ITAB INDEX SY-TABIX.
CLEAR IT_ITAB.
ENDLOOP.
PERFORM SUB_CALC_1.
endform. " SUB_CALC
*& Form SUB_FIELDCAT
text
--> p1 text
<-- p2 text
FORM SUB_FIELDCAT .
WA_FCAT-FIELDNAME = 'LIFNR'.
WA_FCAT-TABNAME = 'IT_ITAB'.
WA_FCAT-SELTEXT_M = 'Vendor No'. "'VENDOR NAME'.
APPEND WA_FCAT TO IT_FCAT.
CLEAR WA_FCAT.
WA_FCAT-FIELDNAME = 'NAME1'.
WA_FCAT-TABNAME = 'IT_ITAB'.
WA_FCAT-SELTEXT_M = 'Vendor Name'. "'VENDOR NAME'.
APPEND WA_FCAT TO IT_FCAT.
CLEAR WA_FCAT.
WA_FCAT-FIELDNAME = 'BELNR'.
WA_FCAT-TABNAME = 'IT_ITAB'.
WA_FCAT-SELTEXT_M = 'SAP Document No'. "'DOC NUMBER'.
APPEND WA_FCAT TO IT_FCAT.
CLEAR WA_FCAT.
WA_FCAT-FIELDNAME = 'BLDAT'.
WA_FCAT-TABNAME = 'IT_ITAB'.
WA_FCAT-SELTEXT_M = 'Doc Date'. "'FISCAL YEAR'.
APPEND WA_FCAT TO IT_FCAT.
CLEAR wa_fcat.
WA_FCAT-FIELDNAME = 'GSBER'.
WA_FCAT-TABNAME = 'IT_ITAB'.
WA_FCAT-SELTEXT_M = 'BusA'. "'BUSINESS AREA'.
APPEND WA_FCAT TO IT_FCAT.
CLEAR WA_FCAT.
WA_FCAT-FIELDNAME = 'UMSAV'.
WA_FCAT-TABNAME = 'IT_ITAB'.
WA_FCAT-SELTEXT_M = 'Balance Carry Forward'. "'BAL CARRIED FORWARD'.
APPEND WA_FCAT TO IT_FCAT.
CLEAR WA_FCAT.
WA_FCAT-FIELDNAME = 'FLAG'.
WA_FCAT-TABNAME = 'IT_ITAB'.
WA_FCAT-SELTEXT_M = 'FLAG'. "'DOC NUMBER'.
APPEND WA_FCAT TO IT_FCAT.
CLEAR WA_FCAT.
WA_FCAT-FIELDNAME = 'SHKZG'.
WA_FCAT-TABNAME = 'IT_ITAB'.
WA_FCAT-SELTEXT_M = 'SHKZG'. "'DOC NUMBER'.
APPEND WA_FCAT TO IT_FCAT.
CLEAR WA_FCAT.
WA_FCAT-FIELDNAME = 'DMBTR_S'.
WA_FCAT-TABNAME = 'IT_ITAB'.
WA_FCAT-SELTEXT_M = 'Credit'. "'DOC NUMBER'.
APPEND WA_FCAT TO IT_FCAT.
CLEAR WA_FCAT.
WA_FCAT-FIELDNAME = 'DMBTR_H'.
WA_FCAT-TABNAME = 'IT_ITAB'.
WA_FCAT-SELTEXT_M = 'Debit'. "'DOC NUMBER'.
APPEND WA_FCAT TO IT_FCAT.
CLEAR WA_FCAT.
WA_FCAT-FIELDNAME = 'MONAT'.
WA_FCAT-TABNAME = 'IT_ITAB'.
WA_FCAT-SELTEXT_M = 'PERIOD'.
APPEND WA_FCAT TO IT_FCAT.
CLEAR WA_FCAT.
WA_FCAT-FIELDNAME = 'DH'.
WA_FCAT-TABNAME = 'IT_ITAB'.
WA_FCAT-SELTEXT_M = 'DH'. "'DOC NUMBER'.
APPEND WA_FCAT TO IT_FCAT.
CLEAR WA_FCAT.
WA_FCAT-FIELDNAME = 'DS'.
WA_FCAT-TABNAME = 'IT_ITAB'.
WA_FCAT-SELTEXT_M = 'DS'. "'DOC NUMBER'.
APPEND WA_FCAT TO IT_FCAT.
CLEAR WA_FCAT.
WA_FCAT-FIELDNAME = 'BAL'.
WA_FCAT-TABNAME = 'IT_ITAB'.
WA_FCAT-SELTEXT_M = 'Accumlated Bal'.
APPEND WA_FCAT TO IT_FCAT.
CLEAR WA_FCAT.
WA_FCAT-FIELDNAME = 'SGTXT'.
WA_FCAT-TABNAME = 'IT_ITAB'.
WA_FCAT-SELTEXT_M = 'Text'. "'DOC NUMBER'.
APPEND WA_FCAT TO IT_FCAT.
CLEAR WA_FCAT.
ls_layout-info_fieldname = 'LINE_COLOR'.
ENDFORM. " SUB_FIELDCAT
*& Form SUB_DISPLAY
text
--> p1 text
<-- p2 text
FORM SUB_DISPLAY .
IF NOT IT_ITAB[] IS INITIAL.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
I_CALLBACK_PROGRAM = 'SY-REPID'
IT_FIELDCAT = IT_FCAT
I_SAVE = 'A'
is_layout = ls_layout
TABLES
T_OUTTAB = IT_ITAB
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.
ENDIF.
ENDFORM. " SUB_DISPLAY
*& Form SUB_CALC_1
text
--> p1 text
<-- p2 text
FORM SUB_CALC_1 .
LOOP AT IT_ITAB WHERE FLAG = 'Y'.
it_itab-line_color = 'C603'.
MODIFY IT_ITAB INDEX SY-TABIX.
CLEAR IT_ITAB.
ENDLOOP.
ENDFORM. " SUB_CALC_1This is the Report which i am trying to do....please help me with this Report....
*& Report ZVENDOR_RECONCILLATION
REPORT ZVENDOR_RECONCILLATION.
*ALV
TYPE-POOLS: SLIS.
*TYPE-POOLS icon.
DATA: It_SORT TYPE SLIS_T_SORTINFO_ALV ."WITH HEADER LINE.
DATA: TOP TYPE slis_t_listheader,
END TYPE slis_t_listheader,
EVENTS TYPE slis_t_event.
DATA : NAME1 LIKE T001W-NAME1,
WERKS LIKE T001W-WERKS .
DATA : T_KEY TYPE SLIS_KEYINFO_ALV.
DATA : FIELDCAT TYPE SLIS_T_FIELDCAT_ALV WITH HEADER LINE,
LAYOUT TYPE SLIS_LAYOUT_ALV OCCURS 1 WITH HEADER LINE ,
LCAT TYPE SLIS_FIELDCAT_ALV.
TABLES : BSAK , BSIK , LFC1 , LFC3 , LFA1.
*INTERNAL TABLE
DATA: BEGIN OF sd_bsak,
bukrs TYPE bsak-bukrs,
lifnr TYPE bsak-lifnr,
umsks TYPE bsak-umsks,
umskz TYPE bsak-umskz,
augdt TYPE bsak-augdt,
augbl TYPE bsak-augbl,
zuonr TYPE bsak-zuonr,
gjahr TYPE bsak-gjahr,
belnr TYPE bsak-belnr,
buzei TYPE bsak-buzei,
budat TYPE bsak-budat,
bldat TYPE bsak-bldat,
xblnr TYPE bsak-xblnr,
blart TYPE bsak-blart,
monat TYPE bsak-monat,
bschl TYPE bsak-bschl,
zumsk TYPE bsak-zumsk,
shkzg TYPE bsak-shkzg,
gsber TYPE bsak-gsber,
dmbtr TYPE bsak-dmbtr,
wrbtr TYPE bsak-wrbtr,
sgtxt TYPE bsak-sgtxt,
saknr TYPE bsak-saknr,
hkont TYPE bsak-hkont,
END OF sd_bsak.
DATA: BEGIN OF sd_bsik,
bukrs TYPE bsik-bukrs,
lifnr TYPE bsik-lifnr,
umsks TYPE bsik-umsks,
umskz TYPE bsik-umskz,
augdt TYPE bsik-augdt,
augbl TYPE bsik-augbl,
zuonr TYPE bsik-zuonr,
gjahr TYPE bsik-gjahr,
belnr TYPE bsik-belnr,
buzei TYPE bsik-buzei,
budat TYPE bsik-budat,
bldat TYPE bsik-bldat,
xblnr TYPE bsik-xblnr,
blart TYPE bsik-blart,
monat TYPE bsik-monat,
bschl TYPE bsik-bschl,
zumsk TYPE bsik-zumsk,
shkzg TYPE bsik-shkzg,
gsber TYPE bsik-gsber,
dmbtr TYPE bsik-dmbtr,
wrbtr TYPE bsik-wrbtr,
sgtxt TYPE bsik-sgtxt,
saknr TYPE bsik-saknr,
hkont TYPE bsik-hkont,
zlsch TYPE bsik-zlsch,
END OF sd_bsik.
DATA: BEGIN OF it_lfa1,
lifnr TYPE lfa1-lifnr,
name1 TYPE lfa1-name1,
END OF it_lfa1.
DATA: BEGIN OF sd_lfc1,
lifnr TYPE lfc1-lifnr,
bukrs TYPE lfc1-bukrs,
gjahr TYPE lfc1-gjahr,
erdat TYPE lfc1-erdat,
usnam TYPE lfc1-usnam,
umsav TYPE lfc1-umsav,
END OF sd_lfc1.
DATA: BEGIN OF sd_lfc3,
lifnr TYPE lfc3-lifnr,
bukrs TYPE lfc3-bukrs,
gjahr TYPE lfc3-gjahr,
shbkz TYPE lfc3-shbkz,
saldv TYPE lfc3-saldv,
solll TYPE lfc3-solll,
habnl TYPE lfc3-habnl,
END OF sd_lfc3.
*FINAL INTERNAL TABLE DECLARATION
DATA: BEGIN OF IT_FINAL,
gsber TYPE bsak-gsber,
bukrs TYPE bsak-bukrs,
lifnr TYPE bsak-lifnr,
umsks TYPE bsak-umsks,
umskz TYPE bsak-umskz,
augdt TYPE bsak-augdt,
augbl TYPE bsak-augbl,
zuonr TYPE bsak-zuonr,
gjahr TYPE bsak-gjahr,
belnr TYPE bsak-belnr,
buzei TYPE bsak-buzei,
budat TYPE bsak-budat,
bldat TYPE bsak-bldat,
xblnr TYPE bsak-xblnr,
blart TYPE bsak-blart,
monat TYPE bsak-monat,
bschl TYPE bsak-bschl,
zumsk TYPE bsak-zumsk,
shkzg TYPE bsak-shkzg,
gsber TYPE bsak-gsber,
dmbtr TYPE bsak-dmbtr,
wrbtr TYPE bsak-wrbtr,
sgtxt TYPE bsak-sgtxt,
saknr TYPE bsak-saknr,
hkont TYPE bsak-hkont,
DMBTR_S TYPE BSAK-DMBTR,
DMBTR_H TYPE BSAK-DMBTR,
DS TYPE P DECIMALS 2,
DH TYPE P DECIMALS 2,
SUB TYPE P DECIMALS 2,
ADD TYPE P DECIMALS 2,
BAL TYPE P DECIMALS 2,
lifnr TYPE bsik-lifnr,
umsks TYPE bsik-umsks,
umskz TYPE bsik-umskz,
augdt TYPE bsik-augdt,
augbl TYPE bsik-augbl,
zuonr TYPE bsik-zuonr,
gjahr TYPE bsik-gjahr,
belnr TYPE bsik-belnr,
buzei TYPE bsik-buzei,
budat TYPE bsik-budat,
bldat TYPE bsik-bldat,
xblnr TYPE bsik-xblnr,
blart TYPE bsik-blart,
monat TYPE bsik-monat,
bschl TYPE bsik-bschl,
zumsk TYPE bsik-zumsk,
shkzg TYPE bsik-shkzg,
gsber TYPE bsik-gsber,
dmbtr TYPE bsik-dmbtr,
wrbtr TYPE bsik-wrbtr,
sgtxt TYPE bsik-sgtxt,
saknr TYPE bsik-saknr,
hkont TYPE bsik-hkont,
zlsch TYPE bsik-zlsch,
lifnr TYPE lfa1-lifnr,
name1 TYPE lfa1-name1,
lifnr TYPE lfc1-lifnr,
bukrs TYPE lfc1-bukrs,
gjahr TYPE lfc1-gjahr,
erdat TYPE lfc1-erdat,
usnam TYPE lfc1-usnam,
umsav TYPE lfc1-umsav,
lifnr TYPE lfc3-lifnr,
bukrs TYPE lfc3-bukrs,
gjahr TYPE lfc3-gjahr,
shbkz TYPE lfc3-shbkz,
saldv TYPE lfc3-saldv,
solll TYPE lfc3-solll,
habnl TYPE lfc3-habnl,
END OF IT_FINAL.
DATA: BEGIN OF SD_FINAL,
lifnr TYPE bsak-lifnr,
bukrs TYPE bsak-bukrs,
lifnr TYPE bsak-lifnr,
umsks TYPE bsak-umsks,
umskz TYPE bsak-umskz,
augdt TYPE bsak-augdt,
augbl TYPE bsak-augbl,
zuonr TYPE bsak-zuonr,
gjahr TYPE bsak-gjahr,
belnr TYPE bsak-belnr,
buzei TYPE bsak-buzei,
budat TYPE bsak-budat,
bldat TYPE bsak-bldat,
xblnr TYPE bsak-xblnr,
blart TYPE bsak-blart,
monat TYPE bsak-monat,
bschl TYPE bsak-bschl,
zumsk TYPE bsak-zumsk,
shkzg TYPE bsak-shkzg,
gsber TYPE bsak-gsber,
dmbtr TYPE bsak-dmbtr,
wrbtr TYPE bsak-wrbtr,
sgtxt TYPE bsak-sgtxt,
saknr TYPE bsak-saknr,
hkont TYPE bsak-hkont,
bukrs TYPE bsik-bukrs,
lifnr TYPE bsik-lifnr,
umsks TYPE bsik-umsks,
umskz TYPE bsik-umskz,
augdt TYPE bsik-augdt,
augbl TYPE bsik-augbl,
zuonr TYPE bsik-zuonr,
gjahr TYPE bsik-gjahr,
belnr TYPE bsik-belnr,
buzei TYPE bsik-buzei,
budat TYPE bsik-budat,
bldat TYPE bsik-bldat,
xblnr TYPE bsik-xblnr,
blart TYPE bsik-blart,
monat TYPE bsik-monat,
bschl TYPE bsik-bschl,
zumsk TYPE bsik-zumsk,
shkzg TYPE bsik-shkzg,
gsber TYPE bsik-gsber,
dmbtr TYPE bsik-dmbtr,
wrbtr TYPE bsik-wrbtr,
sgtxt TYPE bsik-sgtxt,
saknr TYPE bsik-saknr,
hkont TYPE bsik-hkont,
zlsch TYPE bsik-zlsch,
lifnr TYPE lfa1-lifnr,
name1 TYPE lfa1-name1,
lifnr TYPE lfc1-lifnr,
bukrs TYPE lfc1-bukrs,
gjahr TYPE lfc1-gjahr,
erdat TYPE lfc1-erdat,
usnam TYPE lfc1-usnam,
umsav TYPE lfc1-umsav,
lifnr TYPE lfc3-lifnr,
bukrs TYPE lfc3-bukrs,
gjahr TYPE lfc3-gjahr,
shbkz TYPE lfc3-shbkz,
saldv TYPE lfc3-saldv,
solll TYPE lfc3-solll,
habnl TYPE lfc3-habnl,
line_color(4) TYPE c,
END OF SD_FINAL.
DATA IT_STD_BSAK LIKE TABLE OF SD_BSAK WITH HEADER LINE.
DATA IT_STD_BSIK LIKE TABLE OF SD_BSIK WITH HEADER LINE.
DATA IT_STD_LFA1 LIKE TABLE OF IT_LFA1 WITH HEADER LINE.
DATA IT_STD_LFC1 LIKE TABLE OF SD_LFC1 WITH HEADER LINE.
DATA IT_STD_LFC3 LIKE TABLE OF SD_LFC3 WITH HEADER LINE.
DATA IT_STD_FINAL LIKE TABLE OF IT_FINAL WITH HEADER LINE.
DATA IT_FINAL_DISPLAY LIKE TABLE OF SD_FINAL WITH HEADER LINE.
*SELECTION-SCREEN
SELECTION-SCREEN BEGIN OF BLOCK HEADER WITH FRAME TITLE TEXT-001.
PARAMETERS: P_BUKRS LIKE BSAK-BUKRS OBLIGATORY,
P_GJAHR LIKE BSAK-GJAHR OBLIGATORY.
P_EBELN LIKE EKPO-EBELN .
*PARAMETER: PA_RPT AS CHECKBOX DEFAULT 'X'.
SELECT-OPTIONS: S_LIFNR FOR BSAK-LIFNR.
SELECT-OPTIONS: S_MONAT FOR BSAK-MONAT.
SELECTION-SCREEN END OF BLOCK HEADER.
START-OF-SELECTION.
SET PF-STATUS 'STATUS'.
PERFORM DATA_RETRIVAL.
PERFORM FIELD.
PERFORM SORT USING IT_SORT.
PERFORM EVENTS USING EVENTS.
PERFORM EVENTS_1 USING EVENTS.
PERFORM HEADER USING TOP.
PERFORM LAYOUT.
PERFORM DISPLAY.
END-OF-PAGE.
*& Form DATA_RETRIVAL
text
--> p1 text
<-- p2 text
FORM DATA_RETRIVAL .
SELECT BUKRS LIFNR UMSKS UMSKZ AUGDT AUGBL ZUONR GJAHR BELNR BUZEI BUDAT BLDAT XBLNR BLART
MONAT BSCHL ZUMSK SHKZG GSBER DMBTR WRBTR SGTXT SAKNR HKONT
FROM BSAK INTO TABLE IT_STD_BSAK
WHERE BUKRS = P_BUKRS
AND GJAHR = P_GJAHR AND ZUMSK = ''
AND LIFNR IN S_LIFNR
AND MONAT IN S_MONAT.
IF NOT IT_STD_BSAK[] IS INITIAL.
SELECT BUKRS LIFNR UMSKS UMSKZ AUGDT AUGBL ZUONR GJAHR BELNR BUZEI BUDAT BLDAT XBLNR
BLART MONAT BSCHL ZUMSK SHKZG GSBER DMBTR WRBTR SGTXT SAKNR HKONT ZLSCH
FROM BSIK INTO TABLE IT_STD_BSIK FOR ALL ENTRIES IN IT_STD_BSAK
WHERE BUKRS = IT_STD_BSAK-BUKRS AND LIFNR = IT_STD_BSAK-LIFNR AND GJAHR = IT_STD_BSAK-GJAHR AND ZUMSK = ''.
ENDIF.
IF NOT IT_STD_BSAK[] IS INITIAL.
SELECT LIFNR NAME1
FROM LFA1 INTO TABLE IT_STD_LFA1 FOR ALL ENTRIES IN IT_STD_BSAK
WHERE LIFNR = IT_STD_BSAK-LIFNR.
ENDIF.
IF NOT IT_STD_BSAK[] IS INITIAL.
SELECT LIFNR BUKRS GJAHR ERDAT USNAM UMSAV
FROM LFC1 INTO TABLE IT_STD_LFC1 FOR ALL ENTRIES IN IT_STD_BSAK
WHERE LIFNR = IT_STD_BSAK-LIFNR AND BUKRS = IT_STD_BSAK-BUKRS AND GJAHR = IT_STD_BSAK-GJAHR.
ENDIF.
IF NOT IT_STD_BSAK[] IS INITIAL.
SELECT LIFNR BUKRS GJAHR SHBKZ SALDV SOLLL HABNL
FROM LFC3 INTO TABLE IT_STD_LFC3 FOR ALL ENTRIES IN IT_STD_BSAK
WHERE LIFNR = IT_STD_BSAK-LIFNR AND BUKRS = IT_STD_BSAK-BUKRS AND GJAHR = IT_STD_BSAK-GJAHR.
ENDIF.
LOOP AT IT_STD_BSAK.
IT_STD_FINAL-BUKRS = IT_STD_BSAK-BUKRS.
IT_STD_FINAL-LIFNR = IT_STD_BSAK-LIFNR.
IT_STD_FINAL-UMSKS = IT_STD_BSAK-UMSKS.
IT_STD_FINAL-UMSKZ = IT_STD_BSAK-UMSKZ.
IT_STD_FINAL-AUGDT = IT_STD_BSAK-AUGDT.
IT_STD_FINAL-AUGBL = IT_STD_BSAK-AUGBL.
IT_STD_FINAL-ZUONR = IT_STD_BSAK-ZUONR.
IT_STD_FINAL-GJAHR = IT_STD_BSAK-GJAHR.
IT_STD_FINAL-BELNR = IT_STD_BSAK-BELNR.
IT_STD_FINAL-BUZEI = IT_STD_BSAK-BUZEI.
IT_STD_FINAL-BUDAT = IT_STD_BSAK-BUDAT.
IT_STD_FINAL-BLDAT = IT_STD_BSAK-BLDAT.
IT_STD_FINAL-XBLNR = IT_STD_BSAK-XBLNR.
IT_STD_FINAL-BLART = IT_STD_BSAK-BLART.
IT_STD_FINAL-MONAT = IT_STD_BSAK-MONAT.
IT_STD_FINAL-BSCHL = IT_STD_BSAK-BSCHL.
IT_STD_FINAL-ZUMSK = IT_STD_BSAK-ZUMSK.
IT_STD_FINAL-SHKZG = IT_STD_BSAK-SHKZG.
IT_STD_FINAL-GSBER = IT_STD_BSAK-GSBER.
IT_STD_FINAL-DMBTR = IT_STD_BSAK-DMBTR.
IT_STD_FINAL-WRBTR = IT_STD_BSAK-WRBTR.
IT_STD_FINAL-SGTXT = IT_STD_BSAK-SGTXT.
IT_STD_FINAL-SAKNR = IT_STD_BSAK-SAKNR.
IT_STD_FINAL-HKONT = IT_STD_BSAK-HKONT.
READ TABLE IT_STD_LFA1 WITH KEY LIFNR = IT_STD_FINAL-LIFNR.
IF SY-SUBRC = 0.
IT_STD_FINAL-NAME1 = IT_STD_LFA1-NAME1.
ENDIF.
READ TABLE IT_STD_LFC1 WITH KEY LIFNR = IT_STD_FINAL-LIFNR
BUKRS = IT_STD_FINAL-BUKRS
GJAHR = IT_STD_FINAL-GJAHR.
IF SY-SUBRC = 0.
IT_STD_FINAL-ERDAT = IT_STD_LFC1-ERDAT.
IT_STD_FINAL-USNAM = IT_STD_LFC1-USNAM.
IT_STD_FINAL-UMSAV = IT_STD_LFC1-UMSAV.
ENDIF.
*READ TABLE IT_STD_LFC3 WITH KEY LIFNR = IT_STD_FINAL-LIFNR
BUKRS = IT_STD_FINAL-BUKRS
GJAHR = IT_STD_FINAL-GJAHR.
IF SY-SUBRC = 0.
IT_STD_FINAL-SHBKZ = IT_STD_LFC3-SHBKZ.
IT_STD_FINAL-SALDV = IT_STD_LFC3-SALDV.
IT_STD_FINAL-SOLLL = IT_STD_LFC3-SOLLL.
IT_STD_FINAL-HABNL = IT_STD_LFC3-HABNL.
ENDIF.
APPEND IT_STD_FINAL.
CLEAR IT_STD_FINAL.
ENDLOOP.
LOOP AT IT_STD_BSIK.
IF SY-SUBRC = 0.
IT_STD_FINAL-BUKRS = IT_STD_BSIK-BUKRS.
IT_STD_FINAL-LIFNR = IT_STD_BSIK-LIFNR.
IT_STD_FINAL-UMSKS = IT_STD_BSIK-UMSKS.
IT_STD_FINAL-UMSKZ = IT_STD_BSIK-UMSKZ.
IT_STD_FINAL-AUGDT = IT_STD_BSIK-AUGDT.
IT_STD_FINAL-AUGBL = IT_STD_BSIK-AUGBL.
IT_STD_FINAL-ZUONR = IT_STD_BSIK-ZUONR.
IT_STD_FINAL-GJAHR = IT_STD_BSIK-GJAHR.
IT_STD_FINAL-BELNR = IT_STD_BSIK-BELNR.
IT_STD_FINAL-BUZEI = IT_STD_BSIK-BUZEI.
IT_STD_FINAL-BUDAT = IT_STD_BSIK-BUDAT.
IT_STD_FINAL-BLDAT = IT_STD_BSIK-BLDAT.
IT_STD_FINAL-XBLNR = IT_STD_BSIK-XBLNR.
IT_STD_FINAL-BLART = IT_STD_BSIK-BLART.
IT_STD_FINAL-MONAT = IT_STD_BSIK-MONAT.
IT_STD_FINAL-BSCHL = IT_STD_BSIK-BSCHL.
IT_STD_FINAL-ZUMSK = IT_STD_BSIK-ZUMSK.
IT_STD_FINAL-SHKZG = IT_STD_BSIK-SHKZG.
IT_STD_FINAL-GSBER = IT_STD_BSIK-GSBER.
IT_STD_FINAL-DMBTR = IT_STD_BSIK-DMBTR.
IT_STD_FINAL-WRBTR = IT_STD_BSIK-WRBTR.
IT_STD_FINAL-SGTXT = IT_STD_BSIK-SGTXT.
IT_STD_FINAL-SAKNR = IT_STD_BSIK-SAKNR.
IT_STD_FINAL-HKONT = IT_STD_BSIK-HKONT.
IT_STD_FINAL-ZLSCH = IT_STD_BSIK-ZLSCH.
ENDIF.
APPEND IT_STD_FINAL.
CLEAR IT_STD_FINAL.
ENDLOOP.
LOOP AT IT_STD_LFC3.
IF SY-SUBRC = 0.
IT_STD_FINAL-SHBKZ = IT_STD_LFC3-SHBKZ.
IT_STD_FINAL-SALDV = IT_STD_LFC3-SALDV.
IT_STD_FINAL-SOLLL = IT_STD_LFC3-SOLLL.
IT_STD_FINAL-HABNL = IT_STD_LFC3-HABNL.
ENDIF.
APPEND IT_STD_FINAL.
CLEAR IT_STD_FINAL.
ENDLOOP.
LOOP AT IT_STD_FINAL.
IF IT_STD_FINAL-SHKZG = 'S'.
IT_STD_FINAL-DMBTR_S = IT_STD_FINAL-DMBTR.
ELSE.
IF IT_STD_FINAL-SHKZG = 'H'.
IT_STD_FINAL-DMBTR_H = IT_STD_FINAL-DMBTR.
ENDIF.
ENDIF.
IT_STD_FINAL-DMBTR = ''.
MODIFY IT_STD_FINAL INDEX SY-TABIX TRANSPORTING DMBTR_H DMBTR_S DMBTR.
"VAR.
CLEAR IT_STD_FINAL.
ENDLOOP.
LOOP AT IT_STD_LFC3.
*AT NEW LIFNR.
IF SY-SUBRC = 0.
IT_STD_FINAL-LIFNR = IT_STD_LFC3-LIFNR.
IT_STD_FINAL-BUKRS = IT_STD_LFC3-BUKRS.
IT_STD_FINAL-GJAHR = IT_STD_LFC3-GJAHR.
IT_STD_FINAL-SHBKZ = IT_STD_LFC3-SHBKZ.
IT_STD_FINAL-UMSAV = IT_STD_LFC3-SALDV.
IT_STD_FINAL-DMBTR_S = IT_STD_LFC3-SOLLL.
IT_STD_FINAL-DMBTR_H = IT_STD_LFC3-HABNL.
ENDIF.
*ENDAT.
APPEND IT_STD_FINAL.
CLEAR IT_STD_FINAL.
ENDLOOP.
LOOP AT IT_STD_FINAL.
IT_STD_FINAL-DS = IT_STD_FINAL-DMBTR_S.
IT_STD_FINAL-DH = IT_STD_FINAL-DMBTR_H.
IT_STD_FINAL-SUB = ( IT_STD_FINAL-DS ) - ( IT_STD_FINAL-DH ).
IT_STD_FINAL-ADD = ( IT_STD_FINAL-UMSAV ) + ( IT_STD_FINAL-SUB ).
MODIFY IT_STD_FINAL.
ENDLOOP.
ENDFORM. " DATA_RETRIVAL
*& Form FIELD
text
--> p1 text
<-- p2 text
form FIELD .
LCAT-FIELDNAME = 'LIFNR'.
LCAT-TABNAME = 'IT_STD_FINAL'.
LCAT-SELTEXT_L = 'Vendor No'.
*LCAT-REF_TABNAME = 'EKKO'.
LCAT-JUST = 'M'.
APPEND LCAT TO FIELDCAT.
CLEAR LCAT.
LCAT-FIELDNAME = 'NAME1'.
LCAT-TABNAME = 'IT_STD_FINAL'.
LCAT-SELTEXT_L = 'Vendor Name'.
*LCAT-REF_TABNAME = 'EKKO'.
LCAT-JUST = 'M'.
APPEND LCAT TO FIELDCAT.
CLEAR LCAT.
LCAT-FIELDNAME = 'GJAHR'. "MATERIAL GROUP
LCAT-TABNAME = 'IT_STD_FINAL'.
LCAT-SELTEXT_L = 'Fiscal Year'.
*LCAT-REF_TABNAME = 'LFA1'.
LCAT-JUST = 'M'.
APPEND LCAT TO FIELDCAT.
CLEAR LCAT.
LCAT-FIELDNAME = 'GSBER'. "MATERIAL GROUP
LCAT-TABNAME = 'IT_STD_FINAL'.
LCAT-SELTEXT_L = 'BussArea'.
*LCAT-REF_TABNAME = 'LFA1'.
LCAT-JUST = 'M'.
APPEND LCAT TO FIELDCAT.
CLEAR LCAT.
LCAT-FIELDNAME = 'SHBKZ'.
LCAT-TABNAME = 'IT_STD_FINAL'.
LCAT-SELTEXT_L = 'S G/L'.
LCAT-REF_TABNAME = 'LFC3'.
LCAT-JUST = 'M'.
APPEND LCAT TO FIELDCAT.
CLEAR LCAT.
LCAT-FIELDNAME = 'UMSAV'.
LCAT-TABNAME = 'IT_STD_FINAL'.
LCAT-SELTEXT_L = 'Bal Carry Forward'.
*LCAT-REF_TABNAME = 'EKKO'.
LCAT-JUST = 'M'.
APPEND LCAT TO FIELDCAT.
CLEAR LCAT.
LCAT-FIELDNAME = 'DMBTR_S'.
LCAT-TABNAME = 'IT_STD_FINAL'.
LCAT-SELTEXT_L = 'Debit Balanace'.
*LCAT-REF_TABNAME = 'EKKO'.
LCAT-JUST = 'M'.
APPEND LCAT TO FIELDCAT.
CLEAR LCAT.
LCAT-FIELDNAME = 'DMBTR_H'.
LCAT-TABNAME = 'IT_STD_FINAL'.
LCAT-SELTEXT_L = 'Credit Balance'.
*LCAT-REF_TABNAME = 'EKKO'.
LCAT-JUST = 'M'.
APPEND LCAT TO FIELDCAT.
CLEAR LCAT.
LCAT-FIELDNAME = 'ADD'.
LCAT-TABNAME = 'IT_STD_FINAL'.
LCAT-SELTEXT_L = 'Accumulated Balance'.
*LCAT-REF_TABNAME = 'EKKO'.
LCAT-JUST = 'M'.
APPEND LCAT TO FIELDCAT.
CLEAR LCAT.
LOOP AT FIELDCAT INTO LCAT WHERE FIELDNAME = 'DMBTR_S'.
LCAT-DO_SUM = 'X'.
MODIFY FIELDCAT FROM LCAT." TRANSPORTING DO_SUM.
ENDLOOP.
LOOP AT FIELDCAT INTO LCAT WHERE FIELDNAME = 'DMBTR_H'.
LCAT-DO_SUM = 'X'.
MODIFY FIELDCAT FROM LCAT." TRANSPORTING DO_SUM.
ENDLOOP.
LOOP AT FIELDCAT INTO LCAT WHERE FIELDNAME = 'ADD'.
LCAT-DO_SUM = 'X'.
MODIFY FIELDCAT FROM LCAT." TRANSPORTING DO_SUM.
ENDLOOP.
endform. " FIELD
*& Form DISPLAY
text
--> p1 text
<-- p2 text
form DISPLAY .
CLEAR: IT_STD_BSAK,IT_STD_BSIK, IT_STD_LFA1 , IT_STD_LFC1, IT_STD_LFC3.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
I_INTERFACE_CHECK = ' '
I_BYPASSING_BUFFER = ' '
I_BUFFER_ACTIVE = ' '
I_CALLBACK_PROGRAM = SY-REPID
I_CALLBACK_PF_STATUS_SET = 'STATUS '
I_CALLBACK_USER_COMMAND = ' '
I_CALLBACK_TOP_OF_PAGE = ' '
I_CALLBACK_HTML_TOP_OF_PAGE = ' '
I_CALLBACK_HTML_END_OF_LIST = ' '
I_STRUCTURE_NAME =
I_BACKGROUND_ID = ' '
I_GRID_TITLE =
I_GRID_SETTINGS =
IS_LAYOUT = LAYOUT
IT_FIELDCAT = FIELDCAT[]
IT_EXCLUDING =
IT_SPECIAL_GROUPS =
IT_SORT = IT_SORT
IT_FILTER =
IS_SEL_HIDE =
I_DEFAULT = 'X'
I_SAVE = ' '
IS_VARIANT =
IT_EVENTS = 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_CHARG
t_outtab = IT_STD_FINAL
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 EVENTS
text
--> p1 text
<-- p2 text
form EVENTS USING P_EVENTS TYPE slis_t_event.
DATA: ls_event TYPE slis_alv_event.
ls_event-name = 'TOP_OF_PAGE'.
ls_event-form = 'TOP_OF_PAGE'.
APPEND ls_event TO P_EVENTS.
endform. " EVENTS
*& Form TOP_OF_PAGE
text
FORM TOP_OF_PAGE.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
EXPORTING
it_list_commentary = TOP.
ENDFORM. "TOP_OF_PAGE
**& Form SORT
text
-->P_IT_SORT text
form SORT using p_sort TYPE SLIS_T_SORTINFO_ALV.
DATA : LT_SORT TYPE slis_sortinfo_alv.
LT_SORT-fieldname = 'LIFNR'.
LT_SORT-tabname = 'IT_STD_FINAL'.
LT_SORT-up = 'X'.
LT_SORT-SUBTOT = 'X'.
APPEND LT_SORT TO P_SORT.
CLEAR LT_SORT.
LT_SORT-fieldname = 'GSBER'.
LT_SORT-tabname = 'IT_STD_FINAL'.
LT_SORT-up = 'X'.
LT_SORT-SUBTOT = 'X'.
APPEND LT_SORT TO P_SORT.
CLEAR LT_SORT.
LT_SORT-fieldname = 'UMSAV'.
LT_SORT-tabname = 'IT_LFC3'.
LT_SORT-up = 'X'.
LT_SORT-SUBTOT = 'X'.
APPEND LT_SORT TO P_SORT.
CLEAR LT_SORT.
endform. " SORT
*& Form LAYOUT
text
--> p1 text
<-- p2 text
form LAYOUT .
LAYOUT-ZEBRA = 'X'.
LAYOUT-INFO_FIELDNAME = 'LINE_COLOR'.
LAYOUT-COLWIDTH_OPTIMIZE = 'X'.
APPEND LAYOUT." TO LAYOUT.
endform. " LAYOUT
*& Form EVENTS_1
text
-->P_EVENTS text
FORM EVENTS_1 USING P_EVENTS TYPE slis_t_event.
DATA: ls_event TYPE slis_alv_event.
WRITE: SY-UNAME.
ls_event-name = 'END_OF_PAGE'.
ls_event-form = 'END_OF_PAGE'.
APPEND ls_event TO P_EVENTS.
ENDFORM. " EVENTS_1
waiting for ur reply... -
Send Vendor Balance confirmations report output (F.18) to External email ID
Dear Friends.
I have following requirement
Our Client requirement is to send Vendor Balance confirmations report output (Tcode F.18) to external email ID of vendor.
So please guide accordingly.
I have done BASIS Settings for SMTP (Tcode SCOT, RZ10) and Through SAP office using BASIS consultant and i can able to send sample test mail to external email ID through SAP Office (tcode SO00)
I will be thankful if anyone gives me exact solution.
Thanks & Regards
SuyogHi,
You can craete Background Job and send Mail.
e.g.
Goto->SM36->JOBWIZARD ( Create the Job and specify the Spool List Recipients ).
After Creating the job.
Again SM36->Start Condition ( You can create here when to send the mail ).
And Release it.
Be sure that your BASIS guy has done the required settings for Outgoing Mail.
Please check in SCOT.
Affable
Arbind
Edited by: Arbind Prasad on Jan 23, 2010 3:07 PM -
Hi,
In f.42, while running the report, the name of the vendor was not displayed, only search terms were being displayed. After doing some changes in the layout, we made it possible in the production server. However, when we tried to make a change in the development server, the changed layout is not working. Also, at some other places in our organisation with similar client, it's not working. Please suggest.
AshokF.42 is similar to S_ALR_87012082 - Vendor Balances in Local Currency.
In many of the vendor reports Search term only will appear
In S_ALR_87012093 - Vendor Business you wii get Vendor Name also....Check this
Ramesh -
Hi Seniors,
Please help me with this issue........i have to develope a New report Vendor balance Reconcillation ......Using the Standard report S_ALR_87012082 vendor balances in local currency.....it should be same like this Standard report but this Report is not Designed to give Line Items Because it has Picked up the Data only from few tables like LFA1 LFB1 LFC3.....which give Direct Balances in these tables......But i have Developed a report to Some Extent....But Finding it Difficult in Adding a Special GL Date which is Reflecting in the LFC3 Table....I have to Keep a Check Box in the Selection-Screen when it is Selected .....Hi Seniors,
Please help me with this issue........i have to develope a New report Vendor balance Reconcillation ......Using the Standard report S_ALR_87012082 vendor balances in local currency.....it should be same like this Standard report but this Report is not Designed to give Line Items Because it has Picked up the Data only from few tables like LFA1 LFB1 LFC3.....which give Direct Balances in these tables......But i have Developed a report to Some Extent....But Finding it Difficult in Adding a Special GL Date which is Reflecting in the LFC3 Table....I have to Keep a Check Box in the Selection-Screen when it is Selected .....
Maybe you are looking for
-
Hi, I am working on SRM(proxy) to File scenario. HTTP port is not set up for the application servers on SRM system. As a result, i am not able to connect to ESR. This is confirmed by SPROX_CHECK_HTTP_COMMUNICATION. Is there any way i can make it work
-
RSCRM_BAPI - using logical path
Hi everybody, I use rscrm_bapi in order to export data from bw. Is it possible to use logical path name in this interface? I try to write in the path field a logical path name which was define earlier (tran file), but the system concatenate the logic
-
How do I download internet explorer to my mac
How do I download internet explorer to my mac pro?
-
Problem with recovering or updating !!
hi ! i have a very very important problem. i bought an ipad 2 1 month ago and i updated to version 5.0.1 yesterday . but when i updated i saw that all of my files and images was deleted !! this is my question : how can i recover them or do something
-
I just installed the new flash, because youtube said i needed to update. I did so, but now when I try to access youtube it says waiting for s.ytimg.com. and firefox then says it is not responding. I have been on google but couldnt really find anyth