Z-Transaction Search

Hi,
How to seach Z Transactions in my Client , SE93 ?
Please let me know
Thx,
Paartha

Thank you,
points assigned

Similar Messages

Business Transaction Search for Inbox In SPRO

Hi,
I am creating my own Index Table for Transaction Search in SPRO to optimize the search performance. This will be used in icweb client Inbox Search.
I will remain all standard search fields and some customizing ID fields.
In the SPRO, I would like to add all fields into the Flat Structure.
For example: to add standard search field "Category", I can get it from "CRMT_ORDERADM_H_IX" - "PROCESS_TYPE".
But for some standard fields such as "Account", "Responsible Employee", "Time Period" and "Assigned To", I could not find the right field.
Does anybody know about this? Deep appreciation for that.
Thanks in advance.
br,
ginnie

Hi,
These different searches refers to the organization assignments and the partner functions assigned to the transaction (Service Ticket). Like for ME the system will look for all the tickets in which employee responsible is assigned as your BP.
Similarly for My Team ,My Group and My resp group will look for the Org model in CRM and display the results accordingly.
In the result list if you want to display the Service Employee Group Column then goto the Personalize button and make that column as Display.
Regards,
PP

Personalize Status Profile for transaction search

Hi Experts,
I have one requirement in PCUI i.e. can we personalize our Status profile for specific transaction in transaction search ??
when we search any transaction from PCUI screen status wise we are getting all the statuses for same object category(All status for service orders) this create confusion for users, to restrict that can we create personalized status search, when user select particular transaction type he will able to see only status under that transaction not all.
can we achieve this through user object if yes then which object to use ?
Please help me to resolve the same.
Thanks,
Vivan.

Hello Vivan,
Are on using PCUI application in CRM 5.0, Please have a look at the section 5.1.7 Status Management in PCUI cookbook
which is available in SMP. This section talks about the status management in Trasaction search.
Hope this helps.
Thanks & Regards,
Bhavya

Transaction search differentiation based on scenarios

Hi Experts,
I have configured two scenarios in my B2B application. Based on the scenario, I want to display a different set of search criteria altogether in the left hand 'transaction search' when a user login to the application.
Due to number of properties I have in my scenarios, I dont want to touch genericsearch.jsp.
Is there any way just by modifying Generic-searchbackend-config.xml file itself, this can be achieved like adding a separate proprety group for 2 scenarios.
Any inputs would be highle appreciated.
Thanks in advance,
Kris.

Hi Kris,
I have not tried but it will work for your requirement.
Go to your XCM setting. Open Component --> Customer --> Shop
Under Shop Component you create 2 different Shop component.
Suppose for scenario SC1 you want to use SearchCriteria_B2B_Sales and for scenario SC2 you want to use your custom search criteria SearchCriteria_B2B_Sales_1 which you have added in genericsearch-backend-config.xml file.
Create 2 different Shop component under Customer section like shop1 and shop2 by giving different search criteria to each in parameter documentsearch.name: in shop component.
Now go to your Application configuration SC1 and select shop1 in shopdata drop down box and in SC2 select shop2 in shopdata drop down box.
Save this setting in XCM. Restart your application and then try to login with different scenario you will see appropriate search criteria fields as per your shopdata setting in Application scenario SC1 and SC2.
Please try this and let me know whether it works for you or not.
Let me know if you have any question.
Regards.
eCommerce Developer

CRM Worklist Business Transaction Search

Hi Experts,
I am using CRM Service WebUI 7.0. In CRM Worklist Business Transaction Search there is a Search Criteria u201CPARTNER FUNTIONu201D. If we select this field as search criteria I get to see a list of Partner Functions in the list. Does anyone know how do we configure this Partner Function List. I am not able to find any setting for this in SPRO.
Regards
Namita

HI Namitha
You can configure the same under the following customizing path in SPRO
SPRO->CustomerRelationshipManagment->Basic Functions->Partner Processing.
Every partner function that you define needs to have access sequence. Via the access sequence the system will
determine the partner for that partner functions(based on how you define your access sequence).
Thanks
Abishek

Transactions search in ERP ECO 5.0

Hello gurus
Is there a standard way (via XCM or other) to restrict the search results in B2B shop for quotations only to display quotes of a particular document type such as QT? In standard function, B2B shop is showing results for all quote types that are set up in ECC and have transactions against them in ECC. Ideally we would like the search results to show only the document type for quotes that is maintained in the shop maintenance.
Thanks much
Jai

