RTMT REPORTING NTP EVENTS

RTMT is porting the following from my Publisher and both Subscribers.
At Wed May 28 15:10:11 BST 2014 on node 10.211.7.100; the following SyslogSeverityMatchFound events generated: SeverityMatch : Critical MatchedEvent : May 28 15:10:04 dbs-cm-donpub01 user 2 ntpRunningStatus.sh: The local NTP client is off by more than the acceptable threshold of 3 seconds from its remote NTP system peer. The normal remedy is for NTP Watch Dog to automatically restart NTP. However; an unusual number of automatic NTP restarts have already occurred on this node. No additional automatic NTP restarts will be done until NTP time synchronization stabilizes. This is likely due to an excessive number of VMware Virtual Machine migrations or Storage VMotions. Please consult your VMware Infrastructure Support Team. AppID : Cisco Syslog Agent ClusterID : NodeID : dbs-cm-donpub01 TimeStamp : Wed May 28 15:10:04 BST 2014
I have run utils ntp restart on each server and still get the same error.
Any help please?

First thing is to post the status of the utils ntp status as Brian noted above. However, there are also a number of NTP-related bugs in CUCM 8.6 and higher. I have had several customers with similar issues and it is generally been purely cosmetic. See the following thread, review the bug IDs, and you may consider opening a TAC case as well:
https://supportforums.cisco.com/discussion/11275801/problem-ntp-after-upgrade-and-install-vmtools
Be sure to take a look at Aaron Harrison's recommendation as well in that thread. He always has solid advice in the forum.
Hailey
Please rate helpful posts!

Similar Messages

How to get parameter value from report in event of value-request?

Hi everyone,
The customer want to use particular F4 help on report, but some input value before press enter key are not used in event of "at selection-screen on value-request for xxx", How to get parameter value in this event?
many thanks!
Jack

You probably want to look at function module DYNP_VALUES_READ to allow you to read the values of the other screen fields during the F4 event... below is a simple demo of this - when you press F4 the value from the p_field is read and returned in the p_desc field.
Jonathan
report zlocal_jc_sdn_f4_value_read.
parameters:
p_field(10)           type c obligatory, "field with F4
p_desc(40)            type c lower case.
at selection-screen output.
perform lock_p_desc_field.
at selection-screen on value-request for p_field.
perform f4_field.
*&      Form f4_field
form f4_field.
*" Quick demo custom pick list...
data:
    l_desc             like p_desc,
    l_dyname           like d020s-prog,
    l_dynumb           like d020s-dnum,
    ls_dynpfields      like dynpread,
    lt_dynpfields      like dynpread occurs 10.
l_dynumb = sy-dynnr.
l_dyname = sy-repid.
*" Read screen value of P_FIELD
ls_dynpfields-fieldname = 'P_FIELD'.
append ls_dynpfields to lt_dynpfields.
call function 'DYNP_VALUES_READ'
    exporting
      dyname     = l_dyname
      dynumb     = l_dynumb
    tables
      dynpfields = lt_dynpfields
    exceptions
      others     = 1.
check sy-subrc is initial.
*" See what user typed in P_FIELD:
read table lt_dynpfields into ls_dynpfields
    with key fieldname = 'P_FIELD'.
*" normally you would then build your own search list
*" based on value of P_FIELD and call F4IF_INT_TABLE_VALUE_REQUEST
*" but this is just a demo of writing back to the screen...
*" so just put the value from p_field into P_DESC plus some text...
concatenate 'This is a description for' ls_dynpfields-fieldvalue
    into l_desc separated by space.
*" Pop a variable value back into screen
clear: ls_dynpfields.
ls_dynpfields-fieldname = 'P_DESC'.
ls_dynpfields-fieldvalue = l_desc.
append ls_dynpfields to lt_dynpfields.
call function 'DYNP_VALUES_UPDATE'
    exporting
      dyname     = l_dyname
      dynumb     = l_dynumb
    tables
      dynpfields = lt_dynpfields
    exceptions
      others     = 0.
