Error in adding Function to the role

Hi Experts,
We are on AC-ERM 5.3_10_0. I was trying to create a test role in ERM. When adding a function to the role it's throwing the following error. Unknown error occurred while performing operation (Cannot assign a java.lang.String object of length 57 to host variable 2 which has JDBC type VARCHAR(50). in method insertOrgLvlsForRole).
Not able to find out, what's going wrong. Can anyone please guide me in resolving the error.
Thanks,
Gurugobinda

Hi Zaheer,
Thanks a lot. You are right. I am not facing this error in other functions. Only in for functions like PR91, PR01, HR02 I am getting this error. In fact, when I am adding the function it is showing the error, but when i am coming back to function TAB, I am finding the function has been added successfully. Can you please tell me how to rectify this error.
Regards,
Gurugobinda

Similar Messages

HELP --- Error while adding Portlets to the Page. (WWC-44012)

Hi all,
I have a pl/sql portlet. It compiles fine and shows up perfectly in portlet repository. But when i add this to the page, I get following error
Error while adding Portlets to the Page. (WWC-44012)
An unexpected error occurred: User-Defined Exception (WWC-43000)
An unexpected error occurred: User-Defined Exception (WWC-43000)
An unexpected error occurred: User-Defined Exception (WWC-51004)
(WWC-00000)
I checked the portlet specification file (.pks) and body file (.pkb) for any mistakes but they seems fine.
Does anyone know what can cause this error?
Any pointers in this regards will be highly appreciated.
Thanks!!!
Rajesh

Rajesh,
Could you provide some more details about your code? I will try to look into possible causes of the error. One thing you may try is subscribing to the Knowledge Exchange on http://portalcenter.oracle.com. Then you could post your code in your community folder and everyone would be able to test it out.
Of course, this means you must be willing to share your code with everyone.
James

Error while adding member to the dag in exchange 2013 sp1

I have Windows Server 2012 Std Edition with Exchange 2013 SP1 and get the following error while adding member to the dag either i do it using EAC or the powershell
Senior Technical Consultant, MDS Computers

When running set-databaseavailabilitygroup Exchange-dag without parameters, it crashes again:
[PS] C:\Windows\system32>Set-DatabaseAvailabilityGroup exchange-dag
WARNING: An unexpected error has occurred and a Watson dump is being generated: Some or all identity references could not be translated. Some or all identity references could not be translated.
+ CategoryInfo : NotSpecified: (:) [Set-DatabaseAvailabilityGroup], IdentityNotMappedException
+ FullyQualifiedErrorId : System.Security.Principal.IdentityNotMappedException,Microsoft.Exchange.Management.Syste
mConfigurationTasks.SetDatabaseAvailabilityGroup
+ PSComputerName : <server>
Also, this is logged in the eventlog:
Watson report about to be sent for process id: 7424, with parameters: E12, c-RTL-AMD64, 15.00.0847.032, w3wp#MSExchangePowerShellAppPool, M.Exchange.Management, M.E.M.C.FileShareWitness.Create, S.S.Principal.IdentityNotMappedException, 3e5c, 15.00.0847.031.
ErrorReportingEnabled: True
Definitely looks like a problem creating the filewitness share.
Frank.

Error in reconcilation Function - Job "Reconcile roles and privileges"

SAP NW 7.0 SP2 Patch 3
Roles contain Privileges
Help file says: "If you are using roles and privileges, you will need to perform a reconciliation of the roles/privileges assigned to the users in the identity store after the roles are modified. "
Job imported as described.
When I let the job run on the ID-Store, for each entry, the following error message occurs:
runFunctionsInString($FUNCTION.reconcile( MSKEY )$$) got exception
org.mozilla.javascript.NotAFunctionException: reconcile( MSKEY )
...where MSKEY is, of course, the MSKEY of the entry.
If I let run the job with the Windows-Dispatcher and as a VB-script, it produces no error; however, in the output file, there are a lot of Messages like
"!ERROR: Invalid use of Null"
Only some entries (of Type MX_PERSON) show the "Priviliege added: (...)" output. But the job does not add the Privileges assigend to the role, as it should.
So, I would suggest that one redefines the SQL-Query of the Job so that it runs only on MX_PERSONS. But then, still, in my case, it does nothing.
Has anyone better experiences with the Job?
Edited by: Thomas P. Felder on Sep 25, 2008 10:32 AM

The job when imported by default uses java runtime engine but the script is written in vbscript syntax so you have to change the engine or the script syntax.
When you did your select statement did you use SELECT DISTINCT. That will also cause errors. I do not narrow the entry type to MX_PERSON.
I'm installing the patch now; I will see if I get any errors.

ERM - Adding Function to a Role

Hi all,
I have the following problem. when we add a Function to a Role in ERM, the transactions are added but the authorization values don't. Does anyone know something about this issue??
Kind Regards!!
Isaac

We are under SP12 and we are not able to add transactions or auth objects to the role through Functions or Manually. Both functions and transactions are found but when selecting them and saving and error is raised.
We are in the right VIRSANH and VIRSAHR SPs.
We have upload the XML files
We have run job sync taks to import transactions, auth object and org value
We are having an OSS Message...
Get back to you when solution is found / provided.

Error in adding stock of the material

Hi
While adding stock to the material using MB1C I am getting an error "Fld selectn for mvmt type 561 / acct 399999 differs for Ext. GA amount in LC (023)"
What can be the solution ??

Option-1: Check Field status group in the create/bank/interest TAB for G/L in FS00 & check its assignments in OBC4 & Field Selection for status of Ext. GA amount in LC like optional/required/suppress
Use OMJJ t.code - 561 mvt - field selection and check additional account assignment (here Ext. GA amount in LC is optional/required/suppress.)
Option-2: Can also run the programme RM07CUFA through SE38 to update.
Regards,

ODI Error - Calling a function in the source database