Hi Jai,
First try to know your search criteria. You can know it by login by giving showmodulename=true go to Transaction Tab here you will see your search criteria name along with file name or if you have define shop component in XCM you can go to your XCM setting page go to Components --> Customer --> shop --> custom_b2b here you can check value in parameter documentsearch.name: this is your Search criteria.
If you are using B2B then it should be SearchCriteria_B2B_Sales
Now for test open generic-searchbackend-config.xml file from \WEB-INF\xcm\sap\modification\ folder.
In this file there are 3 main section depends on your back-end type as below.
1. <configs id="crmdefault">
2. <configs id="r3pidefault">
3. <configs id="r3gridpidefault" >
If you are using CRM as back end use 1 if backend is R3 use 2.
Now search below line of code under relevant section of configs id
<property-group name="SearchCriteria_B2B_Sales"
                            useSearchRequestMemory="true"
                            bodyInclTop="/b2b/order/GScommon_header.inc.jsp"
                            bodyInclBottom="/b2b/order/GScommon_buttons.inc.jsp">
Below above line you will see allowed value entry
<allowedValue value="ORDER"           description="b2b.status.shuffler.key1val2" resultlistName="order_resultlist_B2B" default="true"/>
                    
                    <allowedValue value="QUOTATION"       description="b2b.status.shuffler.key1val1" resultlistName="quot_resultlist_B2B"/>
                    <allowedValue value="ORDERTMP"        description="b2b.status.shuffler.key1val3" resultlistName="ordertmp_resultlist_B2B"/>
                    <allowedValue value="CONTRACT"        description="b2b.status.shuffler.key1val4" resultlistName="contract_resultlist_B2B"/>
                    <allowedValue value="INVOICE"         description="b2b.status.shuffler.key1val5" />
                    <allowedValue value="CREDITMEMO"      description="b2b.status.shuffler.key1val6" />
                    <allowedValue value="DOWNPAYMENT"     description="b2b.status.shuffler.key1val7" />
                    <allowedValue value="AUCTION"         description="b2b.status.shuffler.key1val9" maxHitsToSelect="0"/>

ICSS B2B - Transaction search

Hi Experts,
I am configuring ICSS B2B & B2C scenarios. I am able to create a transaction through B2B user & this is visible in GUI & Web UI also. But when i try to search this transaction on B2B portal, it shows me the result as one hit found but it does not display the contents of search i.e. request type, request date etc..
Similar function is working fine on B2C scenario. There i am able to search for transactions cretaed by B2C user & it is displaying all contents perfectly.
Can somebody help in this regard.
Thanks
Varun

Hi Varun,
Could you check the XCM settings for the component service request.After configuring the component ,you should that user defined component in the Application configuration.
Hope so this will resolve your issue.
Thanks & Regards,
Silpa.T

Define search index for Business transaction search

Hi All,
I need to create index on table crmd_orderadm_h
with index client,process_type,created_at.
Thanks,
Ashish.

Hi Stephen,
Actually what I want to achieve is
First of all go to
SPRO->CRM->ICWC->CustomerSpecificSystemModification->BusinessTransactionSearch->Define Index for Business Txn Search.
Now Here I want to create an index with table CRMD_orderadm_h
on fields:client,process_type and created_at.
Can me tell me how to do it.
thanks in advance,
ashish.

Short dump "Time limit exceeded" when searching for Business Transactions

Hello Experts,
We migrated from SAP CRM 5.2 to SAP CRM 7.0. After migration, our business transaction search (quotation, sales order, service order, contract etc) ends with the short dump "Time limit exceeded" in class CL_CRM_REPORT_ACC_DYNAMIC, method DATABASE_ACCESS. The select query is triggered from line 5 of this method.
Number of Records:
CRMD_ORDERADM_H: 5,115,675
CRMD_ORDER_INDEX: 74,615,914
We have done these so far, but the performance is still either poor or times out.
1. DB team checked the ORACLE parameters and confirmed they are fine. They also checked the health of indices in table CRMD_ORDER_INDEX and indices are healthy
2. Created additional indices on CRMD_ORDERADM_H and CRMD_ORDER_INDEX. After the creation of indices, some of the searches(without any criteria) work. But it takes more than a minute to fetch 1 or 2 records
3. An ST05 trace confirmed that the selection on CRMD_ORDER_INDEX takes the most time. It takes about 103 seconds to fetch 2 records (max hits + 1)
4. If we specify search parameters, say for example a date or status, then again we get a short dump with the message "Time limit exceeded".
5. Observed that only if a matching index is available for the WHERE clause, the results are returned (albeit slowly). In the absence of an index, we get the dump.
6. Searched for notes and there are no notes that could help us.
Any idea what is causing this issue and what we can do to resolve this?
Regards,
Bala