endform.                                                    "f4_field
*&      Form lock_p_desc_field
form lock_p_desc_field.
*" Make P_DESC into a display field
loop at screen.
    if screen-name = 'P_DESC'.
      screen-input = '0'.
      modify screen.
      exit.
    endif.
endloop.
endform.                    "lock_p_desc_field

Report Displayed Event?

Is there an event that fires, or a way to trigger something to happen once the report has finished loading and is initially displayed to the user in WinForms (Crystal for VS 13.0.5.891) ? I want to be able to log the occurrence of a report a report execution along with any parameters that were entered, but couldn't find a good way to do this other than logging the instance upon closing the report, which means refreshes won't log, and I only am able to log whatever parameters they entered last... Any direction would be great, I'm writing in C#. Thanks!

As far as the parameters entered, you'd have to create your own parameter screen and capture the values from there. Nothing as far as CR APIs. Re. event when a report is done processing, see this Discussion
- Ludek
Senior Support Engineer AGS Product Support, Global Support Center Canada
Follow us on Twitter

How to generate a report on 'Event Received' events for a resource objects

Hello,
I want to generate a report on all the recon events which are in 'Event Received' status, on a daily basis. Can you please let me know how to do this and what all tables are involved?
Thanks

Well thats pretty simple. Actually there are multiple tables in OIM database responsible for holding reconciliation data but event information is stored in one table RCE. So there are two simple ways to do that as follows:
*1) Using OIM API ::*
There is an API exposed (*findReconciliationEvent()*) in the tcReconciliationOperationsIntf interface. You can just pass a HashMap with one filter parameter for ReconEvent status as Event Received. In addition to it this API also requires the StartDate and EndDate (You can give current date for both arguments). This will return you a ResultSet containing all the events which are in that particular state. Just iterate through the ResultSet for all the event information ad create your report.
*2) Using OIM database query::*
Just write an SQL query to run in the database schema. Let's assume you have written a scheduler for the same. This is the code for your class:
tcDataSet dsList = new tcDataSet();
String query = " select * from RCE where RCE_STATUS='Event Received' ";
log.debug(query);
try {
dsList.setQuery(getDataBase(), query);
dsList.executeQuery();
if (!dsList.isEmpty()){
log.debug("Total Rows Found:" + dsList.getTotalRowCount());
result = true;
for (int i = 0; i < dsList.getTotalRowCount(); i++) {
Write your custom logic here for generation of report
}else{
log.debug("No Events Found");
result = false;
} catch (tcDataSetException e) {
e.printStackTrace();
result = false;
So you can do it both ways.
Thanks
Sunny

Need to generate a report for Event collection rules created in SCOM

Hi All,
Can any one let me know where can i get a report of the Event based collection rules created in SCOM (For default and custom made).
I used the below report but it gives the collection rules which are performance counter based not event collection based.
Reporting -> Microsoft Generic report library ->Performance detail (Gives performance based Collection rule but not event based). Can any one help.
Gautam.75801

what is your objects setting?
Suppose, I want to display the Windows Restart Event which is collected by "collection rule for windows Restarted Events" . from the Rules pane in Authoring workpsace, "collection rule for windows Restarted Events" is target on windows
Server Operating system. As a result, my "custom event" report setting as
1) Objects: objects instance of windows Operating system
2) rules filter by rules name contains "windows Restarted Events"
Roger

Report VS Event

any body can help me to know the detail explanation of difference between a report and a event

REPORTS:
Report is displaying the application data in thhe required format. It is a executable program with three stage function:
DATA INPUT (Selection Screen)
DATA PROCESSING (Select Statements)
DATA OUTPUT (Write statements).
EVENTS:
Events are used in Report logic. There are following events used in Reporting.
INITIALIZATION
AT SELECTION-SCREEN
START-OF-SELECTION
GET
GET LATE
END-OF-SELECTION
TOP-OF-PAGE
TOP-OF-PAGE-DURING LINE-SELECTION
END-OF-PAGE
AT LINE SELECTION
AT USER COMMAND
AT PF
Rewards if useful.

Generating reports for events

All,
We are looking to generate some reports on RM'd document events. For example, number of documents viewed in a week or month etc.
Has anyone done something like this? Suggestions as to where to begin?
Thanks,
Andrew

Andrew
Audit events are stored in the LiveCycle database, so basically, you will need to design various SQL statements to pull the data that you could use in your reports.
Direct manipulation of the LC database is not supported, but the name of the table that you may want to take a look at is "edcauditentity" found in the "adobe" database schema.
Regards
Steve

Crystal Reports XI Crashes When Reporting on Event Log

I have successfully connected to the event log on my local Windows 7 pc, as well as two different Windows 2003 server event logs. The report runs fine unless I include the field "DESCRIPTION" on the report. If I include that field, CR crashes with the following error in my event log:
Faulting application name: crw32.exe, version: 11.0.0.1282, time stamp: 0x422d5c77
Faulting module name: crheapalloc.dll, version: 9.2.0.4, time stamp: 0x422d5ade
Exception code: 0xc0000005
Fault offset: 0x00002454
Faulting process id: 0x17e0
Faulting application start time: 0x01ca58e2b9115606
Faulting application path: C:\Program Files (x86)\Business Objects\Crystal Reports 11\crw32.exe
Faulting module path: C:\Program Files (x86)\Common Files\Business Objects\3.0\bin\crheapalloc.dll
Report Id: fe7f7599-c4d5-11de-a50a-001e4fe037ce
I've found a few sites online that others have had the same problem, but I've not found a solution. Any suggestions from anyone here??

Hi Carla, I moved this post to the database connectivity forum.
It may be due to the size or of the text included int he description or MS is reporting the wrong size of the field.
Other issue is XI is not supported on Windows 7 due to the age of CR and newness of Windows 7. CR XI is no longer patchable nor will any new OS platforms be added.
What you can do though is download CR XI R2 for free and use your XI keycode to install it, then go to the Keycode Request site and get one for R2:
Go to this link: http://www.sdn.sap.com/irj/boc and download the trial version of CR XI R2 and use your XI keycode, then apply the patches which you can get to by clicking on the BusinessObjects tab above, then Downloads.
Test again and if it still fails you may have to wait for Service Pack 6 to come out, I believe we are adding Windows 7 to the supported OS's.
Thank you
Don

Process Scheduler Report Success Event

Does the Process Scheduler fire an event once a report has been generated? I want to run an automated function every time a report has been generated. My initial thought was that I could loop a sql query that checks the status of the report, but I cannot do that if the report is recurring. I noticed that if you choose a outdesttype as email, the email is not sent until the report is generated. Where can I find this logic. There has to be some kind of event that happens once it has been generated. Anyone?

Does the Process Scheduler fire an event once a
report has been generated? I want to run an automated
function every time a report has been generated. My
initial thought was that I could loop a sql query
that checks the status of the report, but I cannot do
that if the report is recurring.That assumption is wrong.
You get a new process request that is generated before, or after, the report is initiated.
I noticed that if
you choose a outdesttype as email, the email is not
sent until the report is generated. Where can I find
this logic. There has to be some kind of event that
happens once it has been generated. Anyone?Check the status of the Processrequest, that should do it.
Cheers & HTH
Peter

Wrong Report about Event History

Hi
Have make an Event / History Report tell my no Events.
NotfallereignisseKeine Ereignisse mit diesem Schweregrad für Bericht.AlarmereignisseKeine Ereignisse mit diesem Schweregrad für Bericht.Kritische EreignisseKeine Ereignisse mit diesem Schweregrad für Bericht.FehlerereignisseKeine Ereignisse mit diesem Schweregrad für Bericht.WarnungsereignisseKeine Ereignisse mit diesem Schweregrad für Bericht.HinweisereignisseKeine Ereignisse mit diesem Schweregrad für Bericht.InformationsereignisseKeine Ereignisse mit diesem Schweregrad für Bericht.
But the Alarming tell me
Cisco OnPlus-Ereignis: Kritisch
Name des Kunden
Pro Mente
Kritisches Ereignis
Überwachen: Hoststatus (aktiv/nicht aktiv) (ICMP)
Ereignisdatum/-uhrzeit
2013-03-12 18:02
Gerät
Hostname: WS13
IP-Adresse: 192.168.13.164
MAC-Adresse: 00:19:99:38:2F:34
Hoststatus
Nach unten
Benachrichtigungstyp
Problem
DOWN auf WS13 (192.168.13.164) am 2013-03-12 18:02:24 +0100
Why I don`t see in the Report this Alarm?
Best regards

Not sure if you've seen it, however the SDK documentation has a good diagram.
https://sapui5.hana.ondemand.com/sdk/#docs/guide/BestPractice.html
Regards,
Jason

UCCX 8 RTMT - Report on Logged In Historical Reporting Users

Hello, Netpros.
Is there a way to see a real-time or historical data which will show how many people are logged into historical reports at a given time? I'm getting reports of a licensing error. I have it set to allow two to login to HR, and customer reports that nobody is logged in and they are hitting the insufficient license error. I need to verify the info.
Thanks,
Joshua

Kapil,
Nope, no luck on this one. I was working a case w/ TAC around this issue as well, and they couldn't come up w/ a way to report on it either.
Best,
Joshua

Basic list report - Click Event

I have developed a report 'abc' . my requirement is that ..After executing the report, if the user double clicks any row, it should display report 'xyz'.
Can we do that ?
Can anybody please tell me how to do this.
Thanks..

I am not sure, there is a system variable which indicates the internal table index when you have clicked a line on the basic list. However, you have to find a relation between the internal table index and the line in the basic list.
If all the lines in the basic list are printed from a given internal table and the lines do not spill on a new line, then I am sure you can safely consider a relation between sy-lilli and index in the internal table, could be Index in internal table = sy-lilli + 2 
Otherwise, if there is a key field which is being displayed in the basic list, you can fetch that key field using READ CURRENT LINE ... FIELD <fieldval> and based on this <fieldval> , do a READ TABLE ...WITH KEY k1 = <fieldval> and get the data.
Regards,
Subramanian V.

RTMT reports ELM DB service down, but ELM seems to run OK

Hi
I have CUCM 9.1.1.20000-5. Publisher and 1 Subscriber
I'm getting alerts from RTMT that " Service operational status is DOWN. Cisco ELM DB." from the Publisher.
The ELM does seem to be working ok, Product Instances are registered and synchronizing.
If I go to the Cisco Unified Serviceability pages and look at Control Centre - Network Services
the Cisco ELM DB, Cisco ELM Server and Cisco ELM Admin services are all running, but on the Subscriber.
So I'm a bit confused as to whether I have an ELM problem or not.
If a Publisher goes off-line for any reason do ELM Services start up on the Subscriber ?
If I re-boot the Subscriber will the ELM Services move back to the Publisher?
Thanks
Andy

Hi Andy,
Just to answer last point: if ELM is co-resident with Publisher and Publisher goes down, then , phones would keep on working and u have 60 days grace time period to bring Pub UP.
regds,
aman

Report server events log

hi
where can i find log files for the reports server 10g R2 running on unix , because my application server hang always and i used to restart it and i don't know what is exactly the problem is!!
thanks in advanced
wisam

$ORACLE_HOME/reports/logs/<reports server name>/rwserver.log

Regarding events in reports

Hi guys,
i got a doubt in reports on events
how many events are there in reports.....
and what's the function of them...can any one help me plzzzz
regards
venu

hi,
events:
http://www.sap-img.com/abap/events-related-to-reporting.htm
Events in Classical Reports
Initialization.
At selection-screen.
At selection-screen on <field>.
Start-of-selection.
Top-of-page.
End-of-page.
End-of-selection.
Initialization.
We can initialize the selection-screen with calculated default values under this event.
Initialization.
s_date-high = sy-datum.
s_date-low = sy-datum - 15.
Append s_date.
At selection-screen.
We can validate all the inputs on selection screen fields under this event.
At selection-screen.
If s_carrid-low is initial or s_connid-low is initial or s_date is initial.
< ... code for validation... >.
Endif.
At selection-screen on <field>.
We can validate a particular field input on selection screen under this event.
At selection-screen on s_carrid.
If s_carrid-low < > 銑H・
<・code for validation・
Endif.
Start-of-selection.
By default the program is under this event.
If any of the other event comes before
全elect・ndselect.・statements, then to break
that event, we require this S-O-S event.
Start-of-selection.
Select * from ・
・・
Endselect.
Top-of-page.
If we need some portion of the output (like
column headings) to appear in all the pages,
then we use this event.
Top-of-page.
Write:/ 舛arrier・10 舛onnection・20 船ate・
If there is no external output statement before
禅op-of-page・event, then this event will not
work.
End-of-page.
Once the cursor reaches the last line of the
page, automatically this event will be triggered.
Report Zxxx line-count 25(3).
In this case line numbers 23, 24 and 25 are
reserved for footer.
Once the cursor reaches 23rd line, this event
will be triggered.
End-of-page.
Write:/ sy-uline(75).
Write:/ 禅his is end of page:・sy-pagno.
Write:/ sy-uline(75).
End-of-selection.
This event is used for concluding part of List.
End-of-selection.
Write:/ 禅his is end of the Report・
Additional events in interactive reports
The following additional events are applicable to secondary lists.
Top-of-page during line-selection.
At line-selection.
At user-command.
These additional events are triggered when u perform some action on the basic lists.
example:
REPORT zwk22671 LINE-COUNT 40(3)
LINE-SIZE 200
NO STANDARD PAGE HEADING.
TABLES : mkpf , "MATERIAL DOCUMENT
mseg , "DOCUMENT SEGMENT : MATERIAL
t156t , "MOVEMENT TYPE TEXT
makt. "MATERIAL DESCRIPTIONS
*STRUCTURE OF INTERNAL TABLES
DATA : BEGIN OF xtab,
mblnr TYPE mkpf-mblnr , "DOCUMENT NUMBER
mjahr TYPE mkpf-mjahr , "YEAR
budat TYPE mkpf-budat , "POST DATE
blart TYPE mkpf-blart , "DOCUMENT TYPE
END OF xtab.
DATA : BEGIN OF ytab,
mblnr TYPE mseg-mblnr , "DOCUMENT NUMBER
mjahr TYPE mseg-mjahr , "YEAR
zeile TYPE mseg-zeile , "ITEM NUMBER
bwart TYPE mseg-bwart , "MOVEMENT TYPE
btext TYPE t156t-btext , "MOVEMENT DESCRIPTION
matnr TYPE mseg-matnr , "MATERIAL NUMBER
maktx TYPE makt-maktx , "MATERIAL DESCRIPTION
meins TYPE mseg-meins , "UNIT OF MEASURE
menge TYPE mseg-menge , "QUANTITY
dmbtr TYPE mseg-dmbtr , "AMOUNT
END OF ytab.
*INTERNAL TABLE DECLARATION
DATA : i_tab1 LIKE STANDARD TABLE OF xtab WITH HEADER LINE. "INTERNAL TABLE 1 : CONTAINS MATERIAL DETAILS
DATA : i_tab2 LIKE STANDARD TABLE OF ytab WITH HEADER LINE. "INTERNAL TABLE 2 : CONTAINS ITEMWISE MATERIAL DETAILS
*VARIABLES
DATA : v_color TYPE sy-tabix , "FOR SETTING COLOR FORMATS DURING GENERATING REPORT
v_field(20) , "FOR STORING THE CLICKED FIELD NAME
v_value(20) , "FOR STORING THE CLICKED FIELD VALUE
v_mblnr TYPE mkpf-mblnr , "FOR VALIDATING DOCUMENT NUMBER
v_mjahr TYPE mkpf-mjahr , "FOR VALIDATING DOCUMENT YEAR
v_bwart TYPE mseg-bwart , "FOR VALIDATING MOVEMENT TYPE
v_matnr TYPE mseg-matnr . "FOR VALIDATING MATERIAL NUMBER
**SELECTION-SCREEN
SELECTION-SCREEN : BEGIN OF BLOCK blk1 WITH FRAME TITLE text-001.
SELECT-OPTIONS : s_mblnr FOR mkpf-mblnr , "DOCUMENT NUMBER
s_mjahr FOR mkpf-mjahr OBLIGATORY, "DOCUMENT YEAR
s_bwart FOR mseg-bwart NO INTERVALS NO-EXTENSION, "MOVEMENT TYPE
s_matnr FOR mseg-matnr . "MATERIAL NUMBER
SELECTION-SCREEN : END OF BLOCK blk1.
AT SELECTION-SCREEN
AT SELECTION-SCREEN.
PERFORM validation. "PERFORMS VALIDATION OF SELECTION-SCREEN FIELDS
*TOP-OF-PAGE
TOP-OF-PAGE.
PERFORM header. "CREATES HEADER FOR THE BASIC LIST
*END-OF-PAGE
END-OF-PAGE. "CREATES FOOTER FOR THE BASIC AND SECONDARY LIST
PERFORM footer.
*START-OF-SELECTION
START-OF-SELECTION.
PERFORM generation_basic. "GENERATES REPORT FOR BASIC LIST WHICH CONTAINS DOCUMENT NO , DOCUMENT YEAR
"POST DATE , DOCUMENT TYPE.
*END-OF-SELECTION
END-OF-SELECTION.
PERFORM report_basic. "DISPLAY REPORT FOR BASIC LIST
*AT LINE-SELECTION
AT LINE-SELECTION.
PERFORM generation_secondary. "GENERATES REPORT FOR SECONDARY LIST BASED ON THE DOCUMENT NUMBER AND DOCUMENT YEAR
"WHICH CONTAINS DOCUMENT NO , YEAR , ITEM NO , MOVEMENT TYPE , MOVEMENT DESCRIPTION ,
"MATERIAL NUMBER , MATERIAL DESC , UNIT OF MEASURE , QUANTITY AND AMOUNT
*TOP-OF-PAGE DURING LINE-SELECTION
TOP-OF-PAGE DURING LINE-SELECTION.
PERFORM header_secondary. "CREATES HEADER FOR THE SECONDARY LIST
*AT USER-COMMAND
AT USER-COMMAND.
PERFORM user_secondary. "SUBROUTINE FOR HANDLING USER EVENTS
FORM validation .
*VALIDATING MATERIAL DOCUMENT NUMBER
SELECT SINGLE mblnr
INTO v_mblnr
FROM mkpf
WHERE mblnr IN s_mblnr.
IF sy-subrc NE 0.
MESSAGE 'ENTER CORRECT DOCUMENT NUMBER' TYPE 'E'.
ENDIF.
*VALIDATING MATERIAL DOCUMENT YEAR
SELECT SINGLE mjahr
INTO v_mjahr
FROM mkpf
WHERE mjahr IN s_mjahr.
IF sy-subrc NE 0.
MESSAGE 'ENTER CORRECT MATERIAL DOCUMENT YEAR' TYPE 'E'.
ENDIF.
*VALIDATING MOVEMENT TYPE
SELECT SINGLE bwart
INTO v_bwart
FROM mseg
WHERE bwart IN s_bwart.
IF sy-subrc NE 0.
MESSAGE 'ENTER CORRECT MOVEMENT TYPE' TYPE 'E'.
ENDIF.
*VALIDATING MATERIAL NUMBER
SELECT SINGLE matnr
INTO v_matnr
FROM mseg
WHERE matnr IN s_matnr.
IF sy-subrc NE 0.
MESSAGE 'ENTER CORRECT MATERIAL NUMBER' TYPE 'E'.
ENDIF.
ENDFORM. " VALIDATION
FORM header .
WRITE :/30 'MATERIAL DOCUMENTS' COLOR 1. "TITLE OF BASIC LIST
WRITE :/1(89) sy-uline.
FORMAT COLOR 1.
WRITE :/1 sy-vline ,
3 'DOCUMENT NUMBER' ,
23 sy-vline ,
25 'YEAR' ,
45 sy-vline ,
47 'POST DATE' ,
67 sy-vline ,
69 'DOCTYP' ,
89 sy-vline .
FORMAT RESET.
WRITE :/1(89) sy-uline.
ENDFORM. " HEADER
FORM footer .
IF sy-lsind EQ 0. "CHECKS WHICH LIST IS IT BASIC LIST OR SECONDARY (AND NO. OF SECONDARY LIST)
WRITE :/1(89) sy-uline.
ELSEIF sy-lsind EQ 1.
WRITE :/1(192) sy-uline.
ENDIF.
ENDFORM. " FOOTER
FORM generation_basic .
SELECT mkpf~mblnr "DOCUMENT NUMBER
mkpf~mjahr "DOCUMENT YEAR
mkpf~budat "POST DATE
mkpf~blart "DOCUMENT TYPE
INTO TABLE i_tab1
FROM mkpf INNER JOIN mseg ON mkpfmjahr EQ msegmjahr AND
mkpfmblnr EQ msegmblnr
WHERE mkpf~mblnr IN s_mblnr
AND mkpf~mjahr IN s_mjahr
AND mseg~bwart IN s_bwart
AND mseg~matnr IN s_matnr.
IF sy-subrc NE 0.
WRITE :/ 'MATERIAL DATA NOT FOUND'.
ENDIF.
DELETE ADJACENT DUPLICATES FROM i_tab1 COMPARING mblnr mjahr.
ENDFORM. " GENERATION_BASIC
FORM report_basic .
LOOP AT i_tab1.
v_color = sy-tabix MOD 2.
IF v_color EQ 0.
FORMAT COLOR 1 INTENSIFIED OFF.
ELSE.
FORMAT COLOR 2 INTENSIFIED OFF.
ENDIF.
WRITE :/1 sy-vline ,
3 i_tab1-mblnr ,
23 sy-vline ,
25 i_tab1-mjahr ,
45 sy-vline ,
47 i_tab1-budat ,
67 sy-vline ,
69 i_tab1-blart ,
89 sy-vline .
HIDE : i_tab1-mblnr , i_tab1-mjahr. "STORING THE VALUE OF FIELDS CLICKED IN SYSTEM AREA
ENDLOOP.
FORMAT RESET.
WRITE :/1(89) sy-uline.
ENDFORM. " REPORT_BASIC
FORM generation_secondary .
IF sy-lsind EQ 1.
SET PF-STATUS 'DISPLAY'.
GET CURSOR FIELD v_field VALUE v_value. "GET THE FIELD VALUE AND NAME WHERE THE CURSOR WAS CLICKED
CASE v_field.
WHEN 'I_TAB1-MBLNR'. "DISPLAYS SECONDARY LIST ONLY IF DOCUMENT NUMBER IS CLICKED
SELECT mseg~mblnr "DOCUMENT NUMBER
mseg~mjahr "DOCUMENT YEAR
mseg~zeile "ITEM NUMBER
mseg~bwart "MOVEMENT TYPE
t156t~btext "MOVEMENT DESCRIPTION
mseg~matnr "MATERIAL NUMBER
makt~maktx "MATERIAL DESCRIPTION
mseg~meins "UNIT OF MEASURE
mseg~menge "QUANTITY
mseg~dmbtr "AMOUNT
INTO TABLE i_tab2
FROM ( ( mseg INNER JOIN t156t
ON msegbwart EQ t156tbwart )
INNER JOIN makt
ON msegmatnr EQ maktmatnr )
WHERE mseg~mblnr EQ i_tab1-mblnr
AND mseg~mjahr EQ i_tab1-mjahr
AND t156t~spras EQ sy-langu
AND makt~spras EQ sy-langu.
DELETE ADJACENT DUPLICATES FROM i_tab2 COMPARING mblnr mjahr.
WHEN OTHERS.
MESSAGE 'SELECT DOCUMENT NUMBER' TYPE 'E'.
ENDCASE.
LOOP AT i_tab2.
v_color = sy-tabix MOD 2.
IF v_color EQ 0.
FORMAT COLOR 1 INTENSIFIED OFF.
ELSE.
FORMAT COLOR 2 INTENSIFIED OFF.
ENDIF.
WRITE :/1 sy-vline ,
3 i_tab2-mblnr ,
12 sy-vline ,
14 i_tab2-mjahr ,
19 sy-vline ,
21 i_tab2-zeile ,
30 sy-vline ,
32 i_tab2-bwart ,
40 sy-vline ,
42 i_tab2-btext ,
72 sy-vline ,
74 i_tab2-matnr ,
94 sy-vline ,
96 i_tab2-maktx ,
146 sy-vline ,
148 i_tab2-meins ,
153 sy-vline ,
155 i_tab2-menge ,
170 sy-vline ,
172 i_tab2-dmbtr ,
192 sy-vline .
ENDLOOP.
WRITE :/1(192) sy-uline.
FORMAT RESET.
ELSEIF sy-lsind EQ 2.
GET CURSOR FIELD v_field VALUE v_value. "GET THE FIELD VALUE AND NAME WHERE THE CURSOR WAS CLICKED
CASE v_field.
WHEN 'I_TAB2-MBLNR'. "DISPLAYS SECONDARY LIST ONLY IF DOCUMENT NUMBER IS CLICKED
SET PARAMETER ID : "SETTING PARAMETER ID FOR DOCUMENT NUMBER AND YEAR.
'MBN' FIELD i_tab2-mblnr ,
'MJA' FIELD i_tab2-mjahr.
CALL TRANSACTION 'MB03' AND SKIP FIRST SCREEN. "CALLING TRABSACTION CODE 'MBO3'.
WHEN OTHERS.
MESSAGE 'SELECT DOCUMENT NUMBER' TYPE 'E'.
ENDCASE.
ENDIF.
ENDFORM. " GENERATION_SECONDARY
FORM header_secondary .
WRITE :/50 'ITEMWISE MATERIAL DOCUMENTS' COLOR 1.
WRITE :/1(192) sy-uline.
FORMAT COLOR 1.
WRITE :/1 sy-vline ,
3 'DOCUMENT NO' ,
12 sy-vline ,
14 'YEAR' ,
19 sy-vline ,
21 'ITEM NO.' ,
30 sy-vline ,
32 'MOV TYP' ,
40 sy-vline ,
42 'MOV DESCRIPTION' ,
72 sy-vline ,
74 'MATERIAL NO' ,
94 sy-vline ,
96 'MATERIAL DESCRIPTION' ,
146 sy-vline ,
148 'UOM' ,
153 sy-vline ,
155 'QUANTITY' ,
170 sy-vline ,
172 'AMOUNT' ,
192 sy-vline .
WRITE :/1(192) sy-uline.
FORMAT RESET.
ENDFORM. " HEADER_SECONDARY
*FORM user_secondary .
IF sy-ucomm EQ 'DISPLAY'. "EXECUTES ONLY IF 'DISPLAY DOCUMENTS' ITEM IS CLICKED ON APPLICATION TOOL BAR.
IF sy-lsind EQ 2.
GET CURSOR FIELD v_field VALUE v_value. "GET THE FIELD VALUE AND NAME WHERE THE CURSOR WAS CLICKED
CASE v_field.
WHEN 'I_TAB2-MBLNR'. "DISPLAYS SECONDARY LIST ONLY IF DOCUMENT NUMBER IS CLICKED
SET PARAMETER ID :
'MBN' FIELD i_tab2-mblnr ,
'MJA' FIELD i_tab2-mjahr.
CALL TRANSACTION 'MB03' AND SKIP FIRST SCREEN.
WHEN OTHERS.
MESSAGE 'SELECT DOCUMENT NUMBER' TYPE 'E'.
ENDCASE.
ENDIF.
LEAVE PROGRAM.
ENDIF.
ENDFORM. " USER_SECONDARY

RTMT REPORTING NTP EVENTS

Similar Messages

Maybe you are looking for