I am using this directly in the Interface mapping and getting the following error
This is the syntax I am using SUM(CASE WHEN ((main.getCertDate(person_id,getdate()) >= current_timestamp) THEN 1 ELSE 0 END)
ODI-1228: Task Load_Fact_Table1 (Integration) fails on the target MICROSOFT_SQL_SERVER connection SQLSERVER_USA.
Caused By: java.sql.SQLException: [FMWGEN][SQLServer JDBC Driver][SQLServer]Cannot find either column "main" or the user-defined function or aggregate "main.dbo.getCertDate", or the name is ambiguous.
Am I missing any additional steps, before calling a function in the mapping. Do I have to do something in the model to include teh function etc., Please help in fixing this issue.
Thanks for your time and help.

Hi Michael, Please see below.
IKM - MSSQL Incremental Update
Failing on Step 3 - Integration - Insert flow into I$ table
insert into db11.dbo.##I$_FCT_TABLE
COMP_ID,
CNT_CLP_TARGET_MET,
CNT_CERTIFIED,
CNT_NOTCERT_WITHIN_GRACE_PRD,
CNT_CERT_OR_WITHIN_GRACE_PRD,
CNT_CERT_DELINQUENT,
SUM_OF_AGE,
SUM_OF_YEARS_EXPERIENCE,
LOAD_DATE,
IND_UPDATE
select
CASE WHEN DIM_COMP.COMP_ID IS null then -9999
ELSE DIM_COMP.COMP_ID
END,
SUM(CASE WHEN ((main.dbo.getCertDate ([DISTINCT_RWF.MASTERKEY],GETDATE()) >= CURRENT_TIMESTAMP) OR DISTINCT_RWF = 'NO') THEN 1 ELSE 0 END),
CURRENT_TIMESTAMP,
'I' IND_UPDATE
from ((
select DISTINCT
REPORT_WORKFORCE_REVIEW.REGION as REGION, REPORT_WORKFORCE_REVIEW.COMPO as COMPO, REPORT_WORKFORCE_REVIEW.PERSON_ID as PERSON_ID, REPORT_WORKFORCE_REVIEW.WF_STATUS as WF_STATUS, REPORT_WORKFORCE_REVIEW.PERSON_NAME as PERSON_NAME, REPORT_WORKFORCE_REVIEW.CPCN_NUM as CPCN_NUM, REPORT_WORKFORCE_REVIEW.COMMAND as COMMAND, REPORT_WORKFORCE_REVIEW.UIC as UIC, REPORT_WORKFORCE_REVIEW.UIC_STATE as UIC_STATE, REPORT_WORKFORCE_REVIEW.ORG_STRUCTURE_CODE as ORG_STRUCTURE_CODE, REPORT_WORKFORCE_REVIEW.ORG_DESC as ORG_DESC, REPORT_WORKFORCE_REVIEW.LOCATION as LOCATION, REPORT_WORKFORCE_REVIEW.STATE as STATE, REPORT_WORKFORCE_REVIEW.SVC_COMP_DATE as SVC_COMP_DATE, REPORT_WORKFORCE_REVIEW.YRS_OF_SERVICE as YRS_OF_SERVICE, REPORT_WORKFORCE_REVIEW.POSITION_ENTER_DATE as POSITION_ENTER_DATE, REPORT_WORKFORCE_REVIEW.MTHS_EXP_IN_PRESENT_POS as MTHS_EXP_IN_PRESENT_POS, REPORT_WORKFORCE_REVIEW.MTHS_EXP_IN_CURRENT_APC_ACL as MTHS_EXP_IN_CURRENT_APC_ACL, REPORT_WORKFORCE_REVIEW.AGE as AGE, REPORT_WORKFORCE_REVIEW.SEX as SEX, REPORT_WORKFORCE_REVIEW.SUPV_CODE as SUPV_CODE, REPORT_WORKFORCE_REVIEW.ACF as ACF, REPORT_WORKFORCE_REVIEW.CP as CP, REPORT_WORKFORCE_REVIEW.SERIES as SERIES, REPORT_WORKFORCE_REVIEW.DUTY_TITLE as DUTY_TITLE, REPORT_WORKFORCE_REVIEW.APT as APT, REPORT_WORKFORCE_REVIEW.APT_DESC as APT_DESC, REPORT_WORKFORCE_REVIEW.API as API, REPORT_WORKFORCE_REVIEW.SAA as SAA, REPORT_WORKFORCE_REVIEW.GRADE as GRADE, REPORT_WORKFORCE_REVIEW.HI_DEGREE as HI_DEGREE, REPORT_WORKFORCE_REVIEW.LVL_DESC as LVL_DESC, REPORT_WORKFORCE_REVIEW.APC as APC, REPORT_WORKFORCE_REVIEW.ACL as ACL, REPORT_WORKFORCE_REVIEW.CERT_LVL_ACHIEVED_IN_APC as CERT_LVL_ACHIEVED_IN_APC, REPORT_WORKFORCE_REVIEW.CERT_IN_POSITION as CERT_IN_POSITION, REPORT_WORKFORCE_REVIEW.CERT_BELOW_POSITION as CERT_BELOW_POSITION, REPORT_WORKFORCE_REVIEW.NOT_CERTIFIED as NOT_CERTIFIED, REPORT_WORKFORCE_REVIEW.CLP as CLP, REPORT_WORKFORCE_REVIEW.LAST_IDP_UPDATE as LAST_IDP_UPDATE, REPORT_WORKFORCE_REVIEW.LAST_IDP_UPDATE_MTHS as LAST_IDP_UPDATE_MTHS, REPORT_WORKFORCE_REVIEW.SUPV_REVIEW_DATE as SUPV_REVIEW_DATE, REPORT_WORKFORCE_REVIEW.SUPV_REVIEW_DATE_MTHS as SUPV_REVIEW_DATE_MTHS, REPORT_WORKFORCE_REVIEW.EMAIL as EMAIL, REPORT_WORKFORCE_REVIEW.MASTERKEY as MASTERKEY
from main.dbo.REPORT_WORKFORCE_REVIEW as REPORT_WORKFORCE_REVIEW
where (1=1)
) as DISTINCT_REPORT_WORKFORCE_REVIEW LEFT JOIN main.dbo.PERSON as PERSON ON DISTINCT_REPORT_WORKFORCE_REVIEW.MASTERKEY=PERSON.MASTERKEY) LEFT JOIN main.dbo.ACQUISITION_CORPS_QUALIFICATION as ACQUISITION_CORPS_QUALIFICATION ON DISTINCT_REPORT_WORKFORCE_REVIEW.MASTERKEY=ACQUISITION_CORPS_QUALIFICATION.MASTERKEY) LEFT JOIN main.dbo.PERSONS_POSITIONS as PERSONS_POSITIONS ON DISTINCT_REPORT_WORKFORCE_REVIEW.PERSON_ID=PERSONS_POSITIONS.MASTERKEY
AND PERSONS_POSITIONS.POSITION_END_DATE IS NULL) INNER JOIN db11.dbo.DIM_COMP as DIM_COMP ON DISTINCT_REPORT_WORKFORCE_REVIEW.COMPO=DIM_COMP.COMP_CODE AND DIM_COMP.CURRENT_RECORD_IND = 1) LEFT JOIN db11.dbo.DIM_POSITION_TYPE as DIM_POSITION_TYPE ON DISTINCT_REPORT_WORKFORCE_REVIEW.APT=DIM_POSITION_TYPE.POSITION_CODE
AND DIM_POSITION_TYPE.CURRENT_RECORD_IND=1)

Error in adding stock to the material

Hi
While adding stock to the material using MB1C I am getting an error "Fld selectn for mvmt type 561 / acct 399999 differs for Ext. GA amount in LC (023)"
What can be the solution ??

Option-1: Check Field status group in the create/bank/interest TAB for G/L in FS00 & check its assignments in OBC4 & Field Selection for status of Ext. GA amount in LC like optional/required/suppress
Use OMJJ t.code - 561 mvt - field selection and check additional account assignment (here Ext. GA amount in LC is optional/required/suppress.)
Option-2: Can also run the programme RM07CUFA through SE38 to update.
Regards,

Error creating a function using the O2A Cartridges

Hi, I am using the O2A Cartridges and I have created a new function in the next cartridge OracleComms_OSM_O2A_COM_Billing. Then I have included the function as a order component in the BaseProductSpec.
At this point when I build all the workspace the next problem is generated:
Order Model Error - The node /ControlData/Functions [COM_SalesOrderFulfillment] has multiple contributors with different significance set. Please see the log for further details COM_SalesOrderFulfillment.order /OracleComms_OSM_O2A_COM_Base/model/ORDER Unknown Problem
The function created has the same significance as the other functions like SyncCustomerFunction.
I don't know how to solve this problem. Tell me, if you need more information about it.
Thanks,
Juan

in the TOP Include the statement
FUNCTION-POOL (<b>Name of function Group</b>).
is missing.
to Reach to th eexact point.
to to attibutes tab of your FM
double click on Program Name.
double click on include ending with TOP.
Declare the statement in the TOP include.
amandeep.

Adding Query in the Roles

Hi,
I am having arroung 40-50 roles defined based on the various authorization levels.
Whenever we make a new query and want to give access to these roles, we go and add the query manually in all the roles (RRMX -> Select the quey -> Add in Role) and give authorization of the query in PFCG.
Is there any way to give access of the the query to all the roles and setting the values for authorization object.
Regards
Ramesh.

Ramesh,
I would assign all of the queries to one role and then assign that role to all of the users. You would then keep the other data driven authorizations separate in the original 40-50 roles and remove the queries. This is much easier to maintain. Hope this helps.
Regards,
Keith

Error while adding Portlets to the Page. (WWC-44012)

Hi everyone,
I am installing the DBPersonalization Manager Provider. I followed directions and am able to successfully bring up the provider's test page. I added the provider to the repository and can preview them without problems. However, when I add the portlet to a page, I get the following error:
An unexpected error occurred: ORA-29532: Java call terminated by uncaught Java exception: java.io.IOException: Start of root element expected.13
<Line 1, Column 1>: XML-0108: (Fatal Error) Start of root element expected. (WWC-43000)
An unexpected error occurred: java.io.IOException: Start of root element expected.13
<Line 1, Column 1>: XML-0108: (Fatal Error) Start of root element expected.
at oracle.webdb.provider.web.SoapResponseProcessor.getDocument(SoapResponseProcessor.java:123)
at oracle.webdb.provider.web.SoapResponseProcessor.processSOAP(SoapResponseProcessor.java:42)
at oracle.webdb.provider.web.HttpProviderDispatcher.dispatch(HttpProviderDispatcher.java:877)
at oracle.webdb.provider.web.HttpProviderDispatcher.registerPortlet(HttpProviderDispatcher.java:201)
(WWC-43000)
An unexpected error occurred: Start of root element expected.
at oracle.xml.parser.v2.XMLError.flushErrors(XMLError.java)
at oracle.xml.parser.v2.XMLError.error(XMLError.java)
at oracle.xml.parser.v2.XMLError.error(XMLError.java)
at oracle.xml.parser.v2.NonValidatingParser.parseRootElement(NonValidatingParser.java)
at oracle.xml.parser.v2.NonValidatingParser.parseDocument(NonValidatingParser.java)
at oracle.xml.parser.v2.XMLParser.parse(XMLParser.java)
at oracle.webdb.provider.web.SoapResponseProcessor.getDocument(SoapResponseProcessor.java:117)
at oracle.webdb.provider.web.SoapResponseProcessor.processSOAP(SoapResponseProcessor.java:42)
at oracle.webdb.provider.web.HttpProviderDispatcher.dispatch(HttpProviderDispatcher.java:877)
at oracle.webdb.provider.web.HttpProviderDispatcher.registerPortlet(HttpProviderDispatcher.java:201)
(WWC-43000)
I am not sure what this is from but assume that it is having problems communicating with my provider. Does anyone have any idea what this could be caused by?
Thanks in advance...
Esther Poulsen