Hi Michael,
Thanks. Yes we considered the note 1527039. None of the three scenarios mentioned in the note helped us. But we ran CRM_INDEX_REBUILD to check if the table CRMD_ORDER_INDEX had a problem. That did not help us either.
The business users told us that they mostly search using the date fields or Object ID. We did not have any problem with search by Object ID. So we created additional indices to support search using the date fields.
Regards,
Bala

How to stop the sap crm search in the middle if it takes more time

Hi,
We are in SAP CRM 7.0 EHP1.
In webui, if we search for any customer, product, contact, transactions and the volume of results list is more, system takes more time to diplay it in results list and till that time wheel spins. If user decides to stop the search, the only option they have is logoff or F5 which will take to new session.
But I came to know in EHP1, options are there to stop the search manually and proceed with other transactions/search in the same session.If any one knows this, pl share the details.
Regards
Suresh

Hello,
This functionality was recently introduced by the following note:
https://service.sap.com/sap/support/notes/2044841
Regards
Joaquin

Role is not showing up in SUIM transaction

All
Z_PT_TRANS_ALL role was created for all
Display access.
When I go to SUIM
Roles -> By Transaction Assignment.
and search for roles this role is not showing up.
However, role does have the transaction in S_TCODE.
Please advise.
From,
PT.

Roles by transaction searches for roles in the menu, not roles in S_TCODE.
Use Roles by authorization values, enter S_TCODE object and the tcode in the field if you want to search for tcodes in S_TCODE.

Adding custom fields on a SC for searching a PO

Hi Friends,
I am working on SRM classic Scenario and I have a requirement for which I need to add custom fields on the shopping cart under "CONFIRM GOODS/SERVICES CENTRALLY" on clicking "EXTENDED SEARCH" we get 16 fields for searching a PO.
The requirement is, user should be able to search a PO using "shopping cart number" and "shopping cart creator".
As I have looked into some of the enhancements include structures and I find this include "INCL_EEW_PD_SEARCH_HDR_CSF_PO" may work.
Can anybody help me in how do I go ahead withthis.
Thanks
Arun

Hi Arun,
From what i understood from your query, you want to add fields on the "CONFIRM GOODS/SERVICES CENTRALLY" transaction search screen.
The fields are 'shopping cart number' and 'shopping cart creator'.
Please go through the following OSS Note:
Note 672960 - User-defined fields 2
I think the structure you should use are:
INCL_EEW_PD_SEARCH_HDR_CSF_CNF
If you have defined document-specific fields on header and/or item level, you also have to define them in structures INCL_EEW_PD_HEADER_CSF (for the fields of the header) and INCL_EEW_PD_ITEM_CSF IF THEY HAVE NOT BEEN DEFINED THERE YET. Consequently, these structures contain the combination of header or item fields of all document-specific fields
You can also use user-defined fields as search criteria. To do this, you have to set fields XINPUT and XDISPLAY to 'X' in table ET_FIELDS for the fields you want to use in BADI BBP_CUF_BADI_2 in method MODIFY_SCREEN. The fields defined this way are displayed if you choose the 'Extended search' link.
Hope this helps,
Thanks,
Pradeep

IH01: Search button not active

Hi PM Gurus,
I am working on technical upgrade from 46C to ECC6. I am facing a problem in IH01, after executing the transaction, search button (binocular) is not active. Can any one suggest me what may be the possible reason & how it has to be activated.
Thanks,
Ashok

Hi Ashok,
I think, IH01 is the transaction code for the selection page ie editing the inputs... (function location structure), there we need not to search anything whereas we need to input the various selections. Thats is the reason sarch button is disabled....
Once u input the data and transact, the buttons wil be activtaed.
In case u are looking for searching something specific, pls do let me knwo.
warm regards,
punam gupta
Pune

Questions about Territory determination in Business transactions in CRM 7.0

