Add report to module SD
Hi all.
i writed report yet, i want run report in module Sales and Distribution.
To Who those is help I.
Thank very much.
Hi ,
Please as said by anya , u need to extend that Area menu then u can add any thing under that .
If u want to find out which area menu it is then place cursor on that node ->goto EXTRA->Technical Details.
Regards
Prabhu
Similar Messages
-
Hi Members,
We have an application developed in Visual Basic6, MSAccess(Datastorage) and Crystal Reports11 (for reporting), and working fine since years.
Now, we have developed the same application using Labview 7.1.
We are using Crystal Reports Ver.11 for report generation, and working fine. (Had to do this because we have invested a lot of $ for Crystal Reports.)
Now we want to distribute the software to our customers by giving them the setup. We are sucessfully able to generate the setup of Labview application and working fine on the customer PC, but it gives problems when generting reports on the customer's PC. We studied the documentation of Crystal reports, and found that they have Merge modules that needs to be included in the Setup. We have done it sucessfully in VB6, using MS-Installer, because they support including .MSM files directly.
We would like to know, how we can include those .MSM files of crystal reports in Labview Application builder,
or
how to include these .MSM files into our setup cd that is to be given to our customer.
Thanking you,
with best regards from,
Kiran V Sutar
Mumbai, INDIA.
P.S. : I have also posted this question on other forum at : http://forums.lavag.org/Crystal-Report-t13349.html
I hope this does not offend anybody, Since I am desparate to get a solution to this.Sorry for the late reply. Just got back from work. I asked the previous developer. They told me they're using .NET to call the Crystal Report 2013 in VF. Yes we use the SAP Crystal Reports Developer Version for Visual Studio.NET. When i check they reference this C:\Program Files\SAP BusinessObjects\Crystal Reports for .NET Framework 4.0\Common\SAP BusinessObjects Enterprise XI 4.0\win32_x86\dotnet\CrystalDecisions.CrystalReports.Engine.dll. Back from my previous concern.
My concern is when i'm going to deploy my application to my client.Will it work if i'm going to add the merge module file to my package from this link SAP Crystal Reports, developer version for Microsoft Visual Studio: Updates & Runtime Downloads? Because it say its for Visual Studio and Framework 4.0.
Do i really need to change my target framework to 4.0 in VS2010 and add the framework 4.0 dependency in my package?
Thank you for your reply...... -
Add and remove modules in Apache
Is it possible to add and remove modules within Apache (actually compile an relink Apache) with a source download form Apache.org (1.3.28?) and incorporate the necessery modules and configuration from Oracle?. I have looked for some kind of documentation for this, but ended up with nothing. Can anybody explain this?.
If you really understand apache and how oracle implements the apache server then yes you could add/remove modules if you have the source code from oracle. I dont think that you can download apache1.3.28 from apache.org and expect to use that source to build an executable that can plug into oracle.
-
Add report assignment to AR01 (Asset Balances)?
AR01-Asset Balances can be drilled-down to Asset Explorer (AW01N) via report interface/assignment. Can we add report assignment AS03 to report AR01?
For reports developed using Report Painter/Writer, we cannot change SAP-delivered reports/report groups but we can add report assignment to them. Any feedback is appreciated.
Regards,
StacyHi Rashmi
1) If you are in the output list of RABEST_ALV01, press the Button u201Cchange layoutu201D (CTRL F8). On the right you have a pool of u201Chidden fieldsu201D. Put this fields to the left and you have this columns in the output list.
2) If the field (column) that you want is not in the standard you can use note 335065. In the note is described the way how you can put the field in the include CI_REPRABEST of the structure FIAA_SALVTAB_RABEST.
(This is for all ALV-Reports expect RASIMU* and RAKOPL*). You can take all fields from ANLAV (ANLA, ANLU und ANLZ).
Therefore it works for ANLA-ANLUE.
Additionally you can use the SORT functionality of the SAP List Viewer on the output list
If you want to SORT in a certain manner directly after starting the report, you can create a LAYOUT which stores the SORT information.
Have a nice weekend
Bernhard -
Add Report painter report to Role Menu
Hi
I want to add a a report painter report to existing role. In PFCG when I click on Report and select report writer radio button, system prompts me to select report group. When I select this option, system does not show all the reports available within this group so that I can select the one which I want to add and have system generate transaction code Y_DEV_99* for this report. How Can I add report painter report to a role have system generate trans code for it??Martinsh Shaiters wrote:
> Mylène,
> You can use the Import/Export for the reports. They will keep their names, as far as I'm aware. Not sure what happens when you transport them, as it appears you can do it in GR3x transactions.
Marthinsh,
I am aware that you can export/import or transport the reports in themselves - but not their names. In a way I never clearly understood, they are not attached to their names as such.
But then ... we do agree, you can only authorise by group. -
In the Crystal Management Console I am the 'administrator' on server, when I go to particular folder and tried to upload a report:
On the right click => Add => I've two options only:
Add Program File
Local Document
I don't see an option to update 'Crystal Report', What am I missing?
Thanks in advanceSame as: Add report to server in the BI Space. Please do not cross post. This is against the SCN Rules of Engagement. Also, ensure you are posting gin the correct SCN Space by reading the description of the Space under it's Overview tab.
- Ludek
Senior Support Engineer AGS Product Support, Global Support Center Canada
Follow us on Twitter
Message was edited by: Ludek Uher -
hi all,
i want to add report that i have made in my menu, i m using oracle developer 6i forms and reports
how to add ??
Regards
Abhi.As i understood...
i have just designed menu in form build 6iBy this you mean that you want to call report from drop down menu.
when user select particular report it should open up and yes there are parameters in my reports
well i m passing the parameters to my query in data modelBy this i can understand that you are passing parameter to query data model etc. By how user will pass the parameters values to the reports. Is there any pre-designed form for report calling or you want to use report's default parameter form?
Anyway there is standard code for calling reports through forms in 6i like...
DECLARE
vParamList PARAMLIST;
BEGIN
vParamList:=GET_PARAMETER_LIST('TEMP');
IF NOT ID_NULL(vParamList) THEN
DESTROY_PARAMETER_LIST(vParamList);
END IF;
vParamList:=CREATE_PARAMETER_LIST('TEMP');
ADD_PARAMETER(vParamList,'PARAMETER_NAME',TEXT_PARAMETER,'PARAMETER_VALUE');
... ADD THE ABOVE LINES ACCORDING TO YOU NUMBER OF PARAMETERS...
Run_Product(REPORTS, 'REPORT_PATH\REPORT_NAME.REP',ASYNCHRONOUS,RUNTIME,FILESYSTEM,vParamList,NULL);
END;-Ammad -
A much more efficient way to add C Series modules manually
Scenario
Suppose that we want to start coding my Real-Time application, but the hardware hasn't arrived yet.
We can't Discover the chassis + modules, so we need to add modules manually.
Current editor
To add N modules, we need to launch this dialog N times:
Right-click on Chassis in the Project Explorer
Hover over "New"
Click "C Series Modules…"
Click "New target or device"
Click "C Series Module"
Click "OK"
Wait for LabVIEW to fetch module list (wait ~1 second)
Select Type (2 clicks)
Select Location (2 clicks)
Click "OK"
Go to #1 to add a new module
How tedious!
Proposed Editor
Wouldn't it be nice if we could set up all the modules in 1 dialog?
Features
Table auto-fills itself with modules already in the project
Number of rows is determined by the chassis model. No need to select Location
Ability to leave rows/slots empty
Editable Name field (with default name) appears upon selecting Type
Description appears upon selecting Type
Feel the difference
Adding N modules (using default names) requires...
Current dialog: 10N clicks, N hovers, waiting N seconds
Proposed dialog*: (6+2N) clicks, 1 hover, waiting 1 second
So, adding 8 modules requires...
Current dialog: 80 clicks, 8 hovers, waiting 8 seconds
Proposed dialog*: 22 clicks, 1 hover, waiting 1 second
*Assuming that steps 1-7 and 10 need to be performed once
Oh, and if this is implemented, please make sure that users can comfortably fit all text on their screen!
-
Add internal bluetooth module for Probook 5310m, cannot receive files
Hi, I tried to add internal bluetooth module for my probook 5310m, which should be very similar to 4311s and 5320m.
I did installed the module and cable by following the maintenance guide, but there is something wrong about the driver so I cannot receive files through bluetooth from either my smartphone or my another laptop. My phone showed " The transfer is forbidden by the target device( which means 5310m)".
The bluetooth module I got is Broadcom 2070 bluetooth 3.0. My operation system is windows 7 ultimate 32. I tried driver package sp52773 and some earlier version but none of them works. I even let windows update drivers by itself, it still did not work. The only good part is my bluetooth headphone works perfectly and I can sent stuff out from my 5310m. Does anyone know how to fix this problem? I really want to fix this since I use bluetooth a lot. I will really appreciate your help.
Thank you again.
JingI found a way to fix this problem. I install the bluesoleil software and everything works fine finally. Thank god.
-
Regarding Vendor Balance Confirmation Report(FI Module Issue)
Hi Experts
I have a small issue in FI Module while using standard Programe(SAPF130K).
If you execute the above program and pass the parameters vendor no and posting date then only get the data.
But my client requirment is Get the data based on ProfitCenter(PRCTR) and they want only Open Items.In Select-Options Profit Center is not there.I need to add PRCTR(Profit Center) in select-options.
In standard program used BSIK and BSAK.
These two tables in Profit Center data is not available.How can i get data based on Profit Center.
My variant
Select-Options is
given below.
"--Select Options"
Vendor 1010000001
CompanyCode 1000
Reconciliation Key Date -- current date
adding this select-option---Profit Center 10200120
Futhter Selections Check Individual Vendors
Total Balance
Check zero Balances
Keydate For Master Records
Form Set
selected for Empty One in F4Help
Sort Var.for Correspondence K3
Line item sorting P3
Date of issue current date
Check No Reply(because not assaigned to Company Code)
Printer for Form Set LP01
Printer for Reconcil. List LP01
Printer for results table LP01
Printer for selections LP01
Regards
HariHI,
Kindly use table FAGLFLEXA and FAGLFLEXT for getting profit center data .Assign points if useful.
Regards,
Shradha. -
Hi,
I am creating a report for SD module.
I have to fetch the billing docs for a given date and find the open sales orders & print the report.
I could fetch the billing docs...open sales order for the given date.
What is the relation (link) between the Billing and the sales orders. HOw will i find out that the Open sales order and the billing doc. belong to the sales order made by the customer.
Thank youRelation between a sales order and a Billing document ( Invoice ).
After the sales order is processed then comes the stage of Delivery where the items under the sales order are processed , picked , packed and Pgi'ed (goods issue is completed) .
once this is done then an Invoice (billing document number is generated for that delivery )
This is the Sequence.
For ur understanding goto VF03 and give an invoice number as input and hit an enter.
Now in the screen at the left top corner in the select Document Flow (shift+F7) and click that .. This will show u the status of the sales order /delivery /invoice number.
sales order in VBAK---item VBAP
delivery in LIKP ---iteM LIPS
Invoice in VBRK---item VBRP
in order to capture the sales order as open or closed ..
You need to proceed like
take the sales order number and goto table VBUK and input the sales order number and check for field VBUK-GBSTK NE C
if its C then its Closed else if it is A or B then its open .
GBSTK--is the overall processing status for the order ..
U need to write a join for this or directly fetch the entry from table VBAKUK.
here is a sample code to fetch the open orders at header and item level.
execute the code to understand teh logic
REPORT ZEX2 MESSAGE-ID arc NO STANDARD PAGE HEADING.
Tables :kna1,vbak.
SELECT-OPTIONS : so_vkorg FOR vbak-vkorg OBLIGATORY, "sales area
so_vtweg FOR vbak-vtweg OBLIGATORY,
so_spart FOR vbak-spart,
so_kunnr FOR kna1-kunnr. "ur customer
DATA : BEGIN OF sales_open OCCURS 0 ,
vbeln LIKE vbak-vbeln,
auart LIKE vbak-auart,
kunnr LIKE kna1-kunnr,
bstnk LIKE vbak-bstnk,
lfstk LIKE vbuk-lfstk,
fkstk LIKE vbuk-fkstk,
gbstk LIKE vbuk-gbstk,
END OF sales_open.
DATA : BEGIN OF itm_sales OCCURS 0,
vbeln LIKE vbap-vbeln,
posnr LIKE vbap-posnr,
matnr LIKE vbap-matnr,
kwmeng like vbap-kwmeng,
lfsta LIKE vbup-lfsta,
lfgsa LIKE vbup-lfgsa,
fksta LIKE vbup-fksta,
fksaa LIKE vbup-fksaa,
gbsta LIKE vbup-gbsta,
END OF itm_sales.
DATA : l_kunnr LIKE kna1-kunnr,
l_vkorg LIKE vbak-vkorg,
l_vtweg LIKE vbak-vtweg,
l_spart LIKE vbak-spart.
DATA: v_statusl(20) TYPE c,
v_statusb(20) TYPE c,
v_statusf(20) TYPE c,
v_statusg(20) TYPE c,
v_status(20) TYPE c,
v_field(1) TYPE c.
data : v_openqty like vbap-kwmeng.
**Selection Screen Validations.
AT SELECTION-SCREEN.
PERFORM validations.
*& Form Validations
* text
* --> p1 text
* <-- p2 text
FORM validations.
**Customer
IF NOT so_kunnr[] IS INITIAL.
SELECT SINGLE kunnr INTO l_kunnr
FROM kna1
WHERE kunnr IN so_kunnr.
IF sy-subrc NE 0.
MESSAGE e002 WITH text-005.
ENDIF.
ENDIF.
**Sales Organization
IF NOT so_vkorg[] IS INITIAL.
SELECT SINGLE vkorg INTO l_vkorg
FROM tvko
WHERE vkorg IN so_vkorg.
IF sy-subrc NE 0.
MESSAGE e003 WITH text-006.
ENDIF.
ENDIF.
**Distribution Channel
IF NOT so_vtweg[] IS INITIAL.
SELECT SINGLE vtweg INTO l_vtweg
FROM tvkov
WHERE vkorg IN so_vkorg
AND vtweg IN so_vtweg.
IF sy-subrc NE 0.
MESSAGE e004 WITH text-007.
ENDIF.
ENDIF.
**Division
IF NOT so_spart[] IS INITIAL.
SELECT SINGLE spart INTO l_spart
FROM tvta
WHERE vkorg IN so_vkorg
AND vtweg IN so_vtweg
AND spart IN so_spart.
IF sy-subrc NE 0.
MESSAGE e005 WITH text-008.
ENDIF.
ENDIF.
ENDFORM. " Validations
Top-of-page.
PERFORM sales_top_of_page.
Start-of-selection.
PERFORM sales_sel.
*& Form sales_sel
* text
* --> p1 text
* <-- p2 text
FORM sales_sel.
SELECT vbeln auart kunnr bstnk
lfstk fkstk gbstk
INTO TABLE sales_open
FROM vbakuk
WHERE vkorg IN so_vkorg
AND vtweg IN so_vtweg
AND spart IN so_spart
AND kunnr IN so_kunnr
AND gbstk NE 'C'.
LOOP AT sales_open.
WRITE:/4 sy-vline,
5 sales_open-vbeln HOTSPOT ON COLOR 2 INTENSIFIED OFF,
16 sy-vline,
17 sales_open-auart COLOR 2 INTENSIFIED OFF,
27 sy-vline,
28 sales_open-kunnr COLOR 2 INTENSIFIED OFF,
40 sy-vline,
41 sales_open-bstnk COLOR 2 INTENSIFIED OFF,
55 sy-vline,
56 sales_open-lfstk,
76 sy-vline,
77 sales_open-fkstk,
96 sy-vline,
97 sales_open-gbstk ,
117 sy-vline.
HIDE sales_open-vbeln .
ENDLOOP.
ENDFORM. " sales_sel
*& Form sales_top_of_page
* text
* --> p1 text
* <-- p2 text
FORM sales_top_of_page.
WRITE:/4 sy-uline(114),
50 'OPEN SALES ORDERS' COLOR 7 INTENSIFIED ON .
WRITE: /4 sy-vline,
5 'SalesOrder' COLOR 1 ,
16 sy-vline,
17 'OrderType' COLOR 1,
27 sy-vline,
28 'Customer' COLOR 1,
40 sy-vline,
41 'PoNumber' COLOR 1,
55 sy-vline,
56 'Delivery Status' COLOR 1,
76 sy-vline,
77 'Billing Status' COLOR 1,
96 sy-vline,
97 'Processing Status' COLOR 1,
117 sy-vline .
WRITE:/4 sy-uline(114).
ENDFORM. " sales_top_of_page
AT LINE-SELECTION.
SELECT a~vbeln
a~posnr
a~matnr
a~kwmeng
b~lfsta
b~lfgsa
b~fksta
b~fksaa
b~gbsta
INTO TABLE itm_sales
FROM vbap AS a JOIN vbup AS b
ON a~vbeln EQ b~vbeln
AND a~posnr EQ b~posnr
AND b~gbsta NE 'C'
WHERE a~vbeln EQ sales_open-vbeln.
IF NOT sales_open IS INITIAL.
LOOP AT itm_sales.
at end of vbeln .
sum.
v_openqty = itm_sales-kwmeng.
endat.
WRITE:/5 itm_sales-vbeln,
itm_sales-posnr,
itm_sales-matnr,
itm_sales-kwmeng,
itm_sales-lfsta,
itm_sales-lfgsa,
itm_sales-fksta,
itm_sales-fksaa,
itm_sales-gbsta.
ENDLOOP.
ENDIF.
skip 2.
write:/ 'open Quantity for the order is ', v_openqty .
in order to fetch the invoice number from sales order ..
goto table VBFA and give the input as sales order number in Preceding document no(VBELV) and in the Document category of subsequent document (VBTYP_N) give it as caps 'M'
for fetching delivery from sales order same as above with vbtyp_n = 'J'.
regards,
vijay -
Add Report Generation toolkit for Microsoft Office in exe
Hi
I am having a problem. I am using LabVIEW 8.20, Report Generation Toolkit for Microsoft Office 1.1.2 and Microsoft Excel 2003. My OS is Windows XP (SP )
I want to build the vi attached below into an exe. The vis that I used are from addons>>_office>>excel.llb. I follow the suggestion found in the link below and add in all the files in excel.llb into my project so that it can be added into the executable as dynamic vis. However, some vis in excel.llb cannot be added into my project. After I have add all vis that can be added into the project, I build an application (exe) with the vi below as the Main vi and all other added vis (from excel.llb) as dynamic vis. After that, I build and run this exe on the same PC. I am unable to run it.
This vi will save datas when I click on the stop button. After I click on the stop button, a window will pop-up and prompt me to select which directory to save the vi. When I run the exe, I type in test.xls (for example) but the file saved is a picture and not an excel file. If I just run the vi instead of the exe, Excel will open and datas and graph will be displayed in Excel.
May I know where did I done wrong??
How do I use the Report Generation Toolkit in an executable with Microsoft Excel?
http://digital.ni.com/public.nsf/websearch/C38CE3F30542D65B86256F0E00740DD8?OpenDocument
Thank you & Regards
Lee
Attachments:
Self-Regulating.vi 132 KB
Untitled Project 1.zip 3841 KBHi centerbolt,
Thank you for your reply. I have tried adding in just that dynamic vi found in Excel Library and my main vi but it still cannot work. Is there anything that I need to look out as well?? [View attached picture.]
Thank you & Regards
Lee
Attachments:
added.JPG 92 KB -
Calling a report from module pool program
Hi all,
I had a requirement where I need to call a report from the module pool program where in when we click REPORT button, it should display the report output in the another screen.
Can we do by calling screen after pushing REPORT button. If so, where we should write that code ( In pbo or pai). Please give me an idea.
Thanking you,
Regards,
Murali Krishna TUse submit syntax.
Press F1 on submit, Donot use return statement with it.
If so, where we should write that code ( In pbo or pai).
Please understand about these two events before doing the requirement. -
Calling a report from Module Pool
While calling a report from the module pool I'm not able to display th alv. The skeleton of the ALV is coming. But the data and headings are also not displayed.
But where as calling the same program from a report it is coming properly. can somebody please guide me where did I go wrong?MODULE user_command_1001 INPUT.
w_ok_code = ok_code.
CLEAR ok_code.
CASE w_ok_code.
WHEN 'BACK'.
LEAVE PROGRAM .
WHEN 'CREATE'.
CALL TRANSACTION 'Z_FIRST_TIME'.
WHEN 'SYNC'.
CALL TRANSACTION 'Z_SYNC'.
WHEN 'APPROVE'.
SUBMIT zds_xx_approval_status WITH po_aname EQ sy-uname AND RETURN.
WHEN 'OVERVIEW'.
PERFORM show_all_reqids.
ENDCASE.
ENDMODULE. -
Accounts Receivable Report: Customer Wise Ageing Analysis report -FI module
Hi Gurus,
Can anyone help me in providing standard report(source code) or already done sample report(source code) for Accounts Receivable Report: Customer Wise Ageing AnalysisThis is in FI Module. Though it is FI Module we need to fetch details related to Sales Module, and the days should be <0 30 60 90 120 180 365 >365
It is urgent I need to deliver this report by this week end.
Please help me . Waiting for your reply.
Points Rewarded for help rendered and I would personally send a good gift if you can help me
Yours Truly,
Rajiv Christopher.
Edited by: Rajiv Christopher on Apr 2, 2008 11:33 AMHi,
i am attaching aging report.
see if this is useful to you.
REPORT ZFUS0102 MESSAGE-ID OA
LINE-SIZE 270.
Title: GR/IR AGING REPORT
Date: January 2001
TABLES: DISVARIANT, EKPO.
TYPE-POOLS: SLIS.
Tables
TABLES:
BSIS,
EKKO.
working table
DATA: BEGIN OF RTAB OCCURS 0,
HKONT LIKE BSIS-HKONT,
ZUONR LIKE BSIS-ZUONR,
BUDAT LIKE BSIS-BUDAT,
SHKZG LIKE BSIS-SHKZG,
DMBTR LIKE BSIS-DMBTR,
PRCTR LIKE BSIS-PRCTR,
END OF RTAB.
DATA: BEGIN OF WTAB OCCURS 0,
ZUONR(2) TYPE N,
PRCTR LIKE BSIS-PRCTR,
DAYS(4) TYPE P,
DMBTR LIKE BSIS-DMBTR,
END OF WTAB.
DATA: BEGIN OF PTAB OCCURS 0,
ZUONR(2),
PRCTR LIKE BSIS-PRCTR,
AMT30 LIKE BSIS-WRBTR,
AMT60 LIKE BSIS-WRBTR,
AMTPL LIKE BSIS-WRBTR,
TOTAL LIKE BSIS-WRBTR,
END OF PTAB.
PARAMETERS: COMPANY LIKE BSIS-BUKRS OBLIGATORY,
ACCT LIKE BSIS-HKONT OBLIGATORY,
DATE LIKE SY-DATUM OBLIGATORY.
SELECT-OPTIONS: S_EKORG FOR EKKO-EKORG.
PARAMETERS: P_VARI LIKE DISVARIANT-REPORT.
DATA: WS-AMT30 LIKE BSIS-WRBTR.
DATA: WS-AMT60 LIKE BSIS-WRBTR.
DATA: WS-AMTPL LIKE BSIS-WRBTR.
DATA: TITLE(21) VALUE 'GR/IR Aging Report'.
DATA: LIN TYPE I.
DATA: GX_VARIANT LIKE DISVARIANT,
G_VARIANT LIKE DISVARIANT.
DATA: LAYOUT TYPE SLIS_LAYOUT_ALV,
L_F TYPE SLIS_T_FIELDCAT_ALV WITH HEADER LINE,
GROUP TYPE SLIS_T_SP_GROUP_ALV WITH HEADER LINE,
COLOR TYPE SLIS_T_SPECIALCOL_ALV WITH HEADER LINE.
DATA: LT_TOP_OF_PAGE TYPE SLIS_T_LISTHEADER,
LS_LINE TYPE SLIS_LISTHEADER,
T_EVENTS TYPE SLIS_T_EVENT.
CONSTANTS: FORMNAME_TOP_OF_PAGE TYPE SLIS_FORMNAME VALUE 'TOP_OF_PAGE'.
INITIALIZATION.
PERFORM EVENTTAB_AUFBAUEN USING T_EVENTS[].
PERFORM VARIANT_INIT.
Get default variant
GX_VARIANT = G_VARIANT.
CALL FUNCTION 'REUSE_ALV_VARIANT_DEFAULT_GET'
EXPORTING
I_SAVE = 'A'
CHANGING
CS_VARIANT = GX_VARIANT
EXCEPTIONS
NOT_FOUND = 2.
IF SY-SUBRC = 0.
P_VARI = GX_VARIANT-VARIANT.
ENDIF.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_VARI.
PERFORM VARIANT_INPUTHELP_F14.
START-OF-SELECTION.
LS_LINE-TYP = 'S'.
WRITE SY-DATUM TO LS_LINE-INFO DD/MM/YY.
WRITE SY-UZEIT TO LS_LINE-INFO+10.
WRITE SY-UNAME TO LS_LINE-INFO+20.
WRITE TITLE TO LS_LINE-INFO+30.
APPEND LS_LINE TO LT_TOP_OF_PAGE.
PERFORM FIELDS.
IF NOT P_VARI IS INITIAL.
PERFORM PAI_OF_SELECTION_SCREEN.
ELSE.
CALL FUNCTION 'REUSE_ALV_VARIANT_SELECT'
EXPORTING
I_DIALOG = ' '
I_USER_SPECIFIC = 'A'
I_DEFAULT = ' '
I_TABNAME_HEADER =
I_TABNAME_ITEM =
IT_DEFAULT_FIELDCAT = L_F[]
I_LAYOUT = LAYOUT
IMPORTING
E_EXIT =
ET_FIELDCAT = L_F[]
ET_SORT =
ET_FILTER =
CHANGING
CS_VARIANT = DISVARIANT
EXCEPTIONS
WRONG_INPUT = 1
FC_NOT_COMPLETE = 2
NOT_FOUND = 3
PROGRAM_ERROR = 4
OTHERS = 5.
ENDIF.
Decide which tables to access.
PERFORM MAIN_SELECT.
MOVE TITLE TO LAYOUT-WINDOW_TITLEBAR.
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
EXPORTING
I_CALLBACK_PROGRAM = 'ZFUS0102'
I_CALLBACK_USER_COMMAND = 'USER_COMMAND'
IS_LAYOUT = LAYOUT
IT_FIELDCAT = L_F[]
IT_SPECIAL_GROUPS = GROUP[]
I_SAVE = 'A'
IS_VARIANT = G_VARIANT
IT_EVENTS = T_EVENTS
TABLES
T_OUTTAB = PTAB
EXCEPTIONS
PROGRAM_ERROR = 1
OTHERS = 2.
FORM FIELDS *
FORM FIELDS.
L_F-FIELDNAME = 'ZUONR'.
L_F-OUTPUTLEN = 6.
L_F-SELTEXT_L = 'SERIES'.
L_F-REPTEXT_DDIC = 'SERIES'.
L_F-REF_TABNAME = 'PTAB'.
L_F-SP_GROUP = 'A'.
APPEND L_F. CLEAR L_F.
L_F-FIELDNAME = 'PRCTR'.
L_F-OUTPUTLEN = 10.
L_F-SELTEXT_L = 'PROFIT CTR.'.
L_F-REPTEXT_DDIC = 'PROFIT CTR.'.
L_F-REF_TABNAME = 'PTAB'.
L_F-SP_GROUP = 'A'.
APPEND L_F. CLEAR L_F.
L_F-FIELDNAME = 'AMT30'.
L_F-SELTEXT_L = '30 DAYS'.
L_F-REPTEXT_DDIC = '30 DAYS'.
L_F-REF_TABNAME = 'PTAB'.
L_F-SP_GROUP = 'A'.
L_F-REF_TABNAME = 'BSIS'.
L_F-REF_FIELDNAME = 'WRBTR'.
L_F-DO_SUM = 'X'.
APPEND L_F. CLEAR L_F.
L_F-FIELDNAME = 'AMT60'.
L_F-SELTEXT_L = '60 DAYS'.
L_F-REPTEXT_DDIC = '60 DAYS'.
L_F-REF_TABNAME = 'PTAB'.
L_F-SP_GROUP = 'A'.
L_F-REF_TABNAME = 'BSIS'.
L_F-REF_FIELDNAME = 'WRBTR'.
L_F-DO_SUM = 'X'.
APPEND L_F. CLEAR L_F.
L_F-FIELDNAME = 'AMTPL'.
L_F-SELTEXT_L = '60+ DAYS'.
L_F-REPTEXT_DDIC = '60+ DAYS'.
L_F-REF_TABNAME = 'PTAB'.
L_F-SP_GROUP = 'A'.
L_F-REF_TABNAME = 'BSIS'.
L_F-REF_FIELDNAME = 'WRBTR'.
L_F-DO_SUM = 'X'.
APPEND L_F. CLEAR L_F.
L_F-FIELDNAME = 'TOTAL'.
L_F-SELTEXT_L = 'TOTAL'.
L_F-REPTEXT_DDIC = 'TOTAL'.
L_F-REF_TABNAME = 'PTAB'.
L_F-SP_GROUP = 'A'.
L_F-REF_TABNAME = 'BSIS'.
L_F-REF_FIELDNAME = 'WRBTR'.
L_F-DO_SUM = 'X'.
APPEND L_F. CLEAR L_F.
ENDFORM.
FORM MAIN_SELECT *
FORM MAIN_SELECT.
SELECT HKONT ZUONR BUDAT SHKZG DMBTR PRCTR
INTO TABLE RTAB
FROM BSIS
WHERE BUKRS = COMPANY
AND HKONT = ACCT.
IF SY-SUBRC = 0.
SORT RTAB.
PERFORM PROCESS_RTAB.
PERFORM PROCESS_WTAB.
ENDIF.
ENDFORM. " MAIN SELECT
FORM VARIANT_INPUTHELP_F14 *
FORM VARIANT_INPUTHELP_F14.
DATA: G_EXIT(1) TYPE C.
CALL FUNCTION 'REUSE_ALV_VARIANT_F4'
EXPORTING
IS_VARIANT = G_VARIANT
I_SAVE = 'A' " g_save
it_default_fieldcat =
IMPORTING
E_EXIT = G_EXIT
ES_VARIANT = GX_VARIANT
EXCEPTIONS
NOT_FOUND = 2.
IF SY-SUBRC = 2.
MESSAGE ID SY-MSGID TYPE 'S' NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ELSE.
IF G_EXIT = SPACE.
P_VARI = GX_VARIANT-VARIANT.
ENDIF.
ENDIF.
ENDFORM.
FORM USER_COMMAND *
--> UCOMM *
--> SELFIELD *
FORM USER_COMMAND USING UCOMM LIKE SY-UCOMM SELFIELD TYPE
SLIS_SELFIELD.
IF UCOMM EQ '&IC1'.
IF SELFIELD-TABINDEX <= 0.
MESSAGE S108.
EXIT.
ENDIF.
IF SELFIELD-SEL_TAB_FIELD CS 'LIFNR'.
SET PARAMETER ID 'LIF' FIELD SELFIELD-VALUE.
CALL TRANSACTION 'XK02'.
ELSE.
IF SELFIELD-SEL_TAB_FIELD CS 'VEND'.
SET PARAMETER ID 'LIF' FIELD SELFIELD-VALUE.
CALL TRANSACTION 'FBL1'.
ENDIF.
ENDIF.
CLEAR SY-UCOMM. CLEAR UCOMM.
ENDIF.
ENDFORM.
FORM TOP_OF_PAGE *
FORM TOP_OF_PAGE.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
EXPORTING
IT_LIST_COMMENTARY = LT_TOP_OF_PAGE.
ENDFORM.
FORM EVENTTAB_AUFBAUEN *
--> P_T_EVENTS *
FORM EVENTTAB_AUFBAUEN USING P_T_EVENTS TYPE SLIS_T_EVENT.
DATA: LS_EVENT TYPE SLIS_ALV_EVENT.
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
EXPORTING
I_LIST_TYPE = 0
IMPORTING
ET_EVENTS = P_T_EVENTS.
READ TABLE P_T_EVENTS WITH KEY NAME = SLIS_EV_TOP_OF_PAGE
INTO LS_EVENT.
IF SY-SUBRC = 0.
MOVE FORMNAME_TOP_OF_PAGE TO LS_EVENT-FORM.
APPEND LS_EVENT TO P_T_EVENTS.
ENDIF.
ENDFORM. " EVENTTAB_AUFBAUEN
FORM PAI_OF_SELECTION_SCREEN *
FORM PAI_OF_SELECTION_SCREEN.
IF NOT P_VARI IS INITIAL.
MOVE G_VARIANT TO GX_VARIANT.
MOVE P_VARI TO GX_VARIANT-VARIANT.
CALL FUNCTION 'REUSE_ALV_VARIANT_EXISTENCE'
EXPORTING
I_SAVE = 'A' " g_save
CHANGING
CS_VARIANT = GX_VARIANT.
G_VARIANT = GX_VARIANT.
ELSE.
PERFORM VARIANT_INIT.
ENDIF.
ENDFORM. " PAI_OF_SELECTION_SCREEN
FORM VARIANT_INIT *
FORM VARIANT_INIT.
CLEAR G_VARIANT.
G_VARIANT-REPORT = 'ZFUS0102'.
ENDFORM. " VARIANT_INIT
*& Form PROCESS_RTAB
text
--> p1 text
<-- p2 text
FORM PROCESS_RTAB.
DATA TLNS TYPE I.
DESCRIBE TABLE S_EKORG LINES TLNS.
LOOP AT RTAB.
IF TLNS GT 0.
SELECT SINGLE EKORG FROM EKKO INTO EKKO-EKORG
WHERE EBELN = RTAB-ZUONR(10).
CHECK EKKO-EKORG IN S_EKORG.
ENDIF.
IF NOT RTAB-BUDAT > DATE.
MOVE RTAB-ZUONR(2) TO WTAB-ZUONR.
COMPUTE WTAB-DAYS = DATE - RTAB-BUDAT.
IF RTAB-SHKZG = 'H'.
WTAB-DMBTR = RTAB-DMBTR * -1.
ELSE.
WTAB-DMBTR = RTAB-DMBTR * 1.
ENDIF.
MOVE RTAB-PRCTR TO WTAB-PRCTR.
APPEND WTAB.
ENDIF.
ENDLOOP.
FREE RTAB.
ENDFORM. " PROCESS_RTAB
*& Form PROCESS_WTAB
text
--> p1 text
<-- p2 text
FORM PROCESS_WTAB.
SORT WTAB BY ZUONR PRCTR DAYS.
LOOP AT WTAB.
PTAB-ZUONR = WTAB-ZUONR.
PTAB-PRCTR = WTAB-PRCTR.
AT END OF DAYS.
SUM.
IF WTAB-DAYS > 60.
WS-AMTPL = WS-AMTPL + WTAB-DMBTR.
ELSE.
IF WTAB-DAYS > 30.
WS-AMT60 = WS-AMT60 + WTAB-DMBTR.
ELSE.
WS-AMT30 = WS-AMT30 + WTAB-DMBTR.
ENDIF.
ENDIF.
ENDAT.
AT END OF PRCTR.
PTAB-AMTPL = WS-AMTPL.
PTAB-AMT30 = WS-AMT30.
PTAB-AMT60 = WS-AMT60.
COMPUTE PTAB-TOTAL = PTAB-AMTPL + PTAB-AMT30 + PTAB-AMT60.
APPEND PTAB.
WS-AMTPL = 0.
WS-AMT30 = 0.
WS-AMT60 = 0.
ENDAT.
ENDLOOP.
SORT PTAB BY ZUONR PRCTR.
ENDFORM. " PROCESS_WTAB
regards,
Sindhu
Maybe you are looking for
-
I can't see the icon of my iPhone 5 in the iTunes
i can't see the icon of my iPhone 5 in the iTunes
-
Problem in Loading data for clob column using sql ldr
Hi, I am having problem in loading data for tables having clob column. Could anyone help me in correcting the below script for ctrl file inorder to load the data which is in mentioned format. Any help really appreciated. Table Script Create table sam
-
I have just completed a long document and the Pages application quit unexpectedly. Is is lost irretrievably?
-
I am still using Flex Builder 3, as it has everything we need for our Video Player app's developement. However I an curious about Captive Runtime, we have had a few customer's complain in the past about having to install the Adobe Runtime (I am not
-
Shortcut (Mac) switch to next tab
Hi, everyone. I'm looking for the fastest way to switch codes, which is displayed top of the workspace as htmlcode, css, js. I've found some information that there is a shortcut for that, and that is Cmd-' (that's the ~ key) (control+tab for windows