Hi Sue,
Thanks for your response! I ran the XML file through a validator and examined it manually, and it is fine. Moreover, if I add additional portlets to the provider.xml file, they add themselves without any problems. I'd think the entire thing would break if the provider.xml file was not well formed for any reason. But if anyone has any futher suggestions about this it would be greatly appreciated.
Thanks in advance,
Esther

Error while adding space to the table space

HI Gurus
Can you please put some light on the error which i encountered while adding space to a tablespace
ALTER TABLESPACE "GISR_NDEX" ADD DATAFILE '+DATA2' SIZE 2G;
ALTER TABLESPACE "GISR_INDEX" ADD DATAFILE '+DATA2' SIZE 2G
ERROR at line 1:
ORA-01119: error in creating database file '+DATA2'
ORA-17502: ksfdcre:4 Failed to create file +DATA2
ORA-15041: diskgroup space exhausted
Any suggestion is highly apprciated .
Thanks

Hello;
The "diskgroup space exhausted" is key.
Try creating smaller files or adding disk space.
ASM Disk Group Unbalanced :
http://surachartopun.com/2010/03/ora-15041-asm-disk-group-unbalanced.html
Best Regards
mseberg

Error! Adding fields to the field catalog

Dear Sap Support,
I just added to the field catalog the field "Short Text" which stands for product description. The thing is that this field was needed in the tab "Discount" of the Marketing Planner.
This field was then added to the table CUS_002 (usage PR), and table CUS_003 (usage FG)
After that change, when I go to the marketing planner and try to insert a new condition, the program throws an error just right after a choose the product to be discounted. The error says: "FIELD_CHECK/DEFAULT_VALUE_SUGGESTION for BAdI /SAPCND/ROLLNAME for filter COMT_PRSHTEXTX is missing"
Where can I find that Badi? and how does it have to be implemented?
Best regards,
Mariana

Hi Mariana
How did you slove the problem
Thanks
Ron

Error whil adding Header to the ALV grid using OO

Hi Guys,
             I want to display the Header for the ALV grid using Splitter .
when i am doing like that .I am getting a screen on the top of that screen I am getting a EMPTY screen .I don't know why likat.
What i need is just to display a Grid with header?Can anybody Please help me reagarding this problem.
the Code is Below.
*& Report Z_TEST_PGM
REPORT Z_TEST_PGM NO STANDARD PAGE HEADING
                                  LINE-SIZE 120 MESSAGE-ID zotc.
Tables : CKMLMV003 , CKMLMV001.
TYPE-POOLS: slis.
Types : Begin of t_CKMLMV003_out,
             WERKS type CKMLMV003-WERKS,
             MATNR type CKMLMV003-MATNR,
             MISCH_VERH type CKMLMV003-MISCH_VERH,
             KALNR_BAL type CKMLMV003-KALNR_BAL,
             GJAHR type CKMLMV003-GJAHR,
             PERIO type CKMLMV003-PERIO,
             MGTYP type CKMLMV003-MGTYP,
        End of t_CKMLMV003_out,
        Begin of t_CKMLMV001_out,
             MATNR type CKMLMV001-MATNR,
             KALNR type CKMLMV001-KALNR,
             LIFNR_ND type CKMLMV001-LIFNR_ND,
             EKORG_ND type CKMLMV001-EKORG_ND,
        End of t_CKMLMV001_out,
        Begin of t_CKMLMV003_Temp,
             MATNR type CKMLMV003-MATNR,
             GJAHR type CKMLMV003-GJAHR,
             PERIO type CKMLMV003-PERIO,
        End of t_CKMLMV003_Temp,
        Begin of t_Final_out,
             MATNR type CKMLMV003-MATNR,
             GJAHR type CKMLMV003-GJAHR,
             PERIO type CKMLMV003-PERIO,
             WERKS type CKMLMV003-WERKS,
             LIFNR_ND1 type CKMLMV001-LIFNR_ND,
             MISCH_VERH1 type CKMLMV003-MISCH_VERH,
             LIFNR_ND2 type CKMLMV001-LIFNR_ND,
             MISCH_VERH2 type CKMLMV003-MISCH_VERH,
             LIFNR_ND3 type CKMLMV001-LIFNR_ND,
             MISCH_VERH3 type CKMLMV003-MISCH_VERH,
             LIFNR_ND4 type CKMLMV001-LIFNR_ND,
             MISCH_VERH4 type CKMLMV003-MISCH_VERH,
             LIFNR_ND5 type CKMLMV001-LIFNR_ND,
             MISCH_VERH5 type CKMLMV003-MISCH_VERH,
             LIFNR_ND6 type CKMLMV001-LIFNR_ND,
             MISCH_VERH6 type CKMLMV003-MISCH_VERH,
             LIFNR_ND7 type CKMLMV001-LIFNR_ND,
             MISCH_VERH7 type CKMLMV003-MISCH_VERH,
             LIFNR_ND8 type CKMLMV001-LIFNR_ND,
             MISCH_VERH8 type CKMLMV003-MISCH_VERH,
             LIFNR_ND9 type CKMLMV001-LIFNR_ND,
             MISCH_VERH9 type CKMLMV003-MISCH_VERH,
             LIFNR_ND10 type CKMLMV001-LIFNR_ND,
             MISCH_VERH10 type CKMLMV003-MISCH_VERH,
             LIFNR_ND11 type CKMLMV001-LIFNR_ND,
             MISCH_VERH11 type CKMLMV003-MISCH_VERH,
             LIFNR_ND12 type CKMLMV001-LIFNR_ND,
             MISCH_VERH12 type CKMLMV003-MISCH_VERH,
             LIFNR_ND13 type CKMLMV001-LIFNR_ND,
             MISCH_VERH13 type CKMLMV003-MISCH_VERH,
         End of t_Final_out,
       Begin of t_Final_out1,
             MATNR type CKMLMV003-MATNR,
             GJAHR type CKMLMV003-GJAHR,
             PERIO type CKMLMV003-PERIO,
             LIFNR_ND1 type CKMLMV001-LIFNR_ND,
             MISCH_VERH1 type CKMLMV003-MISCH_VERH,
             LIFNR_ND2 type CKMLMV001-LIFNR_ND,
             MISCH_VERH2 type CKMLMV003-MISCH_VERH,
             LIFNR_ND3 type CKMLMV001-LIFNR_ND,
             MISCH_VERH3 type CKMLMV003-MISCH_VERH,
             LIFNR_ND4 type CKMLMV001-LIFNR_ND,
             MISCH_VERH4 type CKMLMV003-MISCH_VERH,
             LIFNR_ND5 type CKMLMV001-LIFNR_ND,
             MISCH_VERH5 type CKMLMV003-MISCH_VERH,
             LIFNR_ND6 type CKMLMV001-LIFNR_ND,
             MISCH_VERH6 type CKMLMV003-MISCH_VERH,
             LIFNR_ND7 type CKMLMV001-LIFNR_ND,
             MISCH_VERH7 type CKMLMV003-MISCH_VERH,
             LIFNR_ND8 type CKMLMV001-LIFNR_ND,
             MISCH_VERH8 type CKMLMV003-MISCH_VERH,
             LIFNR_ND9 type CKMLMV001-LIFNR_ND,
             MISCH_VERH9 type CKMLMV003-MISCH_VERH,
             LIFNR_ND10 type CKMLMV001-LIFNR_ND,
             MISCH_VERH10 type CKMLMV003-MISCH_VERH,
             LIFNR_ND11 type CKMLMV001-LIFNR_ND,
             MISCH_VERH11 type CKMLMV003-MISCH_VERH,
             LIFNR_ND12 type CKMLMV001-LIFNR_ND,
             MISCH_VERH12 type CKMLMV003-MISCH_VERH,
             LIFNR_ND13 type CKMLMV001-LIFNR_ND,
             MISCH_VERH13 type CKMLMV003-MISCH_VERH,
         End of t_Final_out1.
                      Global Structures                              *