Hi All,
We are in the process of configuring territory management in our system. I have a couple of questions regarding Territory determination in Business transactions in CRM 7.0.
1) Territories in business transactinos are determined based on partner function categories: employee and person responsible. If the employee is assigned to multiple territories, which territory is determined for the transaction.
a) Is it the territory for which he is assigned the 'Default territory' flag'?
b) What if the employee does not have any territories with the 'Default territory' set?
2) We have had SAP CRM since the last 6-7 years and recently upgraded to CRM 7.0. When I use the transaction searches in the Web UI using the search parameters 'Territory ID' and 'Territory description' we can't see any old transactions in the search results. We can only see the test transactions that were created after we ran the master data reln. update program CRM_TERRMAN_PROC_REL. Is there another program which updates transactional data relationships similar to the master data one?
Appreciate your inputs.
Regards,
Ramesh Nallabelli

Hi All,
We are in the process of configuring territory management in our system. I have a couple of questions regarding Territory determination in Business transactions in CRM 7.0.
1) Territories in business transactinos are determined based on partner function categories: employee and person responsible. If the employee is assigned to multiple territories, which territory is determined for the transaction.
a) Is it the territory for which he is assigned the 'Default territory' flag'?
b) What if the employee does not have any territories with the 'Default territory' set?
2) We have had SAP CRM since the last 6-7 years and recently upgraded to CRM 7.0. When I use the transaction searches in the Web UI using the search parameters 'Territory ID' and 'Territory description' we can't see any old transactions in the search results. We can only see the test transactions that were created after we ran the master data reln. update program CRM_TERRMAN_PROC_REL. Is there another program which updates transactional data relationships similar to the master data one?
Appreciate your inputs.
Regards,
Ramesh Nallabelli

Analogue Transaction CODE_SCANNER for WD4A

Hi at all,
there exists a transaction "CODE_SCANNER" for searching code within a user defined area (packages ...) in SAP. This transaction searches the strings in programs, function groups and classes, but not in Web Dynpro components or methods in the component controller / views.
Does anybody know a transaction for searching code in Web Dynpro components???
Thanks for all answers.
Dirk

Hi
I've written the prog, searches for texts in webdynpro sources and has code_scanner-like interface.
==========
REPORT z_code_scanner.
TYPE-POOLS: abap, rs, slis, wdyrt.
TABLES: wdy_ctlr_compo_key, rsplf_srv, sscrfields.
CONSTANTS: c_fox          TYPE rsplf_srvtypenm VALUE '0RSPL_FORMULA',
           c_type_wdy     TYPE c VALUE '1',
           c_type_fox     TYPE c VALUE '2'.
TYPES: BEGIN OF lty_comp,
         component        TYPE wdy_component_name,
       END OF lty_comp.
TYPES: BEGIN OF lty_fox,
         srvnm            TYPE rsplf_srvnm,
       END OF lty_fox.
TYPES: BEGIN OF lty_found,
         type                TYPE char1,
         component_name      TYPE wdy_ctlr_compo-component_name,
         controller_name     TYPE wdy_ctlr_compo-controller_name,
         cmpname             TYPE wdy_ctlr_compo-cmpname,
         srvnm               TYPE rsplf_srv-srvnm,
         title               TYPE string,
         line                TYPE string,
         line_num            TYPE i,
       END OF lty_found.
DATA: gt_comp         TYPE TABLE OF lty_comp WITH HEADER LINE,
      gt_fox          TYPE TABLE OF lty_fox WITH HEADER LINE,
      gt_found        TYPE TABLE OF lty_found WITH HEADER LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(23) twdy FOR FIELD s_wdyc.
