SAP Seniors please help in Concept model
Hi, please try help me in the concept for the complex model.
This is the oficial post, very thank you.
Nw04s BI - STS
Victor ,
instead of starting a new post - it would be better if you reply to your old post with an update and it would come up in the first page...
Arun
P.S have replied to your post but am not able to understand your requirement... involved BPS also and hence the replies would be in that forum... am not sure if you want the solution for BeX or BPS or data modeling...
Message was edited by:
Arun Varadarajan
Message was edited by:
Arun Varadarajan
Similar Messages
-
Seniors please help me in this Report
Hi Seniors,
PLEASE HELP ME WITH THIS REPORT.
I KNOW THE FUNTIONALITY OF THE REPORT AND I AM NOT ABLE TO PUT
IT IN TO THE ABAP PROGRAM..
REPORT NAME : CUMULATIVE BILL
FUNCTIONAL AND TECHNICAL SPECIFICATIONS
SELECTION-SCREEN FIELDS
WERKS -
TABLE: EKPO--- PLANT
LGORT -
TABLE: EKPO--- STORAGE LOCATION
EBELN -
TABLE: EKPO .. PURCHASING DOCUMENT NUMBER
NOTE : FOR THIS EBELN NUMBER SELECTED IN THIS FIELD THE NEXT FIELD SHOULD BE REACTED. MEANS FOR THE PURCHASING DOCUMENT SELECTED HOW MANY INVOICE ARE MADE SHOULD ONLY DISPLAY FOR THE BELOW FIELD.THE NEXT FIELD IS GIVEN BELOW.
BELNR -
TABLE: RBKP--- Document number of an invoice document
THE ABOVE FIELD BELNR SHOULD DIPLAY ON THE BASIS OF NUMBER SELECTED IN EBELN.
FUNTIONAL EXPLINATION : FOR A PARTICULAR PURCHASE ORDER(EBELN) HOW MANY INVOICES(BELNR) ARE MADE SHOULD BE DISPLAYED.
OUTPUT SCREEN FIELDS
TOP BOX SHOULD DISPLAY IN THIS FORMAT.
PLANT -WERKS-EKPO . BILL NO:-XBLNR--
PROJECT -POST1---TABLE -PROJ DATE : BUDAT--
VENDOR -NAME1-TABLE -LFA1 . WO NO :BELNR--
ADDRESS -
STREETTABLE-ADRC--
OUTPUT FIELDS IN THE FUNTIONAL SPEC .
1)SLNO--2) DESCRIPTION-3) QTY UP TO PREVBILL---4) AMOUNT UPTO PREVIOUS BILL -5)CURRENT QUANTITY6)CURRENT RATE-7) CURRENT
AMOUNT -
8)CUMILATIVE QUANTITY----9)CUMILATIVE AMOUNT.
THESE ARE THE FIELDS THAT SHOULD BE DISPLAYED IN THE OUTPUT IN A ROW ..
ELOBORATING FIELDS RELATED TO THE OUTPUT SCREEN.
1) DESCRIPTION : TXZ01 ---EKPO
2) QTY UPTO PREVIOUS BILL.-----
3) AMOUNT UPTO PREVIOUS BILL---
4) CURRENT QUANTITY FIELD NAME : MENGE----- NOTE: THIS FIELD SHOULD GET THE QTYS OF THE PARTICULAR INVOICE SELECTED IN THE SELECTION SCREEN THAT
IS BELNR.
5) CURRENT RATE------NETPR ---FOR THAT QTY MENTIONED IN WORK ORDER
TABLE EKPO
6) CURRENT AMOUNT------ MULTIPLYING THE PREVIOUS 2 FIELDS THAT IS CURRENT QUANITY AND CURRENT RATE (GIVE THIS FIELD CURRENT AMOUNT
7) CUMULATIVE QUANTITY----- SHOULD BE DONE BY ADDING THE FIELDS
QTY UPTO PREVIOUS BILL AND CURRENT QUANTITY .
8) CUMILATIVE AMOUNT-----WE GET IT BY MULTIPLYING CURRENT RATE WITH CUMILATIVE QUANTITY.
EXPLANATION FOR THE 2ND AND 3RD FIELDS
2) QTY UP TO PREVIOUS BILL : SHOULD GIVE THE QTY ACCORDING TO THE SELECTION-SCREEN FIELD .BELNR IF BELNR IN THE SELECTION SCREEN CONTAINS 10 INVOICE FOR A PARTICULAR WORKORDER EBELN
SELECTED..
AND WE SELECT ONE INVOICE FOR EXAMPLE 6TH INVOICE .
IT CONTAINS SOME MATERIALS AND QTY FOR THAT METERIALS
BUT IN THE FIELD OF QTY UP TO PREVIOUS BILL THE QTY OF THE PREVIOUS INVOICE OF THAT PARTICULAR WO SHOULD BE DISPLAYED..
THE IS QTY OF THE PREVIOUS INVOICES OF 12345 = QTY UP TO PREVIOUS BILL + CURRENT QTY GIVES CUMILATIVE QTY FIELD ..
OR
ADDING OF 12345+6 = CUMULATIVE QTY OF CURRENT QTY GIVES
QTY UP TO PREVIOUS BILL.
EITHER WAY WE CAN GET THE OUTPUT .
PLEASE HELP WITH THE ENTIRE PROGRAM OR LOGIC .
PLEASE SEND ME THE CODING TO MY MAIL [email protected]Nalini,
Take the step by step directions try to build your program... if you find any difficulty in the middle just pose the question at that time.... every one will be ready to answer your questions....
eg:
take the first line...
REPORT NAME : CUMULATIVE BILL
design a report program with the above given name in se38...
then second line.....
SELECTION-SCREEN FIELDS
WERKS -
TABLE: EKPO--- PLANT
LGORT -
TABLE: EKPO--- STORAGE LOCATION
EBELN -
TABLE: EKPO .. PURCHASING DOCUMENT NUMBER
build select-options: with the above mentioned 3 fields
3rd direction.....
NOTE : FOR THIS EBELN NUMBER SELECTED IN THIS FIELD THE NEXT FIELD SHOULD BE REACTED. MEANS FOR THE PURCHASING DOCUMENT SELECTED HOW MANY INVOICE ARE MADE SHOULD ONLY DISPLAY FOR THE BELOW FIELD.THE NEXT FIELD IS GIVEN BELOW.
work accordingly....
If you devide the spec like this... it would be easy for you to build the program...
try it once... you can do it nalini....don't fear with that spec...
gud luck nalini... -
Problems in SAP script : Please help
Hi Friends:
I've got a ticket in SAP script & need to do the following modifications:
1. In the SAP script, on the bottom side there is a cheque no. I want to print the chequq no. in MICR format. Right now its coming into normal format. Please advise me in details as to what to do?
2. How to convert the date format from DD.MM.YYYY to DDMMYYYY.
3. There is some amount getting printed on the cheque. e.g $50.00 The requirement is like that after '$' sign, 50.00 should come in a box.Please advise as how to do that.
4. There is some gap coming in between the '$' & the amount 50.00. Once that 50.00 will be in Box, as per point 4, how to reduce the gap.
5. The "$" sign is not getting printed correctly. The line which is striking vertically the 'S', is appearing broken. Please advise as how to resolve the same.
Hi experts, please help me on the above points. Suitable points will be rewarded.
Thanks:
GauravHi there.
Question 1:
Use font MICR_C for MICR CMC-7 or MICR_E for MICR E-13B
http://help.sap.com/saphelp_nw04/helpdata/en/90/78f078030211d399b90000e83dd9fc/frameset.htm
Question 2:
/: SET DATE MASK = 'DDMMYYYY'
http://help.sap.com/saphelp_nw04/helpdata/en/d1/8034d4454211d189710000e8322d00/frameset.htm
Question 3:
/E BOX_ELEMENT
/: POSITION WINDOW
/: POSITION YORIGIN &Y& LN
/: SIZE HEIGHT &HEIGHT& LN
/: BOX FRAME 10 TW
/: BOX XPOS '0.0' CM WIDTH 0 TW FRAME 10 TW
Question 4:
&symbol(C)&
http://help.sap.com/saphelp_nw04/helpdata/en/d1/8034d4454211d189710000e8322d00/frameset.htm
Question 5:
See SAP Note 129581.
Best regards.
Valter Oliveira.
Edited by: Valter Oliveira on May 30, 2008 4:42 PM -
How to Integrate Portal with SAP OFFICE(Please help me)
Hello Experts,
I have doubts on Portal and SAP office..
Please find the
1) How to show the document info record(DIS,like cv03n or cv04n) in Portal
Please let me know the step by step procedure...
2) After showing the documnet info record(DIS) in the portal,If user clicks on
original attachmnet of documnet info record(DIS) it shoud show the drawing
or diagam in the word or any uformat using SAP OFFCIE:
How to Integrate Portal with SAP OFFICE
Please let me know the details.
Please mail me any documents related to this to my mail id
[email protected]
Thnaks in Advance
Preethi DSouzaHi Dharani,
Please check this thread.
How will do the connectivity with SAP and Non Sap System
Also ensure you avoid cross-posting. This has been mentioned to you multiple times earlier.
Cheers,
Sandeep Tudumu -
Hi Seniors Please Help me with this issue......
Seniors......
when the Data Entry is Done in MIGO there is a place to Enter a
External number for Delivery Note ...to enter a External Number..... My client needs that Number in the Report....i am not finding that number..... any where in SAP or in tables...please can u help me in finding it....Urgent Please
Thanks
Nalini.Hi Nalini,
m Not sure abt this..
Search MSEG table with Movement type 601 (Goods issue for Delivery) then you will find Delivery no in field "LGPLA".
nd hv a look on..
MSEG-LFBNR reference document number
<b>Reward Points if useful.</b>
Thanks & Regards
ilesh 24x7 -
Data Flow in SAP BI - Please Help
Hello All,
I have to prepare a Data flow in SAP BI for one of the Insurance system application.
There are 4 flat files coming from the source. Each flat file has records on insurances details like policies and so on.
Each flat file represents a line of business. Now the data model is newly being made. There will also be historic data for last three years for reporting and current year data is loaded in monthly basis.
Also the error records will go in different target for reporting for each line of business.
Please suggest a data flow which which would be made in best.
Edited by: Syed786 on Oct 23, 2009 5:09 PM
Edited by: Syed786 on Oct 26, 2009 11:31 AMHi sridhar
1) Sender Adapter & Sender agreement & communication channel
2) receiver determination
3) interface determination
4) message branch
5) receiver agreement & communication channel
6) call inbound adapter
Regards Mario -
What are the different ways to upload file data to SAP? Please help
Hi Experts,
I have to transfer huge file data (few lakhs records) to SAP business transaction. What are the different ways to do the same? I have heard of BDC and LSMW. But are there any more options?
Which option is best suited for huge file data?
Is LSMW an old technology and SAP will not support it any more?
Kindly answer my queries at the earliest.
I will be greatful to you if you can help me.
Thanks
Gopalfor uplodig data to non sap we have 2 methodes
i) if u know bapi u will use lasm
2) bdc
but u mentioned so many records isthere
best thing is u will uplode all record sto al11 using XI interface
then u have to write bdc / lsmw program
beter to go for lsmw before that u will find bapi
if u will unable to find bapi
u have to create bapi and use it in lasmw
ofter that u have schedule the lsmw program as a bockground
then u have to create a job for it
and release from sm 37
then u have to moniter through bd87
if u want to go through i will help u.
if it is usefull to u pls give points
Saimedha -
Please help creating data model where query has & in select
Below is the actual code of the part of select having a problem.
When I had '&' instead of chr(36), a window opens up saying 'Please enter values for lexical references in sql then has *&' and empty box and check box then flex field.
So I replaced '&' with chr(36) below
After I put the code in, it is asking me the question ====>
'Do you want to create a bind parameter? : //wwwapps.ups.com/WebTracking/processInputRequest?sort_by
,'=HYPERLINK("http://wwwapps.ups.com/WebTracking/processInputRequest?sort_by=status'||CHR(36)||'tracknums_displayed=1'||CHR(36)||'TypeOfInquiryNumber=T'||CHR(36)||'loc=en_US'||CHR(36)||'InquiryNumber1='||mbl.tracking_number||CHR(36)
||
'track.x=0'||CHR(36)||'track.y=0","'||mbl.tracking_number||'")' "Tracking Link (Click to Track)",Hi,
Looks like no more problems creating data models after replacing the '&' and ':' with their chr(x) counterparts. But when they I run the report, it shows the hyperlink code below instead of the hyperlink tracking number they can just click on. Also when I try the query in toad, it works.
=HYPERLINK("http://wwwapps.ups.com/WebTracking/processInputRequest?sort_by=status&tracknums_displayed=1&TypeOfInquiryNumber=T&loc=en_US&InquiryNumber1=&track.x=0&track.y=0","") -
I am Learning SAP Security - Please Help
I am learning SAP Security and I would like to know a) good books for SAP Security, b) online web tutorials c) Video Tutorials. My email id is <removed_by_moderator>
The book Authorization made easy is the very good book.
I also advice you to take certification by SAP in security area [ not mandatory ]. The course material ADM940, 950,960 are the best information source.
documentation in sap.com,
And there are many good sites:
sappoint.com
searchsap.com
ittoolbox.com
sapfans.com
sapgenie.com
sap-img.com..... -
Hi All..
Presently I m working in TCS(2007 Passout). recently I hav undergone ABAP training conducted in TCS by SAP Education Services,and now waitiing for related projects here..But as told by HR currently no requirements for ABAPers..and also they will be providing Course attended certificate but dont know when.
Also
As told by sdn forums there are very less job opportunities for ABAP freshers
also Some people say Certification wil not matters much for getting jobs
My question's are here
1.is it necessary to attend certification exam and how should I plan for completing ABAP certification?
2.How well should i plan for my career?
3.Incase if i get project in someother technology in TCS, how i should come back to SAP?
Please help me regarding this.
I will be expecting ur reply and grateful to you for ur suggestions.
Thank you.
Edited by: shreyansh babagond on May 8, 2008 10:32 AMHi Shreyansh,
If u r good in ABAP its not necesary to do certification.Certifcation are helpful tp promote you and add an extra edge.
If u plan for abap certification then plz check these links:
ABAP Certification
ABAP Certification
ABAP certification Q's
And if got shifted in another tech and then want to switch back in EP then u have to consult related ppl there like ur RM or so.
Regards
Priya
award point for helpful answer -
Nedd your help for aceesing database in minisap 4.6 d (please help)
hi all sap masters please help me.
i have installed the minisap 4.6d system in the windows 200 prof os.
i had the following problem in my minisa access.
while Displaying table contents with transactions SE11 or SE16
gives an error "No changes on SAP objects allowed".
while Accessing the logical database F1S gives a syntax error because the
include DBF1SF01 is missing.
so i have used the mbspatch1 that comes with the cd.
i have copied the mbscorr0104200 file in the directory '<MBS_DIR>\trans\tmp' as mentioned.
and i have followed the steps as follows.but i have the same problem.please have a look at the
process below and hel me to make it work roerly.
this roblem is really eating me a lot and since many in this forum are sap master,thought
you all can help me please.
C:\>cd mbs
C:\MBS>dbenv.cmd
C:\MBS>REM Setting environment for db connect to MBS
C:\MBS>set dbms_type=mss
C:\MBS>set DIR_LIBRARY=.
C:\MBS>set MSSQL_DBNAME=MBS
C:\MBS>cd trans\tmp
C:\MBS\TRANS\TMP>r3trans -i mbscorr01042000
'R3TRANS' is not recognized as an internal or external command,
operable program or batch file.
hope there was some problem here only,but to continue i have pasted the r3trans in the folder C:\MBS\TRANS\TMP
C:\MBS\TRANS\TMP>r3trans -i mbscorr01042000
This is R3TRANS version 6.05 (release 46D - 04.10.00 - 09:16:00).
2EETW169 no connect possible: "connect failed with DBLI_RC_LOAD_LIB_FAILED."
R3TRANS finished (0012).
then i have done the generate program step .
(4) Generate programs:
- Logon as user BCUSER to the MBS system.
- Start transaction SE38.
- Enter the program 'SAPLSTRD' and select 'Program -> Generate'.
- Enter the program 'SAPDBF1S' and select 'Program -> Generate'.
while generating the second program i got the error Accessing the logical database F1S gives a
syntax error because the include DBF1SF01 is missing.
hope somebody could have got the same problem.so please help me with your experience.iam new to this
minisap problems.
again all the roblem of acessing the tables exit even after doing the steps.
hope i have explained my problem very clearly.
please find where i went wrong or suggest some help to acess the datadase tables with the minisap cd.all webas downloads (ABAP, java)
https://www.sdn.sap.com/irj/sdn/downloaditem?rid=/library/uuid/cfc19866-0401-0010-35b2-dc8158247fb6
webas 6.40 ABAP server
https://www.sdn.sap.com/irj/sdn/downloaditem?rid=/webcontent/uuid/b2918eea-0601-0010-6284-e6cb7eee4399 [original link is broken]
SAP gui
https://www.sdn.sap.com/irj/sdn/softwaredownload?download=ftp://ftp.sap.com/pub/sdn/devkits/netweaver/abap/50072743_4.zip&df=0
Regards
Raja -
Please help to acess database in minisap 4.6 d
hi all sap masters please help me.
i have installed the minisap 4.6d system in the windows 200 prof os.
i had the following problem in my minisa access.
while Displaying table contents with transactions SE11 or SE16
gives an error "No changes on SAP objects allowed".
while Accessing the logical database F1S gives a syntax error because the
include DBF1SF01 is missing.
so i have used the mbspatch1 that comes with the cd.
i have copied the mbscorr0104200 file in the directory '<MBS_DIR>\trans\tmp' as mentioned.
and i have followed the steps as follows.but i have the same problem.please have a look at the
process below and hel me to make it work roerly.
this roblem is really eating me a lot and since many in this forum are sap master,thought
you all can help me please.
C:\>cd mbs
C:\MBS>dbenv.cmd
C:\MBS>REM Setting environment for db connect to MBS
C:\MBS>set dbms_type=mss
C:\MBS>set DIR_LIBRARY=.
C:\MBS>set MSSQL_DBNAME=MBS
C:\MBS>cd trans\tmp
C:\MBS\TRANS\TMP>r3trans -i mbscorr01042000
'R3TRANS' is not recognized as an internal or external command,
operable program or batch file.
hope there was some problem here only,but to continue i have pasted the r3trans in the folder C:\MBS\TRANS\TMP
C:\MBS\TRANS\TMP>r3trans -i mbscorr01042000
This is R3TRANS version 6.05 (release 46D - 04.10.00 - 09:16:00).
2EETW169 no connect possible: "connect failed with DBLI_RC_LOAD_LIB_FAILED."
R3TRANS finished (0012).
then i have done the generate program step .
(4) Generate programs:
- Logon as user BCUSER to the MBS system.
- Start transaction SE38.
- Enter the program 'SAPLSTRD' and select 'Program -> Generate'.
- Enter the program 'SAPDBF1S' and select 'Program -> Generate'.
while generating the second program i got the error Accessing the logical database F1S gives a
syntax error because the include DBF1SF01 is missing.
hope somebody could have got the same problem.so please help me with your experience.iam new to this
minisap problems.
again all the roblem of acessing the tables exit even after doing the steps.
hope i have explained my problem very clearly.
please find where i went wrong or suggest some help to acess the datadase tables with the minisap cd.all webas downloads (ABAP, java)
https://www.sdn.sap.com/irj/sdn/downloaditem?rid=/library/uuid/cfc19866-0401-0010-35b2-dc8158247fb6
webas 6.40 ABAP server
https://www.sdn.sap.com/irj/sdn/downloaditem?rid=/webcontent/uuid/b2918eea-0601-0010-6284-e6cb7eee4399 [original link is broken]
SAP gui
https://www.sdn.sap.com/irj/sdn/softwaredownload?download=ftp://ftp.sap.com/pub/sdn/devkits/netweaver/abap/50072743_4.zip&df=0
Regards
Raja -
i bought macbook pro used one because i wanna start to develop ios apps and i need Mavericks if it is a possible my mac is 10.6 please help me apple
Model Name: MacBook Pro
Model Identifier: MacBookPro5,5
Processor Name: Intel Core 2 Duo
Processor Speed: 2.26 GHz
Number Of Processors: 1
Total Number Of Cores: 2
L2 Cache: 3 MB
Memory: 4 GB
Bus Speed: 1.07 GHz
Boot ROM Version: MBP55.00AC.B03
SMC Version (system): 1.47f2
Serial Number (system): W8******66D
Hardware UUID: *****
Sudden Motion Sensor:
State: Enabled
<Edited By Host>Back up your data, check your applications for compatibility, and download Yosemite from the Mac App Store.
(121877) -
Please Help me with this Logic.....
Seniors , Please Help me with this Requirment
BUKRS _____________________
GJAHR ____________________
LIFNR _____________________
MONAT _____________________
LIFNR NAME1 GSBER GJAHR HBAL SBAL ACCUMBAL
1001 ABB BUSS1 2005 300 00
ABB BUSS1 2005 00 100
300 100 (300-100)=200
ABB BUSS1 2006 200 00
ABB BUSS1 2006 200 00
400 00 (400-00)+ 200 =
600
ABB BUSS2 2005 300 00
ABB BUSS2 2005 00 100
300 100 ( 300-100) =200
ABB BUSS2 2006 400 00
ABB BUSS2 2006 00 100
400 100 (400-100)+200 =
500 ****************************************************************************
1400 300 (1400-300) **********************************************************************************************************
Same for the Next Vendor also...
This is the report for this Requirment i am working on....Please Help me in the Logic..How to Go on with it....
*& Report ZVENDOR_RECONCILLATION
REPORT ZVENDOR_RECONCILLATION.
TABLES : BSAK , BSIK , LFC1 , LFC3 , LFA1.
*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 : 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.
*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.
*FINAL INTERNAL TABLE DECLARATION
DATA: BEGIN OF IT_FINAL,
lifnr TYPE bsak-lifnr,
gsber TYPE bsak-gsber,
bukrs TYPE bsak-bukrs,
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,
END OF IT_FINAL.
DATA: BEGIN OF SD_FINAL,
gsber TYPE bsak-gsber,
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,
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,
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_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.
SELECT-OPTIONS : S_GJAHR FOR BSAK-GJAHR.
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 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 IN S_GJAHR
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 .
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.
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.
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_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.
SORT IT_STD_FINAL BY LIFNR GSBER GJAHR.
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-JUST = 'M'.
APPEND LCAT TO FIELDCAT.
CLEAR LCAT.
LCAT-FIELDNAME = 'NAME1'.
LCAT-TABNAME = 'IT_STD_FINAL'.
LCAT-SELTEXT_L = 'Vendor Name'.
LCAT-JUST = 'M'.
APPEND LCAT TO FIELDCAT.
CLEAR LCAT.
LCAT-FIELDNAME = 'GJAHR'.
LCAT-TABNAME = 'IT_STD_FINAL'.
LCAT-SELTEXT_L = 'Fiscal Year'.
LCAT-JUST = 'M'.
APPEND LCAT TO FIELDCAT.
CLEAR LCAT.
LCAT-FIELDNAME = 'GSBER'.
LCAT-TABNAME = 'IT_STD_FINAL'.
LCAT-SELTEXT_L = 'BussArea'.
LCAT-JUST = 'M'.
APPEND LCAT TO FIELDCAT.
CLEAR LCAT.
LCAT-FIELDNAME = 'DMBTR_S'.
LCAT-TABNAME = 'IT_STD_FINAL'.
LCAT-SELTEXT_L = 'Debit Balanace'.
LCAT-JUST = 'M'.
APPEND LCAT TO FIELDCAT.
CLEAR LCAT.
LCAT-FIELDNAME = 'DMBTR_H'.
LCAT-TABNAME = 'IT_STD_FINAL'.
LCAT-SELTEXT_L = 'Credit Balance'.
LCAT-JUST = 'M'.
APPEND LCAT TO FIELDCAT.
CLEAR LCAT.
LCAT-FIELDNAME = 'BAL'.
LCAT-TABNAME = 'IT_STD_FINAL'.
LCAT-SELTEXT_L = 'Accumulated Balance'.
LCAT-JUST = 'M'.
APPEND LCAT TO FIELDCAT.
CLEAR LCAT.
endform. " FIELD
*& Form DISPLAY
text
--> p1 text
<-- p2 text
form DISPLAY .
CLEAR: IT_STD_BSAK,IT_STD_BSIK, IT_STD_LFA1 .
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 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_1Seniors , Please Help me with this Requirment
BUKRS _____________________
GJAHR ____________________
LIFNR _____________________
MONAT _____________________
LIFNR NAME1 GSBER GJAHR HBAL SBAL ACCUMBAL
1001 ABB BUSS1 2005 300 00
ABB BUSS1 2005 00 100
300 100 (300-100)=200
ABB BUSS1 2006 200 00
ABB BUSS1 2006 200 00
400 00 (400-00)+ 200 =
600
ABB BUSS2 2005 300 00
ABB BUSS2 2005 00 100
300 100 ( 300-100) =200
ABB BUSS2 2006 400 00
ABB BUSS2 2006 00 100
400 100 (400-100)+200 =
500 ****************************************************************************
1400 300 (1400-300) **********************************************************************************************************
Same for the Next Vendor also...
This is the report for this Requirment i am working on....Please Help me in the Logic..How to Go on with it....
*& Report ZVENDOR_RECONCILLATION
REPORT ZVENDOR_RECONCILLATION.
TABLES : BSAK , BSIK , LFC1 , LFC3 , LFA1.
*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 : 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.
*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.
*FINAL INTERNAL TABLE DECLARATION
DATA: BEGIN OF IT_FINAL,
lifnr TYPE bsak-lifnr,
gsber TYPE bsak-gsber,
bukrs TYPE bsak-bukrs,
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,
END OF IT_FINAL.
DATA: BEGIN OF SD_FINAL,
gsber TYPE bsak-gsber,
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,
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,
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_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.
SELECT-OPTIONS : S_GJAHR FOR BSAK-GJAHR.
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 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 IN S_GJAHR
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 .
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.
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.
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_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.
SORT IT_STD_FINAL BY LIFNR GSBER GJAHR.
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-JUST = 'M'.
APPEND LCAT TO FIELDCAT.
CLEAR LCAT.
LCAT-FIELDNAME = 'NAME1'.
LCAT-TABNAME = 'IT_STD_FINAL'.
LCAT-SELTEXT_L = 'Vendor Name'.
LCAT-JUST = 'M'.
APPEND LCAT TO FIELDCAT.
CLEAR LCAT.
LCAT-FIELDNAME = 'GJAHR'.
LCAT-TABNAME = 'IT_STD_FINAL'.
LCAT-SELTEXT_L = 'Fiscal Year'.
LCAT-JUST = 'M'.
APPEND LCAT TO FIELDCAT.
CLEAR LCAT.
LCAT-FIELDNAME = 'GSBER'.
LCAT-TABNAME = 'IT_STD_FINAL'.
LCAT-SELTEXT_L = 'BussArea'.
LCAT-JUST = 'M'.
APPEND LCAT TO FIELDCAT.
CLEAR LCAT.
LCAT-FIELDNAME = 'DMBTR_S'.
LCAT-TABNAME = 'IT_STD_FINAL'.
LCAT-SELTEXT_L = 'Debit Balanace'.
LCAT-JUST = 'M'.
APPEND LCAT TO FIELDCAT.
CLEAR LCAT.
LCAT-FIELDNAME = 'DMBTR_H'.
LCAT-TABNAME = 'IT_STD_FINAL'.
LCAT-SELTEXT_L = 'Credit Balance'.
LCAT-JUST = 'M'.
APPEND LCAT TO FIELDCAT.
CLEAR LCAT.
LCAT-FIELDNAME = 'BAL'.
LCAT-TABNAME = 'IT_STD_FINAL'.
LCAT-SELTEXT_L = 'Accumulated Balance'.
LCAT-JUST = 'M'.
APPEND LCAT TO FIELDCAT.
CLEAR LCAT.
endform. " FIELD
*& Form DISPLAY
text
--> p1 text
<-- p2 text
form DISPLAY .
CLEAR: IT_STD_BSAK,IT_STD_BSIK, IT_STD_LFA1 .
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 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 -
BPM when both sender and receiver systems are Sync. Please help!
Hi Experts,
I want to use BPM when both sender and receiver systems are Sync. For example: web service ---> RFC
I have tried the solution as given in the blog
https://weblogs.sdn.sap.com/pub/u/39730 [original link is broken] [original link is broken]
but it does not work. I am getting Time Out error.
Can somebody tell me the correct way of configuring BPM for sync-sync scenario?
Kindly give the integraion directory steps also.
Thanks
GopalHi Hemant,
I have already tried the solution as given in the blog (https://www.sdn.sap.com/irj/sdn/weblogs?blog=/pub/wlg/1403 [original link is broken] [original link is broken] [original link is broken])but it does not work. When I run the scenario I am getting Time out error.
<SAP:Error xmlns:SAP="http://sap.com/xi/XI/Message/30" xmlns:SOAP="http://schemas.xmlsoap.org/soap/envelope/" SOAP:mustUnderstand="1">
<SAP:Category>XIServer</SAP:Category>
<SAP:Code area="INTERNAL">PL_TIMEOUT</SAP:Code>
<SAP:P1 />
<SAP:P2 />
<SAP:P3 />
<SAP:P4 />
<SAP:AdditionalText />
<SAP:ApplicationFaultMessage namespace="" />
<SAP:Stack>Timeout condition of pipeline reached</SAP:Stack>
<SAP:Retry>N</SAP:Retry>
</SAP:Error>
Please help!
Thanks & Regards,
Gopal
Maybe you are looking for
-
I noticed when useing the System Image Utility to create a NetInstall set that the Percent listed in the log files goes from 87.2938 to -1. The process does continue working and eventually does complete, but the NetInstall set doesn't work. Has anyon
-
After upgrading the AIR SDK to 3.0 in Flash Professional CS5.5 I've found some problems. First, the JSON class in the as3corelib.swc library now throws a couple of compile errors: 1061: Call to a possibly undefined method decode through a reference w
-
500 Internal server error on RPC over HTTP using TS Gateway
I've been happily using TS Gateway on Windows Server 2008 x64 for 18 months and everything was working perfectly. Suddenly this week it started giving "access denied" errors to any user who tried to connect, evidenced in event viewer as a failed logi
-
Some features not available to Automatic User
We have 2 new macs running Leopard and are having the same issue with both. As the default automatic user, some features are not available. For example, the eye icon for QuickLook does not appear in any of the windows, such as the Finder. In Mail, th
-
Problems transfering with itunes/explorer
hi i just got a new ipod shuffle from apple after my old one died, im having trouble transfering songs to the ipod with itunes, as soon as i drag a song or playlist and drop it onto the shuffle it begins the transfer stage, then it disconnects itself