Data : i_CKMLMV003_str   type   t_CKMLMV003_out,
       i_CKMLMV001_str   type   t_CKMLMV001_out,
       i_Final_str   type t_Final_out,
       i_Final_str1   type t_Final_out,
       i_CKMLMV003_Temp type   t_CKMLMV003_Temp.
                          Global Internal Tables                        *
Data : i_CKMLMV003_out   type standard table of t_CKMLMV003_out,
       i_CKMLMV001_out type standard table of t_CKMLMV001_out,
       i_Final_out   type standard table of t_Final_out,
       i_Final_out1   type standard table of t_Final_out.
ALV Report Internal tables    *
DATA : t_fieldcatalog TYPE slis_t_fieldcat_alv,
       s_fieldcatalog TYPE slis_fieldcat_alv,
       t_basic_fieldcatalog TYPE slis_t_fieldcat_alv,
       s_basic_fieldcatalog TYPE slis_fieldcat_alv,
       t_sort TYPE slis_t_sortinfo_alv,
       v_repid TYPE sy-repid.
*ALV Header declarations
Data: t_header type slis_t_listheader,
      i_header_str type slis_listheader,
      i_line_event_str TYPE slis_alv_event,
      i_events TYPE slis_t_event,
      wa_layout type slis_layout_alv.
Data : grid1 type ref to cl_gui_alv_grid,
       g_custom_container1 type ref to cl_gui_custom_container,
       grid2 type ref to cl_gui_alv_grid,
       g_custom_container2 type ref to cl_gui_custom_container,
       i_FCAT TYPE LVC_T_FCAT,
       i_FCAT_str type lvc_s_fcat,
Structure for layout
      i_layout_s   TYPE lvc_s_layo,
       gt_final1 type table of t_Final_out.
DATA: CCCONTAINER1 TYPE SCRFNAME VALUE 'CCCONTAINER1',
      CCCONTAINER2 TYPE SCRFNAME VALUE 'CCCONTAINER2',
      G_PARENT_TOP TYPE REF TO CL_GUI_CONTAINER ,
      G_SPLITTER   TYPE REF TO CL_GUI_SPLITTER_CONTAINER,
      G_DYNDOC_ID TYPE REF TO CL_DD_DOCUMENT,
      G_PARENT_GRID TYPE REF TO CL_GUI_CONTAINER.
                      Global Variables                              *
Data :cnt(4) type n value '0',
      g_plant type CKMLMV003-WERKS ,
      g_QuanTStr type CKMLMV003-MGTYP ,
      g_PurchOrg type CKMLMV001-EKORG_ND,
      flag type n value '0',
      g_cnt6 type n value '0',
      g_cnt7 type n value '0',
      g_cnt8 type n value '0',
      g_cnt9 type n value '0',
      g_cnt10 type n value '0',
      g_cnt11 type n value '0',
      g_cnt12 type n value '0',
      g_cnt13 type n value '0'.
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-011.
SELECTION-SCREEN: BEGIN OF LINE.
SELECTION-SCREEN COMMENT 2(20) TEXT-006 for field s_matnr.
Select-Options : S_MATNR for CKMLMV003-MATNR .
SELECTION-SCREEN: END OF LINE.
SELECTION-SCREEN: BEGIN OF LINE.
SELECTION-SCREEN COMMENT 2(20) TEXT-007 for field S_WERKS.
SELECT-OPTIONS:S_WERKS for CKMLMV003-WERKS Default '2003'.
SELECTION-SCREEN: END OF LINE.
SELECTION-SCREEN: BEGIN OF LINE.
SELECTION-SCREEN COMMENT 2(20) TEXT-008 for field S_GJAHR.
SELECT-OPTIONS:S_GJAHR for CKMLMv003-GJAHR default Sy-DATUM(4) .
SELECTION-SCREEN: END OF LINE.
SELECTION-SCREEN: BEGIN OF LINE.
SELECTION-SCREEN COMMENT 2(20) TEXT-009 for field S_PERIO.
SELECT-OPTIONS:S_PERIO for CKMLMV003-PERIO .
SELECTION-SCREEN: END OF LINE.
SELECTION-SCREEN: BEGIN OF LINE.
SELECTION-SCREEN COMMENT 2(25) TEXT-010 for field P_MGTYP.
Parameters : P_MGTYP type CKMLMV003-MGTYP .
SELECTION-SCREEN: END OF LINE.
SELECTION-SCREEN END OF BLOCK b1 .
At Selection-Screen on s_matnr .
Perform Validate_MatNumber.
At Selection-Screen on s_werks .
Perform Validate_CostingPlant.
At Selection-Screen on s_GJAHR .
Perform Validate_FiscalYear.
At Selection-Screen on s_PERIO .
Perform Validate_Period.
At Selection-Screen on p_MGTYP .
Perform Validate_QuantityStrType.
*&      Form Validate_MatNumber
      text
Form Validate_MatNumber.
DATA l_MATNR TYPE CKMLMV003-MATNR.
IF NOT S_MATNR[] IS INITIAL .
    CLEAR L_MATNR.
    SELECT single MATNR FROM CKMLMV003
      INTO l_MATNR
      WHERE MATNR = s_MATNR-LOW or MATNR = s_MATNR-HIGH.
   ENDSELECT.
    IF sy-subrc NE 0.
      MESSAGE e999 WITH
              'Enter a Valid Material Number'(001).
    ENDIF.
ENDIF.
ENDFORM.                    "Validate_MatNumber
*&      Form Validate_CostingPlant
      text
Form Validate_CostingPlant.
DATA l_werks TYPE CKMLMV003-WERKS.
IF NOT S_WERKS[] IS INITIAL .
    CLEAR L_WERKS.
    SELECT single WERKS FROM T001W
      INTO l_WERKS
      WHERE WERKS = s_WERKS-low or WERKS = s_WERKS-high.
   ENDSELECT.
    IF sy-subrc NE 0.
      MESSAGE e999 WITH
              'Enter a Valid Costing Plant'(002).
    ENDIF.
ENDIF.
ENDFORM.                    "Validate_CostingPlant
*&      Form Validate_FiscalYear
      text
Form Validate_FiscalYear.
DATA l_GJAHR TYPE CKMLMV003-GJAHR.
IF NOT S_GJAHR-low IS INITIAL or S_GJAHR-high IS INITIAL.
    CLEAR L_GJAHR.
   SELECT SINGLE GJAHR FROM CKMLMV003
     INTO l_GJAHR
     WHERE GJAHR LE sy-DATUM(4) .
   IF NOT S_GJAHR-low LE sy-DATUM(4) or S_GJAHR-high LE sy-DATUM(4).
     MESSAGE e999 WITH
             'Enter a Valid Fiscal year'(003).
   ENDIF.
ENDIF.
ENDFORM.                    "Validate_FiscalYear
*&      Form Validate_Period
      text
Form Validate_Period.
DATA l_PERIO TYPE CKMLMV003-PERIO.
IF NOT S_PERIO[] IS INITIAL .
    CLEAR L_PERIO.
    SELECT single PERIO FROM CKMLMV003
      INTO l_PERIO
      WHERE PERIO GE 1 and PERIO LE 12 .
   ENDSELECT.
    IF sy-subrc NE 0.
      MESSAGE e999 WITH
              'Enter a Valid Period'(004).
    ENDIF.
ENDIF.
ENDFORM.                    "Validate_Period
*&      Form Validate_QuantityStrType
      text
Form Validate_QuantityStrType.
DATA l_MGTYP TYPE CKMLMV003-MGTYP.
IF NOT p_MGTYP IS INITIAL.
    CLEAR L_MGTYP.
    SELECT SINGLE MGTYP FROM CKMLMV003
      INTO l_MGTYP
      WHERE MGTYP = p_MGTYP .
    IF sy-subrc NE 0.
      MESSAGE e999 WITH
              'Enter a Valid Quantity Structure Type'(005).
    ENDIF.
ENDIF.
ENDFORM.                    "Validate_QuantityStrType
INITIALIZATION of Fields
Class LCL_EVENT_HANDLER DEFINITION.
Public section.
    Methods:
    TOP_OF_PAGE for Event TOP_OF_PAGE OF CL_GUI_ALV_GRID
                            IMPORTING E_DYNDOC_ID.