SELECTION-SCREEN POSITION 30.
SELECT-OPTIONS: s_wdyc          FOR wdy_ctlr_compo_key-component_name.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(23) tfox FOR FIELD s_fox.
SELECTION-SCREEN POSITION 30.
SELECT-OPTIONS: s_fox           FOR rsplf_srv-srvnm.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(23) tstr FOR FIELD p_strg.
SELECTION-SCREEN POSITION 30.
PARAMETERS: p_strg(80).
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(23) twdyp FOR FIELD p_wdyc.
SELECTION-SCREEN POSITION 30.
PARAMETERS: p_wdyc       TYPE char1 AS CHECKBOX DEFAULT 'X'.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(23) tfoxp FOR FIELD p_fox.
SELECTION-SCREEN POSITION 30.
PARAMETERS: p_fox        TYPE char1 AS CHECKBOX DEFAULT 'X'.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN: FUNCTION KEY 1.
* INCLUDE Z79Y_CODE_SCANNER_EX_O01                . " PBO-Modules
* INCLUDE Z79Y_CODE_SCANNER_EX_I01                . " PAI-Modules
* INCLUDE Z79Y_CODE_SCANNER_EX_F01                . " FORM-Routines
INITIALIZATION.
twdy = 'Web-Dynpro-Component'.
tfox = 'Fox Formulas'.
tstr = 'Search string'.
twdyp = 'Search in WebDynpro Components'.
tfoxp = 'Search in Fox Formulas'.
" Set default values
s_wdyc-sign   = 'I'.
s_wdyc-option = 'CP'.
s_wdyc-low    = 'Z*'.
APPEND s_wdyc.
s_fox-sign   = 'I'.
s_fox-option = 'CP'.
s_fox-low    = 'Z*'.
APPEND s_fox.
sscrfields-functxt_01 = 'Запустить code_scanner'.
* CALL FUNCTION 'ICON_CREATE'
*    EXPORTING
*      name                        = 'ICON_DESELECT_ALL'
*      text                        = ''
*      info                        = 'Отменить выделение'
**     ADD_STDINF                  = 'X'
*    IMPORTING
*      RESULT                      = sscrfields-functxt_01
*    EXCEPTIONS
*      icon_not_found              = 1
*      outputfield_too_short       = 2
*      OTHERS                      = 3.
* IF sy-subrc <> 0.
*    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
*            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
* ENDIF.
AT SELECTION-SCREEN.
CASE sscrfields-ucomm.
    WHEN 'FC01'.
      CALL TRANSACTION 'CODE_SCANNER'.
ENDCASE.
START-OF-SELECTION.
PERFORM main.
*&      Form get_data
*       text
* --> p1        text
* <-- p2        text
FORM get_data CHANGING value(c_rc)   TYPE sysubrc.
CLEAR c_rc.
CLEAR: gt_comp, gt_fox, gt_found.
REFRESH: gt_comp[], gt_fox[], gt_found[].
IF p_wdyc = abap_true.
    SELECT DISTINCT component_name
      FROM wdy_component
      INTO TABLE gt_comp                                 "#EC CI_BYPASS
      WHERE component_name IN s_wdyc.                 "#EC CI_SGLSELECT
ENDIF.
IF p_fox = abap_true.
    SELECT DISTINCT srvnm
      FROM rsplf_srv
      INTO TABLE gt_fox
      WHERE srvnm IN s_fox
        AND objvers = rs_c_objvers-active                "#EC CI_BYPASS
        AND srvtypenm = c_fox.                        "#EC CI_SGLSELECT
ENDIF.
IF gt_comp[] IS INITIAL AND gt_fox[] IS INITIAL.
    MESSAGE 'Данные не выбраны' TYPE 'S'.
    c_rc = 1.
ENDIF.
ENDFORM.                    " get_data
*&      Form main
*       text
* --> p1        text
* <-- p2        text
FORM main .
DATA: lv_rc          TYPE sysubrc.
IF p_strg IS INITIAL.
    MESSAGE 'Заполните строку поиска' TYPE 'S' DISPLAY LIKE 'E'.
    RETURN.
ENDIF.
PERFORM get_data CHANGING lv_rc.
IF lv_rc <> 0.
    RETURN.
ENDIF.
PERFORM search_wdy.
PERFORM search_fox.
PERFORM create_alvlist.
ENDFORM.                    " main
*&      Form search_wdy
*       Поиск в компонентах WebDynpro
* --> p1        text
* <-- p2        text
FORM search_wdy .
TYPES: BEGIN OF lty_found_wdy_ex.
INCLUDE TYPE lty_found.
TYPES: code_body        TYPE wdy_ctlr_compo-code_body,
       END OF lty_found_wdy_ex.
DATA: lv_search        TYPE string,
        lt_found_wdy_ex TYPE TABLE OF lty_found_wdy_ex,
        lt_lines         TYPE TABLE OF string,
        lt_results       TYPE TABLE OF match_result. " WITH HEADER LINE.
FIELD-SYMBOLS: <ls_found_wdy_ex>           TYPE lty_found_wdy_ex,
                 <ls_result>                 TYPE match_result.
CHECK gt_comp[] IS NOT INITIAL.
SELECT component_name controller_name cmpname code_body
    FROM wdy_ctlr_compo
    INTO CORRESPONDING FIELDS OF TABLE lt_found_wdy_ex
    FOR ALL ENTRIES IN gt_comp
    WHERE component_name = gt_comp-component.