ENDCLASS.                    "LCL_EVENT_HANDLER DEFINITION
CLASS LCL_EVENT_HANDLER IMPLEMENTATION.
METHOD TOP_OF_PAGE.
Top-of-page event <br />
PERFORM EVENT_TOP_OF_PAGE USING G_DYNDOC_ID.
ENDMETHOD.                            "top_of_page
ENDCLASS.       "LCL_EVENT_HANDLER IMPLEMENTATION
Data : G_HANDLER TYPE REF TO LCL_EVENT_HANDLER.
Initialization.
v_repid = sy-repid.
Start-of-Selection.
Perform get_CKMLMV003.
Perform get_CKMLMV001.
Perform Get_Finaldata.
Perform Layout_FieldCatalog.
call screen '101'.
Perform ALVGrid_Final_Display.
*&      Form Layout_FieldCatalog
      text
Form Layout_FieldCatalog.
s_fieldcatalog-col_pos = 1.
s_fieldcatalog-fieldname = 'MATNR'.
s_fieldcatalog-tabname = 'I_FINAL_OUT1'.
s_fieldcatalog-seltext_l = Text-024.
append s_fieldcatalog to t_fieldcatalog.
clear s_fieldcatalog.
s_fieldcatalog-col_pos = 2.
s_fieldcatalog-fieldname = 'GJAHR'.
s_fieldcatalog-tabname = 'I_FINAL_OUT1'.
s_fieldcatalog-seltext_l = Text-012.
append s_fieldcatalog to t_fieldcatalog.
clear s_fieldcatalog.
s_fieldcatalog-col_pos = 3.
s_fieldcatalog-fieldname = 'PERIO'.
s_fieldcatalog-tabname = 'I_FINAL_OUT1'.
s_fieldcatalog-seltext_l = Text-013.
append s_fieldcatalog to t_fieldcatalog.
clear s_fieldcatalog.
s_fieldcatalog-col_pos = 4.
s_fieldcatalog-fieldname = 'WERKS'.
s_fieldcatalog-tabname = 'I_FINAL_OUT1'.
s_fieldcatalog-seltext_l = Text-025.
append s_fieldcatalog to t_fieldcatalog.
clear s_fieldcatalog.
s_fieldcatalog-col_pos = 5.
s_fieldcatalog-fieldname = 'LIFNR_ND1'.
s_fieldcatalog-tabname = 'I_FINAL_OUT1'.
s_fieldcatalog-seltext_l = Text-014.
append s_fieldcatalog to t_fieldcatalog.
clear s_fieldcatalog.
s_fieldcatalog-col_pos = 6.
s_fieldcatalog-fieldname = 'MISCH_VERH1'.
s_fieldcatalog-tabname = 'I_FINAL_OUT1'.
s_fieldcatalog-seltext_l = Text-015.
append s_fieldcatalog to t_fieldcatalog.
clear s_fieldcatalog.
s_fieldcatalog-col_pos = 7.
s_fieldcatalog-fieldname = 'LIFNR_ND2'.
s_fieldcatalog-tabname = 'I_FINAL_OUT1'.
s_fieldcatalog-seltext_l = Text-016.
append s_fieldcatalog to t_fieldcatalog.
clear s_fieldcatalog.
s_fieldcatalog-col_pos = 8.
s_fieldcatalog-fieldname = 'MISCH_VERH2'.
s_fieldcatalog-tabname = 'I_FINAL_OUT1'.
s_fieldcatalog-seltext_l = Text-017.
append s_fieldcatalog to t_fieldcatalog.
clear s_fieldcatalog.
s_fieldcatalog-col_pos = 9.
s_fieldcatalog-fieldname = 'LIFNR_ND3'.
s_fieldcatalog-tabname = 'I_FINAL_OUT1'.
s_fieldcatalog-seltext_l = Text-018.
append s_fieldcatalog to t_fieldcatalog.
clear s_fieldcatalog.
s_fieldcatalog-col_pos = 10.
s_fieldcatalog-fieldname = 'MISCH_VERH3'.
s_fieldcatalog-tabname = 'I_FINAL_OUT1'.
s_fieldcatalog-seltext_l = Text-019.
append s_fieldcatalog to t_fieldcatalog.
clear s_fieldcatalog.
s_fieldcatalog-col_pos = 11.
s_fieldcatalog-fieldname = 'LIFNR_ND4'.
s_fieldcatalog-tabname = 'I_FINAL_OUT1'.
s_fieldcatalog-seltext_l = Text-020.
append s_fieldcatalog to t_fieldcatalog.
clear s_fieldcatalog.
s_fieldcatalog-col_pos = 12.
s_fieldcatalog-fieldname = 'MISCH_VERH4'.
s_fieldcatalog-tabname = 'I_FINAL_OUT1'.
s_fieldcatalog-seltext_l = Text-021.
append s_fieldcatalog to t_fieldcatalog.
clear s_fieldcatalog.
s_fieldcatalog-col_pos = 13.
s_fieldcatalog-fieldname = 'LIFNR_ND5'.
s_fieldcatalog-tabname = 'I_FINAL_OUT1'.
s_fieldcatalog-seltext_l = Text-022.
append s_fieldcatalog to t_fieldcatalog.
clear s_fieldcatalog.
s_fieldcatalog-col_pos = 14.
s_fieldcatalog-fieldname = 'MISCH_VERH5'.
s_fieldcatalog-tabname = 'I_FINAL_OUT1'.
s_fieldcatalog-seltext_l = Text-023.
append s_fieldcatalog to t_fieldcatalog.
clear s_fieldcatalog.
if g_cnt6 <> '0'.
    s_fieldcatalog-col_pos = 14.
    s_fieldcatalog-fieldname = 'LIFNR_ND6'.
    s_fieldcatalog-tabname = 'I_FINAL_OUT1'.
   s_fieldcatalog-NO_OUT = 'X'.
    s_fieldcatalog-seltext_l = Text-022.
    append s_fieldcatalog to t_fieldcatalog.
    clear s_fieldcatalog.
    s_fieldcatalog-col_pos = 15.
    s_fieldcatalog-fieldname = 'MISCH_VERH6'.
    s_fieldcatalog-tabname = 'I_FINAL_OUT1'.
   s_fieldcatalog-NO_OUT = 'X'.
    s_fieldcatalog-seltext_l = Text-023.
    append s_fieldcatalog to t_fieldcatalog.
    clear s_fieldcatalog.
ENDIF.
if g_cnt7 <> '0'.
    s_fieldcatalog-col_pos = 16.
    s_fieldcatalog-fieldname = 'LIFNR_ND7'.
    s_fieldcatalog-tabname = 'I_FINAL_OUT1'.
   s_fieldcatalog-NO_OUT = 'X'.
    s_fieldcatalog-seltext_l = Text-022.
    append s_fieldcatalog to t_fieldcatalog.
    clear s_fieldcatalog.
    s_fieldcatalog-col_pos = 17.
    s_fieldcatalog-fieldname = 'MISCH_VERH7'.
    s_fieldcatalog-tabname = 'I_FINAL_OUT1'.
   s_fieldcatalog-NO_OUT = 'X'.
    s_fieldcatalog-seltext_l = Text-023.
    append s_fieldcatalog to t_fieldcatalog.
    clear s_fieldcatalog.
ENDIF.
if g_cnt8 <> '0'.
    s_fieldcatalog-col_pos = 18.
    s_fieldcatalog-fieldname = 'LIFNR_ND8'.
    s_fieldcatalog-tabname = 'I_FINAL_OUT1'.
   s_fieldcatalog-NO_OUT = 'X'.
    s_fieldcatalog-seltext_l = Text-022.
    append s_fieldcatalog to t_fieldcatalog.
    clear s_fieldcatalog.
    s_fieldcatalog-col_pos = 19.
    s_fieldcatalog-fieldname = 'MISCH_VERH8'.
    s_fieldcatalog-tabname = 'I_FINAL_OUT1'.
   s_fieldcatalog-NO_OUT = 'X'.
    s_fieldcatalog-seltext_l = Text-023.
    append s_fieldcatalog to t_fieldcatalog.
    clear s_fieldcatalog.
ENDIF.
if g_cnt9 <> '0'.
    s_fieldcatalog-col_pos = 20.
    s_fieldcatalog-fieldname = 'LIFNR_ND9'.
    s_fieldcatalog-tabname = 'I_FINAL_OUT1'.
   s_fieldcatalog-NO_OUT = 'X'.
    s_fieldcatalog-seltext_l = Text-022.
    append s_fieldcatalog to t_fieldcatalog.
    clear s_fieldcatalog.
    s_fieldcatalog-col_pos = 21.
    s_fieldcatalog-fieldname = 'MISCH_VERH9'.
    s_fieldcatalog-tabname = 'I_FINAL_OUT1'.
   s_fieldcatalog-NO_OUT = 'X'.
    s_fieldcatalog-seltext_l = Text-023.
    append s_fieldcatalog to t_fieldcatalog.
    clear s_fieldcatalog.
ENDIF.
if g_cnt10 <> '0'.
    s_fieldcatalog-col_pos = 22.
    s_fieldcatalog-fieldname = 'LIFNR_ND10'.
    s_fieldcatalog-tabname = 'I_FINAL_OUT1'.
   s_fieldcatalog-NO_OUT = 'X'.
    s_fieldcatalog-seltext_l = Text-022.
    append s_fieldcatalog to t_fieldcatalog.
    clear s_fieldcatalog.
    s_fieldcatalog-col_pos = 23.
    s_fieldcatalog-fieldname = 'MISCH_VERH10'.
    s_fieldcatalog-tabname = 'I_FINAL_OUT1'.
   s_fieldcatalog-NO_OUT = 'X'.
    s_fieldcatalog-seltext_l = Text-023.
    append s_fieldcatalog to t_fieldcatalog.
    clear s_fieldcatalog.
ENDIF.
if g_cnt11 <> '0'.
    s_fieldcatalog-col_pos = 24.
    s_fieldcatalog-fieldname = 'LIFNR_ND11'.
    s_fieldcatalog-tabname = 'I_FINAL_OUT1'.
   s_fieldcatalog-NO_OUT = 'X'.
    s_fieldcatalog-seltext_l = Text-022.
    append s_fieldcatalog to t_fieldcatalog.
    clear s_fieldcatalog.
    s_fieldcatalog-col_pos = 25.
    s_fieldcatalog-fieldname = 'MISCH_VERH11'.
    s_fieldcatalog-tabname = 'I_FINAL_OUT1'.
   s_fieldcatalog-NO_OUT = 'X'.
    s_fieldcatalog-seltext_l = Text-023.
    append s_fieldcatalog to t_fieldcatalog.
    clear s_fieldcatalog.
ENDIF.
if g_cnt12 <> '0'.
    s_fieldcatalog-col_pos = 26.
    s_fieldcatalog-fieldname = 'LIFNR_ND12'.
    s_fieldcatalog-tabname = 'I_FINAL_OUT1'.
   s_fieldcatalog-NO_OUT = 'X'.
    s_fieldcatalog-seltext_l = Text-022.
    append s_fieldcatalog to t_fieldcatalog.
    clear s_fieldcatalog.
    s_fieldcatalog-col_pos = 27.
    s_fieldcatalog-fieldname = 'MISCH_VERH12'.
    s_fieldcatalog-tabname = 'I_FINAL_OUT1'.
   s_fieldcatalog-NO_OUT = 'X'.
    s_fieldcatalog-seltext_l = Text-023.
    append s_fieldcatalog to t_fieldcatalog.
    clear s_fieldcatalog.
ENDIF.
if g_cnt13 <> '0'.
    s_fieldcatalog-col_pos = 29.
    s_fieldcatalog-fieldname = 'LIFNR_ND13'.
    s_fieldcatalog-tabname = 'I_FINAL_OUT1'.
   s_fieldcatalog-NO_OUT = 'X'.
    s_fieldcatalog-seltext_l = Text-022.
    append s_fieldcatalog to t_fieldcatalog.
    clear s_fieldcatalog.
    s_fieldcatalog-col_pos = 30.
    s_fieldcatalog-fieldname = 'MISCH_VERH13'.
    s_fieldcatalog-tabname = 'I_FINAL_OUT1'.
   s_fieldcatalog-NO_OUT = 'X'.
    s_fieldcatalog-seltext_l = Text-023.
    append s_fieldcatalog to t_fieldcatalog.
    clear s_fieldcatalog.
ENDIF.
ENDFORM.                    "Layout_FieldCatalog
*&      Form get_CKMLMV003
      text
Form get_CKMLMV003.
Select WERKS
         MATNR
         MISCH_VERH
         KALNR_BAL
         GJAHR
         PERIO
         MGTYP
         from CKMLMV003
         into table i_CKMLMV003_out
         Where ( MATNR in s_MATNR and
                 WERKS in s_WERKS and
                 GJAHR in s_GJAHR and
                 PERIO in s_PERIO and
                 MGTYP = p_MGTYP ).
Sort i_CKMLMV003_out by MATNR KALNR_BAL.
ENDFORM.                    "get_CKMLMV003
*&      Form get_CKMLMV001
      text
Form get_CKMLMV001.
If Not i_CKMLMV003_out is Initial.
    Select MATNR
           KALNR
           LIFNR_ND
           EKORG_ND
           from CKMLMV001
           into Table i_CKMLMV001_out
           for all entries in i_CKMLMV003_out
           Where ( KALNR = i_CKMLMV003_out-KALNR_BAL
                  and WERKS = i_CKMLMV003_out-WERKS
                  and MATNR = i_CKMLMV003_out-MATNR ).
    sort i_CKMLMV001_out by MATNR KALNR.
ENDIF.
ENDFORM.                    "get_CKMLMV001
*&      Form Get_Finaldata
      text
Form Get_Finaldata.
Loop at i_CKMLMV001_out into i_CKMLMV001_str.
    Loop at i_CKMLMV003_out into i_CKMLMV003_str.
      If ( i_CKMLMV001_str-KALNR = i_CKMLMV003_str-KALNR_BAL and i_CKMLMV003_str-MATNR = i_CKMLMV001_str-MATNR ) .
        If ( flag = 0 ).
          g_plant = i_CKMLMV003_str-WERKS.
          g_PurchOrg = i_CKMLMV001_str-EKORG_ND.
          g_quantstr = i_CKMLMV003_str-MGTYP.
          flag = 1.
        ENDIF.
        Move i_CKMLMV003_str-MATNR to i_Final_str-MATNR.
        Move i_CKMLMV003_str-WERKS to i_Final_str-WERKS.
        Move i_CKMLMV003_str-GJAHR to i_Final_str-GJAHR.
        Move i_CKMLMV003_str-PERIO to i_Final_str-PERIO.
        Move i_CKMLMV003_str-MISCH_VERH to i_Final_str-MISCH_VERH1.
        Move i_CKMLMV001_str-LIFNR_ND to i_Final_str-LIFNR_ND1.
       Move-Corresponding i_CKMLMV003_str to i_CKMLMV003_temp.
        Append i_Final_str to i_Final_out.
        Clear : i_CKMLMV003_str   .
      ENDIF.
    ENDLOOP.
    Clear : i_CKMLMV001_str , i_Final_str , i_CKMLMV003_temp.
ENDLOOP.
Sort i_Final_out by WERKS MATNR GJAHR PERIO .
Loop at i_Final_out into i_Final_str.
    if i_Final_str-MATNR = i_Final_str1-MATNR and i_Final_str-GJAHR = i_Final_str1-GJAHR and i_Final_str-PERIO = i_Final_str1-PERIO and i_Final_str-WERKS = i_Final_str1-WERKS.
      cnt = cnt + 1.
      Case cnt.
        When 2.
          Move i_Final_str-MISCH_VERH1 to i_Final_str1-MISCH_VERH2.
          Move i_Final_str-LIFNR_ND1 to i_Final_str1-LIFNR_ND2.
        When 3.
          Move i_Final_str-MISCH_VERH1 to i_Final_str1-MISCH_VERH3.
          Move i_Final_str-LIFNR_ND1 to i_Final_str1-LIFNR_ND3.
        When 4.
          Move i_Final_str-MISCH_VERH1 to i_Final_str1-MISCH_VERH4.
          Move i_Final_str-LIFNR_ND1 to i_Final_str1-LIFNR_ND4.
        When 5.
          Move i_Final_str-MISCH_VERH1 to i_Final_str1-MISCH_VERH5.
          Move i_Final_str-LIFNR_ND1 to i_Final_str1-LIFNR_ND5.
        When 6.
          Move i_Final_str-MISCH_VERH1 to i_Final_str1-MISCH_VERH6.
          Move i_Final_str-LIFNR_ND1 to i_Final_str1-LIFNR_ND6.
          g_cnt6 = 1.
        When 7.
          Move i_Final_str-MISCH_VERH1 to i_Final_str1-MISCH_VERH7.
          Move i_Final_str-LIFNR_ND1 to i_Final_str1-LIFNR_ND7.
          g_cnt7 = 1.
        When 8.
          Move i_Final_str-MISCH_VERH1 to i_Final_str1-MISCH_VERH8.
          Move i_Final_str-LIFNR_ND1 to i_Final_str1-LIFNR_ND8.
          g_cnt8 = 1.
        When 9.
          Move i_Final_str-MISCH_VERH1 to i_Final_str1-MISCH_VERH9.
          Move i_Final_str-LIFNR_ND1 to i_Final_str1-LIFNR_ND9.
          g_cnt9 = 1.
        When 10.
          Move i_Final_str-MISCH_VERH1 to i_Final_str1-MISCH_VERH10.
          Move i_Final_str-LIFNR_ND1 to i_Final_str1-LIFNR_ND10.
          g_cnt10 = 1.
        When 11.
          Move i_Final_str-MISCH_VERH1 to i_Final_str1-MISCH_VERH11.
          Move i_Final_str-LIFNR_ND1 to i_Final_str1-LIFNR_ND11.
          g_cnt11 = 1.
        When 12.
          Move i_Final_str-MISCH_VERH1 to i_Final_str1-MISCH_VERH12.
          Move i_Final_str-LIFNR_ND1 to i_Final_str1-LIFNR_ND12.
          g_cnt12 = 1.
        When 13.
          Move i_Final_str-MISCH_VERH1 to i_Final_str1-MISCH_VERH13.
          Move i_Final_str-LIFNR_ND1 to i_Final_str1-LIFNR_ND13.
          g_cnt13 = 1.
      ENDCASE.
    ELSE.
      if cnt GE 1 .
        append i_Final_str1 to i_Final_out1.
        Clear : i_Final_str1.
      ENDIF.
      Move-Corresponding i_Final_str to i_Final_str1.
      cnt = 0.
      cnt = cnt + 1.
    ENDIF.
    Clear : i_Final_str.