LOOP AT lt_found_wdy_ex ASSIGNING <ls_found_wdy_ex>
    WHERE code_body CS p_strg.
    SPLIT <ls_found_wdy_ex>-code_body AT cl_abap_char_utilities=>cr_lf
      INTO TABLE lt_lines.
    FIND ALL OCCURRENCES OF p_strg IN TABLE lt_lines
      IGNORING CASE
      RESULTS lt_results.
    IF sy-subrc <> 0.
      BREAK-POINT.
      MESSAGE 'Произошла внутренняя ошибка' TYPE 'E'.
    ENDIF.
    LOOP AT lt_results ASSIGNING <ls_result>.
      CLEAR gt_found.
      MOVE-CORRESPONDING <ls_found_wdy_ex> TO gt_found.
      gt_found-type = c_type_wdy.
      gt_found-line_num = <ls_result>-line.
      READ TABLE lt_lines INDEX <ls_result>-line INTO gt_found-line.
      CONCATENATE gt_found-component_name gt_found-controller_name gt_found-cmpname
        INTO gt_found-title SEPARATED BY '/'.
      CONCATENATE 'WDY:' gt_found-title INTO gt_found-title SEPARATED BY space.
      APPEND gt_found.
    ENDLOOP.
ENDLOOP.
ENDFORM.                    " search_wdy
*&      Form create_alvlist
*       text
* --> p1        text
* <-- p2        text
FORM create_alvlist .
DATA: ls_layout         TYPE slis_layout_alv,
        lt_all_events     TYPE TABLE OF slis_alv_event,
        lt_events         TYPE TABLE OF slis_alv_event,
        ls_event          TYPE slis_alv_event,
        lt_fieldcat       TYPE TABLE OF slis_fieldcat_alv.
FIELD-SYMBOLS: <ls_fieldcat>        TYPE slis_fieldcat_alv.
* Initialize Layout for activity log
ls_layout-detail_popup         = abap_true.
ls_layout-detail_initial_lines = abap_true.
ls_layout-expand_all           = abap_true.
ls_layout-colwidth_optimize    = abap_true.
ls_layout-zebra                = abap_true.
* Get possible events
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
    EXPORTING
      i_list_type = 0
    IMPORTING
      et_events   = lt_all_events[].
* User-command for activity log
READ TABLE lt_all_events WITH KEY name = slis_ev_user_command
             INTO ls_event.
IF sy-subrc = 0.
    ls_event-form = 'ALV_USER_COMMAND'.
    APPEND ls_event TO lt_events.
ENDIF.
APPEND INITIAL LINE TO lt_fieldcat ASSIGNING <ls_fieldcat>.
<ls_fieldcat>-fieldname = 'TITLE'.
<ls_fieldcat>-outputlen = 70.
<ls_fieldcat>-seltext_l = 'Месторасположение'.
APPEND INITIAL LINE TO lt_fieldcat ASSIGNING <ls_fieldcat>.
<ls_fieldcat>-fieldname = 'LINE_NUM'.
"<ls_fieldcat>-outputlen = .
<ls_fieldcat>-seltext_s = '№ строки'.
APPEND INITIAL LINE TO lt_fieldcat ASSIGNING <ls_fieldcat>.
<ls_fieldcat>-fieldname = 'LINE'.
<ls_fieldcat>-outputlen = 70.
<ls_fieldcat>-seltext_l = 'Текст'.
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
    EXPORTING
*   I_INTERFACE_CHECK                 = con_false
*   I_BYPASSING_BUFFER                = con_false
*   I_BUFFER_ACTIVE                   = ' '
      i_callback_program                = sy-repid
*   I_CALLBACK_PF_STATUS_SET          = con_false
*   I_CALLBACK_USER_COMMAND           = con_false
*   I_CALLBACK_TOP_OF_PAGE            = con_false
*   I_CALLBACK_HTML_TOP_OF_PAGE       = con_false
*   I_CALLBACK_HTML_END_OF_LIST       = con_false
*   i_structure_name                  = con_false
*   I_BACKGROUND_ID                   = con_false
*   I_GRID_TITLE                      =
*   I_GRID_SETTINGS                   =
      is_layout                         = ls_layout
      it_fieldcat                       = lt_fieldcat
*   IT_EXCLUDING                      =
*   IT_SPECIAL_GROUPS                 =
   "it_sort                           = l_tab_sort
*   IT_FILTER                         =
*   IS_SEL_HIDE                       =
*   I_DEFAULT                         = con_true
      i_save                            = 'A'
*   IS_VARIANT                        =
      it_events                         = lt_events