Endloop.
append i_Final_str1 to i_Final_out1.
   if i_Final_str-MATNR = i_Final_str1-MATNR and i_Final_str-GJAHR = i_Final_str1-GJAHR and i_Final_str-PERIO = i_Final_str1-PERIO .
     cnt = cnt + 1.
     Case cnt.
       When 2.
         Move i_Final_str-MISCH_VERH1 to i_Final_str1-MISCH_VERH2.
         Move i_Final_str-LIFNR_ND1 to i_Final_str1-LIFNR_ND2.
       When 3.
         Move i_Final_str-MISCH_VERH1 to i_Final_str1-MISCH_VERH3.
         Move i_Final_str-LIFNR_ND1 to i_Final_str1-LIFNR_ND3.
       When 4.
         Move i_Final_str-MISCH_VERH1 to i_Final_str1-MISCH_VERH4.
         Move i_Final_str-LIFNR_ND1 to i_Final_str1-LIFNR_ND4.
       When 5.
         Move i_Final_str-MISCH_VERH1 to i_Final_str1-MISCH_VERH5.
         Move i_Final_str-LIFNR_ND1 to i_Final_str1-LIFNR_ND5.
     ENDCASE.
**Move-Corresponding i_Final_str to i_Final_str1.
   ELSE.
     if cnt GE 1 .
       append i_Final_str1 to i_Final_out1.
       Clear : i_Final_str1.
     ENDIF.
     Move-Corresponding i_Final_str to i_Final_str1.
     cnt = 0.
     cnt = cnt + 1.
   ENDIF.
   Clear : i_Final_str.
Endloop.
append i_Final_str1 to i_Final_out1.
ENDFORM.                    "Get_Finaldata
*&      Form top_of_page
      text
Form top_of_page.
clear t_header.
refresh t_header.
i_header_str-typ = 'H'.
I_header_Str-info = Text-035.
append I_header_str to t_header.
clear I_header_str.
Date
I_header_str-typ = 'S'.
I_header_str-key = Text-036.
CONCATENATE sy-datum+6(2) '.'
sy-datum+4(2) '.'
sy-datum(4) INTO I_header_str-info. "todays date
append I_header_str to t_header.
clear: I_header_str.
i_header_str-typ = 'S'.
I_header_Str-Key = 'Quantity Structure Type :'.
I_header_Str-info = g_QuantStr.
append I_header_str to t_header.
clear I_header_str.
i_header_str-typ = 'S'.
I_header_Str-Key = 'Purchase Org :'.
I_header_Str-info = g_PurchOrg.
append I_header_str to t_header.
clear I_header_str.
i_header_str-typ = 'S'.
I_header_Str-Key = 'Plant :'.
I_header_Str-info = g_Plant.
append I_header_str to t_header.
clear I_header_str.
CLEAR i_line_event_str.
i_line_event_str-name = 'TOP_OF_PAGE'.
APPEND i_line_event_str TO i_events.
call function 'REUSE_ALV_COMMENTARY_WRITE'
    EXPORTING
      it_list_commentary = t_header.
i_logo = 'Z_LOGO'.
ENDFORM.                    "top_of_page
*&      ALVGrid_Final_Display
Form ALVGrid_Final_Display.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
      i_callback_program     = v_repid
       i_DEFAULt              = c_valx
      i_callback_top_of_page = 'TOP_OF_PAGE'
       i_Save                 = c_valx
      it_fieldcat            = t_fieldcatalog
       it_sort                = t_sort
      it_events              = I_events
    TABLES
      t_outtab               = i_final_out1.
ENDFORM.                    "ALVGrid_Final_Display
*&      Form ALVGRID_OO_Display
      text
Form ALVGRID_OO_Display.
i_FCAT_str-col_pos = 1.
i_FCAT_str-fieldname = 'MATNR'.
i_FCAT_str-tabname = 'I_FINAL_OUT1'.
i_fcat_str-seltext = 'MATERIAL'.
i_fcat_str-scrtext_m = Text-024.
append i_FCAT_str to i_FCAT.
clear i_FCAT_str.
i_FCAT_str-col_pos = 2.
i_FCAT_str-fieldname = 'GJAHR'.
i_FCAT_str-tabname = 'I_FINAL_OUT1'.
i_fcat_str-scrtext_m = Text-012.
append i_FCAT_str to i_FCAT.
clear i_FCAT_str.
i_FCAT_str-col_pos = 3.
i_FCAT_str-fieldname = 'PERIO'.
i_FCAT_str-tabname = 'I_FINAL_OUT1'.
i_fcat_str-scrtext_m = Text-013.
append i_FCAT_str to i_FCAT.
clear i_FCAT_str.
i_FCAT_str-col_pos = 4.
i_FCAT_str-fieldname = 'WERKS'.
i_FCAT_str-tabname = 'I_FINAL_OUT1'.
i_FCAT_str-scrtext_m = Text-025.
append i_FCAT_str to i_FCAT.
clear i_FCAT_str.
i_FCAT_str-col_pos = 5.
i_FCAT_str-fieldname = 'LIFNR_ND1'.
i_FCAT_str-tabname = 'I_FINAL_OUT1'.
i_fcat_str-scrtext_m = Text-014.
append i_FCAT_str to i_FCAT.
clear i_FCAT_str.
i_FCAT_str-col_pos = 6.
i_FCAT_str-fieldname = 'MISCH_VERH1'.
i_FCAT_str-tabname = 'I_FINAL_OUT1'.
i_FCAT_str-scrtext_m = Text-015.
append i_FCAT_str to i_FCAT.
clear i_FCAT_str.
i_FCAT_str-col_pos = 7.
i_FCAT_str-fieldname = 'LIFNR_ND2'.
i_FCAT_str-tabname = 'I_FINAL_OUT1'.
i_FCAT_str-scrtext_m = Text-016.
append i_FCAT_str to i_FCAT.
clear i_FCAT_str.
i_FCAT_str-col_pos = 8.
i_FCAT_str-fieldname = 'MISCH_VERH2'.
i_FCAT_str-tabname = 'I_FINAL_OUT1'.
i_FCAT_str-scrtext_m = Text-017.
append i_FCAT_str to i_FCAT.
clear i_FCAT_str.
i_FCAT_str-col_pos = 9.
i_FCAT_str-fieldname = 'LIFNR_ND3'.
i_FCAT_str-tabname = 'I_FINAL_OUT1'.
i_FCAT_str-scrtext_m = Text-018.
append i_FCAT_str to i_FCAT.
clear i_FCAT_str.
i_FCAT_str-col_pos = 10.
i_FCAT_str-fieldname = 'MISCH_VERH3'.
i_FCAT_str-tabname = 'I_FINAL_OUT1'.
i_FCAT_str-scrtext_m = Text-019.
append i_FCAT_str to i_FCAT.
clear i_FCAT_str.
i_FCAT_str-col_pos = 11.
i_FCAT_str-fieldname = 'LIFNR_ND4'.
i_FCAT_str-tabname = 'I_FINAL_OUT1'.
i_FCAT_str-scrtext_m = Text-020.
append i_FCAT_str to i_FCAT.
clear i_FCAT_str.
i_FCAT_str-col_pos = 12.
i_FCAT_str-fieldname = 'MISCH_VERH4'.
i_FCAT_str-tabname = 'I_FINAL_OUT1'.
i_FCAT_str-scrtext_m = Text-021.
append i_FCAT_str to i_FCAT.
clear i_FCAT_str.
i_FCAT_str-col_pos = 13.
i_FCAT_str-fieldname = 'LIFNR_ND5'.
i_FCAT_str-tabname = 'I_FINAL_OUT1'.
i_FCAT_str-scrtext_m = Text-022.
append i_FCAT_str to i_FCAT.
clear i_FCAT_str.
i_FCAT_str-col_pos = 14.
i_FCAT_str-fieldname = 'MISCH_VERH5'.
i_FCAT_str-tabname = 'I_FINAL_OUT1'.
i_FCAT_str-scrtext_m = Text-023.
append i_FCAT_str to i_FCAT.
clear i_FCAT_str.
   if g_cnt6 <> '0'.
    i_FCAT_str-col_pos = 15.
    i_FCAT_str-fieldname = 'LIFNR_ND6'.
    i_FCAT_str-tabname = 'I_FINAL_OUT1'.
   s_fieldcatalog-NO_OUT = 'X'.
    i_FCAT_str-scrtext_m = Text-022.
    append i_FCAT_str to i_FCAT.
    clear i_FCAT_str.
    i_FCAT_str-col_pos = 16.
    i_FCAT_str-fieldname = 'MISCH_VERH6'.
    i_FCAT_str-tabname = 'I_FINAL_OUT1'.
   s_fieldcatalog-NO_OUT = 'X'.
    i_FCAT_str-scrtext_m = Text-023.
    append i_FCAT_str to i_FCAT.
    clear i_FCAT_str.
ENDIF.
*if not grid1 is Initial.
If sy-SUBRC = 0.
Call Method grid1->set_table_for_first_display
    CHANGING
      it_outtab                     = i_final_out1[]
      it_fieldcatalog               = I_FCAT
    EXCEPTIONS
      Invalid_parameter_combination = 1
      program_error                 = 2
      too_many_lines                = 3
      Others                        = 4.
If sy-subrc <> 0.
ENDIF.
CALL METHOD G_DYNDOC_ID->INITIALIZE_DOCUMENT
    EXPORTING
    BACKGROUND_COLOR = CL_DD_AREA=>COL_TEXTAREA.
Processing events <br />
CALL METHOD GRID1->LIST_PROCESSING_EVENTS
    EXPORTING
    I_EVENT_NAME = 'TOP_OF_PAGE'
    I_DYNDOC_ID = G_DYNDOC_ID.
Call Method grid2->set_table_for_first_display
   CHANGING
     it_outtab                     = i_final_out1[]
     it_fieldcatalog               = I_FCAT
   EXCEPTIONS
     Invalid_parameter_combination = 1
     program_error                 = 2
     too_many_lines                = 3
     Others                        = 4.
If sy-subrc <> 0.
ENDIF.
   ENDIF.
ENDIF.
Endform.                    "ALVGRID_OO_Display
Form EVENT_TOP_OF_PAGE using DG_DYNDOC_ID
                      TYPE REF TO CL_DD_DOCUMENT.
DATA : DL_TEXT(255) TYPE C.
CALL METHOD DG_DYNDOC_ID->ADD_TEXT
    EXPORTING
    TEXT = 'Flight Details'
    SAP_STYLE = CL_DD_AREA=>HEADING
    SAP_FONTSIZE = CL_DD_AREA=>LARGE
    SAP_COLOR = CL_DD_AREA=>LIST_HEADING_INT.
Endform.
*&      Module STATUS_0101 OUTPUT
      text
MODULE STATUS_0101 OUTPUT.
SET PF-STATUS 'xxxxxxxx'.
SET TITLEBAR 'xxx'.
SET PF-STATUS 'STATUS'.
SET TITLEBAR 'TITLE'.
Create Object G_DYNDOC_ID
        EXPORTING STYLE = 'ALV_GRID'.
if g_custom_container1 is initial .
    create object g_custom_container1
        Exporting
            Container_name = CCCONTAINER1
        Exceptions
            cntl_error = 1
            cntl_system_error = 2
            create_error = 3
            lifetime_error = 4
            Others = 5.
   Create Object G_SPLITTER
          Exporting PARENT = g_custom_container1.
CALL METHOD G_SPLITTER->GET_CONTAINER
    EXPORTING
    ROW = 1
    COLUMN = 1
    RECEIVING
    CONTAINER = G_PARENT_TOP.
*Assigning the Part 2 to GRID
CALL METHOD G_SPLITTER->GET_CONTAINER
    EXPORTING
    ROW = 2
    COLUMN = 1
    RECEIVING
    CONTAINER = g_parent_grid.

Hi,
Check if any event is triggered from the event handler class, upon selection.
Usually, the events are handled on double click or on hotspot etc.
Regards,
Satish Kanteti

Error in adding attachment to the workitem. load:class Query.class not foun

Hi,
We are using WebGui to access the Business Workplace(SBWP transaction) through Portal. For any work item, when i try to import a file from the local PC, i get a screen with the header -"Enter Some FIle attributes". Text displayed in the screen is "Please wait. You will be forwarded automatically. This page had to be included for techincal reasons". And i am struck in that screen. I believe a java popup winddow should come up at this point to select the PC File but it never happened. The screen also has a status message "
Loading Java applet failed. Applet Query.class not inited ".
WHen i look at the java console, i find the following error trace. Please let me know if anybody experienced this problem before and how to fix it. Thanks for the help.
Trace ---
load: class Query.class not found.
java.lang.ClassNotFoundException: Query.class
     at sun.applet.AppletClassLoader.findClass(Unknown Source)
     at java.lang.ClassLoader.loadClass(Unknown Source)
     at sun.applet.AppletClassLoader.loadClass(Unknown Source)
     at java.lang.ClassLoader.loadClass(Unknown Source)
     at sun.applet.AppletClassLoader.loadCode(Unknown Source)
     at sun.applet.AppletPanel.createApplet(Unknown Source)
     at sun.plugin.AppletViewer.createApplet(Unknown Source)
     at sun.applet.AppletPanel.runLoader(Unknown Source)
     at sun.applet.AppletPanel.run(Unknown Source)
     at java.lang.Thread.run(Unknown Source)
Caused by: java.io.IOException: open HTTP connection failed.
     at sun.applet.AppletClassLoader.getBytes(Unknown Source)
     at sun.applet.AppletClassLoader.access$100(Unknown Source)
     at sun.applet.AppletClassLoader$1.run(Unknown Source)
     at java.security.AccessController.doPrivileged(Native Method)
     ... 10 more
Regards
hari

Hi all,
I have encountered same problem in ITS 6.20.
Query.class is packed in ws.jar which is stored at C:\Inetpub\wwwroot\<SID>\sap\its\mimes\webgui\99\applets and C:\Inetpub\wwwroot\<SID>\sap\its\mimes\webgui\2002\applets in ITS server.
I increased the trace level to 3 in the Java console to inevestigate the problem further.
== Java console (Trace level 3 ) ===
network: cache entry not found URL: https://hostname.domain.co.jp:443/sap/its/mimes/webgui/2002/applets/ws.jar、version: null
network: Connect to https://hostname.domain.co.jp:443/sap/its/mimes/webgui/2002/applets/ws.jar (Proxy=DIRECT)
network: Connect to http://hostname.domain.co.jp:443/ (Proxy=DIRECT)
java.net.ConnectException: Connection refused: connect
load: class Query.class not found.
java.lang.ClassNotFoundException: Query.class
==========================
Then I found out that when system tried to load class Qery.class the connection to ITS was refused becase the incorrect protocol ( https ) was chosen. In my case, SSL was not setup, therefore protocol must be http.
I activated http by changing the configuration file for WGate in C:\Program Files\SAP\ITS\6.20\config\ ItsRegistryWGATE.xml
After that, I restarted the WGate by accessing to http://hoostname.domain.co.jp:port/scripts/wgate/wgate-restart to activate the configuration.
And also I restarted the AGate by restarting the Windows Service "SAP ITS Manager - <SID>".
Anyway, the html (BHTML) file that displays the message below is stored at C:\Program Files\SAP\ITS\620\templates\system\dm\itsdoc.html
"Please Wait. You will be forwarded automatically"
"This page has been loaded due to technical Reasons"
Best regards,
Akira

Error in adding Function to the role

Similar Messages

Maybe you are looking for