*   IT_EVENT_EXIT                     =
*   IS_PRINT                          =
*   IS_REPREP_ID                      =
*   I_SCREEN_START_COLUMN             = 0
*   I_SCREEN_START_LINE               = 0
*   I_SCREEN_END_COLUMN               = 0
*   I_SCREEN_END_LINE                 = 0
*   IT_ALV_GRAPHICS                   =
*   IT_HYPERLINK                      =
*   IT_ADD_FIELDCAT                   =
*   IT_EXCEPT_QINFO                   =
*   I_HTML_HEIGHT_TOP                 =
*   I_HTML_HEIGHT_END                 =
* IMPORTING
*   E_EXIT_CAUSED_BY_CALLER           =
*   ES_EXIT_CAUSED_BY_USER            =
TABLES
    t_outtab                          = gt_found[]
EXCEPTIONS
    program_error                     = 1
    OTHERS                            = 2.
IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
ENDFORM.                    " create_alvlist
*       FORM ALV_USER_COMMAND                                         *
FORM alv_user_command
     USING i_ucomm TYPE syucomm
           i_selfield TYPE slis_selfield.                   "#EC CALLED
"FIELD-SYMBOLS: <ls_line>            TYPE lty_found.
CHECK i_ucomm = '&IC1'.
READ TABLE gt_found INDEX i_selfield-tabindex.
IF sy-subrc = 0.
    CASE gt_found-type.
      WHEN c_type_wdy.
        PERFORM open_webdynpro USING gt_found-component_name
                                     gt_found-controller_name
                                     gt_found-cmpname
                                     gt_found-line_num.
      WHEN c_type_fox.
        PERFORM open_fox_in_browser USING gt_found-srvnm.
    ENDCASE.
ENDIF.
* l_position = 1.
* READ TABLE g_tab_lines INTO l_str_lines INDEX i_selfield-tabindex.
* IF sy-subrc = 0.
*    l_position = l_str_lines-linno.
* ENDIF.
** BREAK-POINT.
* CASE i_ucomm.
*    WHEN '&IC1'.
*      PERFORM navigate_to_object USING l_str_lines-progname
*                                       l_position
*                                       p_edit.
* ENDCASE.
** Do refresh always col- and row-stable
* IF i_selfield-refresh = con_true.
*    i_selfield-col_stable = con_true.
*    i_selfield-row_stable = con_true.
* ENDIF.
ENDFORM.                    "alv_user_command
*&      Form open_webdynpro
*       text
*      -->VALUE(U_COMPONENT_NAME)   text
*      -->VALUE(U_CONTROLLER_NAME) text
*      -->VALUE(U_METHOD)           text
*      -->VALUE(U_LINE)             text
FORM open_webdynpro USING value(u_component_name) TYPE wdy_ctlr_compo-component_name
                          value(u_controller_name) TYPE wdy_ctlr_compo-controller_name
                          value(u_method) TYPE wdy_ctlr_compo-cmpname
                          value(u_line)   TYPE i.
DATA: ls_cont_key        TYPE wdy_controller_key,
        lv_include         TYPE program,
        lt_map             TYPE wdyrt_line_info_tab_type WITH HEADER LINE,
        lv_line            TYPE i,
        lo_req             TYPE REF TO cl_wb_request,
        lt_request_set     TYPE swbm_wb_request_set.
ls_cont_key-component_name = u_component_name.
ls_cont_key-controller_name = u_controller_name.
CALL METHOD cl_wdy_wb_naming_service=>get_includename_for_controller
    EXPORTING
      p_controller       = ls_cont_key
    RECEIVING
      p_includename      = lv_include
    EXCEPTIONS
      no_generation_info = 1
      OTHERS             = 2.
IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
               WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
CALL FUNCTION 'WDY_WB_GET_SOURCECODE_MAPPING'
    EXPORTING
      p_include          = lv_include
    IMPORTING
      p_map              = lt_map[]
*   P_HEADER           =
    EXCEPTIONS
      import_error       = 1
      OTHERS             = 2.
IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
"READ TABLE lt_map WITH KEY meta-text = u_method.
"READ TABLE lt_map WITH KEY code-text = u_method.
LOOP AT lt_map WHERE code-text = u_method.            "#EC CI_SORTSEQ
ENDLOOP.
IF sy-subrc <> 0.
    MESSAGE 'Не удалось' TYPE 'I'.
    RETURN.
ENDIF.
lv_line = lt_map-line + u_line - 1.
CALL FUNCTION 'WDY_WB_REQUEST_FOR_SOURCEPOS'
    EXPORTING
      p_include             = lv_include
      p_line                = lv_line
      p_operation           = 'DISPLAY'
    IMPORTING
      p_wb_request          = lo_req
    EXCEPTIONS
      no_corresponding_code = 1
      OTHERS                = 2.
IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
APPEND lo_req TO lt_request_set.
CALL METHOD cl_wb_startup=>start
    EXPORTING
      p_wb_request_set = lt_request_set.
* IMPORTING
*    p_wb_error          = l_error
* CHANGING
*    p_wb_data_container = l_container.
ENDFORM.                    "open_webdynpro
*&      Form search_fox
*       Поиск текста в формулах FOX
* --> p1        text
* <-- p2        text
FORM search_fox .
DATA: lo_srv                  TYPE REF TO cl_rsplfs_srv,
        lt_param_set_rule       TYPE TABLE OF rsplfa_s_param_set_rule,
        lt_param_tab            TYPE TABLE OF REF TO if_rsplfa_param_struc,
        lv_formula_string       TYPE string,
        lo_fline                TYPE REF TO if_rsplfa_param_elem,
        lv_line                 TYPE c LENGTH 60,
        lt_forml                TYPE rspls_ts_forml,
        lt_lines                TYPE TABLE OF string,
        lt_results              TYPE TABLE OF match_result.
FIELD-SYMBOLS: <ls_param_set_rule>       TYPE rsplfa_s_param_set_rule,
                 <ls_param_tab>            TYPE REF TO if_rsplfa_param_struc,
                 <ls_result>               TYPE match_result,
                 <ls_forml>                TYPE rspls_s_forml.
LOOP AT gt_fox.
    TRY.
        lo_srv = cl_rsplfs_srv=>factory( gt_fox-srvnm ).
      CATCH cx_rspls_msg_static_check .
        MESSAGE e001(00) WITH 'Ошибка cl_rsplfs_srv=>factory' gt_fox-srvnm.
    ENDTRY.
    lt_param_set_rule = lo_srv->if_rsplfa_srv~get_param_set_rules( ).
    SORT lt_param_set_rule BY rulepos.
    LOOP AT lt_param_set_rule ASSIGNING <ls_param_set_rule>.
      " Get FOX coding from parameters
      lt_param_tab = <ls_param_set_rule>-r_param_set->get_tab_param_struc( 'FORMULATAB' ).
      CLEAR lv_formula_string.
      LOOP AT lt_param_tab ASSIGNING <ls_param_tab>.
        lo_fline = <ls_param_tab>->get_comp_elem( 'FLINE' ).
        lo_fline->get_value( IMPORTING e_value = lv_line ).
        CONCATENATE lv_formula_string lv_line INTO lv_formula_string
          RESPECTING BLANKS.
      ENDLOOP.
      " Convert FOX coding and get field catalog for parsing
      lt_forml[] = cl_rsplfc_formula=>string_to_forml_tab( lv_formula_string ).
      REFRESH lt_lines.
      LOOP AT lt_forml ASSIGNING <ls_forml>.
        APPEND <ls_forml>-fline TO lt_lines.
      ENDLOOP.
      " Find
      FIND ALL OCCURRENCES OF p_strg IN TABLE lt_lines
        IGNORING CASE
        RESULTS lt_results.
      CHECK sy-subrc = 0.
      LOOP AT lt_results ASSIGNING <ls_result>.
        CLEAR gt_found.
        gt_found-type = c_type_fox.
        gt_found-srvnm = gt_fox-srvnm.
        gt_found-line_num = <ls_result>-line.
        READ TABLE lt_lines INDEX <ls_result>-line INTO gt_found-line.
        CONCATENATE 'FOX:' gt_fox-srvnm INTO gt_found-title SEPARATED BY space.
        APPEND gt_found.
      ENDLOOP.
    ENDLOOP.
ENDLOOP.
ENDFORM.                    " search_fox
*&      Form open_fox_in_browser
*       text
* --> p1        text
* <-- p2        text
FORM open_fox_in_browser USING value(u_srvnm)    TYPE rsplf_srvnm.
DATA: lv_iobjnm         TYPE sobj_name.
lv_iobjnm = u_srvnm.
cl_rspls_wdapp=>start_modeler( i_tlogo = rs_c_tlogo-planning_service
                                 i_objnm = lv_iobjnm ).
ENDFORM.                    " open_fox_in_browser

Z-Transaction Search

Similar Messages

Maybe you are looking for