Enhance LaunchTransactionAdmin.js file of BSP component UICMP_LTX ?
How to show a custom Program In a View
Topic: How to show a custom Program In a View
Moudle : SAP CRM TECHNICAL
Author: Rasmi Ranjan Pradhan
Hi All,
In one of my requirement, I have to show a Zprogam from web ui view level means when we click the attribute it will call the program and show the smart forms.
This Is my Overview Page and when I click On transaction history View 'Zsmart_form_demo ' then it will show a z program and from Z program to populate the smartform
My challenge is that to call a z program through web-ui
So I got an idea to lunch The program T.code In ui so I go through the T.code
CRMS_IC_CROSS_SYS
And find the link
so my intention is that replace IC_LTX with the custom T.code so I write the code like that
in one event.
method eh_ondocflow.
call method super->eh_ondocflow
exporting
htmlb_event = htmlb_event
htmlb_event_ex = htmlb_event_ex.
data: lv_index type i, lv_column type string,
lr_coco type ref to cl_btdocflo_bspwdcomponen_impl, " local coco impl
lr_entity type ref to cl_crm_bol_entity,
lr_window type ref to cl_bsp_wd_window,
gv_popup type ref to if_bsp_wd_popup,
lv_adminh_obj type string,
gs_type type crmst_docflow_btil.
cl_thtmlb_util=>get_event_info(
exporting
iv_event = htmlb_event_ex
importing
ev_index = lv_index
ev_column = lv_column ).
* * Find Rec
lr_entity ?= me->typed_context->btdocflow->collection_wrapper->find( iv_index = lv_index ).
* lv_adminh_obj = lr_entity->get_property_as_string( iv_attr_name = 'CREATED_BY' ).
* lv_adminh_obj = lr_entity->GET_PROPERTIES( ES_ATTRIBUTES = 'CREATED_BY' ).
* GET_PROPERTY_AS_VALUE
*** IF NOT GT_ATTR IS BOUND.
*** gs_type-ref_guid = GT_ATTR-ref_guid.
*** ENDIF.
* iNSERT rec into component controller
lr_coco ?= me->comp_controller.
lr_coco->typed_context->btdocflow->collection_wrapper->clear_collection( ).
lr_coco->typed_context->btdocflow->collection_wrapper->add( iv_entity = lr_entity iv_set_focus = abap_true ).
* Navigate - Select type of navigation based on which link
*** CASE lv_column.
*** when 'id_description'.
*** IF GV_POPUP IS INITIAL.
*** GV_POPUP = COMP_CONTROLLER->WINDOW_MANAGER->CREATE_POPUP( iv_interface_view_name = 'Z05_EMPTY/MainWindow' iv_usage_name = 'CU_OV' iv_title = 'POP_UP' ).
*** endif.
*** GV_POPUP->SET_ON_CLOSE_EVENT( IV_VIEW = ME IV_EVENT_NAME = 'CLOSE_GV_POPUP' ).
*** GV_POPUP->SET_WINDOW_WIDTH( 640 ).
*** GV_POPUP->SET_DISPLAY_MODE( IF_BSP_WD_POPUP=>C_DISPLAY_MODE_SURROUNDED ).
*** GV_POPUP->OPEN( ).
***endcase.
*******bidyut
types: begin of ty_zcr4_tab,
mandt type mandt,
objtype_a type swo_objtyp,
objkey_b type crmt_doc_flow_id_wrk,
end of ty_zcr4_tab.
data: wa_zcr4_tab type ty_zcr4_tab,
it_zcr4_tab type table of ty_zcr4_tab.
wa_zcr4_tab-mandt = sy-mandt.
wa_zcr4_tab-objtype_a = '5000040'.
wa_zcr4_tab-objkey_b = 'ZSMART_FORM_DEMO'.
append wa_zcr4_tab to it_zcr4_tab .
modify zcr4_tab from table it_zcr4_tab.
*************
data: lr_struct_ref type ref to crmt_gsurlpopup_params,
lr_value_node type ref to cl_bsp_wd_value_node,
lr_bo_coll type ref to if_bol_bo_col,
lw_url_params type crmt_gsurlpopup_params.
if not gv_popup is bound.
gv_popup ?= comp_controller->window_manager->create_popup(
iv_interface_view_name = 'GSURLPOPUP/MainWindow'
iv_usage_name = 'CUGSURLPopup'
iv_title = 'Google'
).
endif.
data: v_its_url type crmc_ic_boradm-its_url,
f2 type string value 'IC_LTX',
f3 type string value 'Z_SMART_FORM'.
select its_url from crmc_ic_boradm into v_its_url where mapped_logsys = 'CRM'.
endselect.
if v_its_url ca f2.
replace f2 in v_its_url with f3.
* write : / f1.
endif.
lw_url_params-url = 'http://cit47-srvr.ivlgroup.com:8000/sap/bc/gui/sap/its/webgui/!?~transaction=Z_SMART_FORM&~okcode=ICEXECUTE&sap-client=100'.
* replace LC_ltx with Z_SMART_FORM
lw_url_params-scrolling = abap_false.
get reference of lw_url_params into lr_struct_ref.
create object lr_value_node
exporting
iv_data_ref = lr_struct_ref.
create object lr_bo_coll
type
cl_crm_bol_bo_col.
lr_bo_coll->add( lr_value_node ).
data lr_ctxt_node type ref to cl_bsp_wd_context_node.
lr_ctxt_node ?= gv_popup->get_context_node( iv_cnode_name = 'PARAMS' ).
lr_ctxt_node->set_collection(
collection = lr_bo_coll
).
gv_popup->open( ).
* data: f1 type char10 VALUE 'ID1'.
* data: f2 type char10 .
* f2 = '5000040'.
* get parameter id 'TDSFNAME' field f1.
* EXPORT F2 = F2 TO MEMORY ID F1.
**CALL TRANSACTION 'Z_SMART_FORM' AND SKIP FIRST SCREEN.
* submit Z_SMART_FORM and return.
endmethod.
After that when I click on
A popup will come and the logic for the report copied from Sap technical Site
Code for the Program
*&---------------------------------------------------------------------*
*& Report Z_SMART_FORM
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
report z_smart_form.
tables: crmd_orderadm_h,
zcr4_tab.
types: begin of ty_zcr4_tab,
mandt type mandt,
objtype_a type swo_objtyp,
objkey_b type crmt_doc_flow_id_wrk,
end of ty_zcr4_tab.
data: wa_zcr4_tab type ty_zcr4_tab,
it_zcr4_tab type table of ty_zcr4_tab.
data: f1 type zcr4_tab-objtype_a,
f2 type zcr4_tab-objkey_b.
selection-screen begin of block crm with frame title text-001.
select-options: obj_id for crmd_orderadm_h-object_id no intervals no-extension.
selection-screen end of block crm.
data: wa_cparam type ssfctrlop,
wa_output type ssfcompop,
ssf_name type tdsfname,
func_mod_name type rs38l_fnam.
data: es_output_orderadm_h type crmt_output_orderadm_h_com,
es_output_activity_h type crmt_output_activity_h_com,
es_output_lead_h type crmt_output_lead_h_com,
es_output_opport_h type crmt_output_opport_h_com,
es_output_orgman_h type crmt_output_orgman_h_com,
es_output_pricingdata_h type crmt_output_pricingdata_h_com,
es_output_sales_h type crmt_output_sales_h_com,
es_output_shipping_h type crmt_output_shipping_h_com,
et_output_partner_h type crmt_output_partner_h_comt,
et_output_payplan_d_h type crmt_output_payplan_d_h_comt,
es_output_customer_h type crmt_output_customer_h_com,
es_output_cumulat_h type crmt_output_cumulat_h_com,
et_output_billing_h type crmt_output_billing_h_comt,
et_output_cancel_h type crmt_output_cancel_h_comt,
et_output_appointment_h type crmt_output_appointment_h_comt,
et_output_billplan_d_h type crmt_output_billplan_d_h_comt,
et_output_billplan_h type crmt_output_billplan_h_comt,
et_output_status_d_h type crmt_output_status_d_h_comt,
et_output_srv_subject_h type crmt_output_srv_subject_h_comt,
et_output_srv_subject_i type crmt_output_srv_subject_h_comt,
et_output_srv_refobj_h type crmt_output_srv_refobj_h_comt,
et_output_srv_refobj_i type crmt_output_srv_refobj_h_comt,
et_output_srv_reason_h type crmt_output_srv_reason_h_comt,
et_output_srv_result_h type crmt_output_srv_result_h_comt,
es_output_acs_h type crmt_acs_h_com,
et_output_orderadm_i type crmt_output_orderadm_i_comt,
et_output_orgman_i type crmt_output_orgman_i_comt,
et_output_pricingdata_i type crmt_output_pricingdata_i_comt,
et_output_pricing_i type crmt_output_pricing_i_comt,
et_output_product_i type crmt_output_product_i_comt,
et_output_sales_i type crmt_output_sales_i_comt,
et_output_shipping_i type crmt_output_shipping_i_comt,
et_output_schedlin_i type crmt_output_schedlin_i_comt,
et_output_partner_i type crmt_output_partner_i_comt,
et_item_cstics_i type crmt_item_cstics_tab,
et_output_customer_i type crmt_output_customer_i_comt,
et_output_billing_i type crmt_output_billing_i_comt,
et_output_cancel_i type crmt_output_cancel_i_comt,
et_output_finprod_i type crmt_output_finprod_i_comt,
et_output_ordprp_i type crmt_output_ordprp_i_comt,
et_output_ordprp_i_d type crmt_output_ordprp_i_d_comt,
et_output_ordprp_objl_i_d type crmt_output_ordprp_objl_i_comt,
et_output_appointment_i type crmt_output_appointment_i_comt,
et_output_billplan_d_i type crmt_output_billplan_d_i_comt,
et_output_billplan_i type crmt_output_billplan_i_comt,
et_output_orderadm_i_qt type crmt_output_orderadm_i_qt_comt,
et_output_orderadm_i_in type crmt_output_orderadm_i_in_comt,
et_output_schedlin_i_cf type crmt_output_schedlin_i_cf_comt,
et_output_status_i type crmt_output_status_i_comt,
et_output_service_i type crmt_output_service_i_comt,
et_output_wrk_set_e_s_bbp type /1cn/working_set_e_s_bbp_t,
ev_language like sy-langu,
et_output_service_i_assi type crmt_output_service_i_***_comt,
es_output_buag_h type crmt_output_buag_h_com,
et_output_buag_i type crmt_output_buag_i_comt,
et_output_price_agmts_h type /1cn/working_set_e_s_crm_t,
et_output_price_agmts_i type /1cn/working_set_e_s_crm_t,
et_output_status_h type crmt_output_status_h_comt,
guid type crmt_object_guid.
*data : f2 type TDSFNAME.
* data: f1 type char10 VALUE 'ID1'.
initialization.
*set parameter id 'SSFNAME' field f2.
* IMPORT f1 FROM MEMORY ID F1.
* IMPORT f2 = f2 FROM MEMORY ID F1.
*obj_id-low = f2.
start-of-selection.
select single guid into guid from crmd_orderadm_h where object_id = obj_id-low.
select mandt
objtype_a
objkey_b from zcr4_tab into table it_zcr4_tab .
loop at it_zcr4_tab into wa_zcr4_tab.
f1 = wa_zcr4_tab-objtype_a.
f2 = wa_zcr4_tab-objkey_b.
endloop.
*delete it_ZCR4_TAB .
*IF it_ZCR4_TAB IS NOT INITIAL.
*delete ZCR4_TAB from TABLE it_ZCR4_TAB.
*ENDIF.
*delete ZCR4_TAB from wa_ZCR4_TAB. """""""""
* delete ZCR4_TAB FROM WHERE OBJTYPE_A = wa_ZCR4_TAB-OBJTYPE_A AND
* OBJKEY_B = wa_ZCR4_TAB-OBJKEY_B .
if it_zcr4_tab is not initial.
delete zcr4_tab from table it_zcr4_tab.
endif.
if not guid is initial.
wa_cparam-no_dialog = 'X'.
wa_cparam-preview = 'X'.
wa_output-tddest = 'LP01'.
wa_output-tdtitle = 'Order Confirmation'.
wa_output-tdnewid = 'X'.
wa_output-tdimmed = 'X'.
wa_output-tdcopies = '001'.
*** CALL FUNCTION 'CRM_OUTPUT_SINGLE_READ'
*** EXPORTING
*** iv_smart_form = 'ZSMART_FORM_DEMO'
*** iv_guid = guid
*** IMPORTING
*** es_output_orderadm_h = es_output_orderadm_h
*** es_output_activity_h = es_output_activity_h
*** es_output_lead_h = es_output_lead_h
*** es_output_opport_h = es_output_opport_h
*** es_output_orgman_h = es_output_orgman_h
*** es_output_pricingdata_h = es_output_pricingdata_h
*** es_output_sales_h = es_output_sales_h
*** es_output_shipping_h = es_output_shipping_h
*** et_output_partner_h = et_output_partner_h
*** et_output_payplan_d_h = et_output_payplan_d_h
*** es_output_customer_h = es_output_customer_h
*** es_output_cumulat_h = es_output_cumulat_h
*** et_output_billing_h = et_output_billing_h
*** et_output_cancel_h = et_output_cancel_h
*** et_output_appointment_h = et_output_appointment_h
*** et_output_billplan_d_h = et_output_billplan_d_h
*** et_output_billplan_h = et_output_billplan_h
*** et_output_status_d_h = et_output_status_d_h
*** et_output_srv_subject_h = et_output_srv_subject_h
*** et_output_srv_subject_i = et_output_srv_subject_i
*** et_output_srv_refobj_h = et_output_srv_refobj_h
*** et_output_srv_refobj_i = et_output_srv_refobj_i
*** et_output_srv_reason_h = et_output_srv_reason_h
*** et_output_srv_result_h = et_output_srv_result_h
*** et_output_status_h = et_output_status_h
*** es_output_acs_h = es_output_acs_h
*** et_output_orderadm_i = et_output_orderadm_i
*** et_output_orgman_i = et_output_orgman_i
*** et_output_pricingdata_i = et_output_pricingdata_i
*** et_output_pricing_i = et_output_pricing_i
*** et_output_product_i = et_output_product_i
*** et_output_sales_i = et_output_sales_i
*** et_output_shipping_i = et_output_shipping_i
*** et_output_schedlin_i = et_output_schedlin_i
*** et_output_partner_i = et_output_partner_i
*** et_item_cstics_i = et_item_cstics_i
*** et_output_customer_i = et_output_customer_i
*** et_output_billing_i = et_output_billing_i
*** et_output_cancel_i = et_output_cancel_i
*** et_output_finprod_i = et_output_finprod_i
*** et_output_ordprp_i = et_output_ordprp_i
*** et_output_ordprp_i_d = et_output_ordprp_i_d
*** et_output_ordprp_objl_i_d = et_output_ordprp_objl_i_d
*** et_output_appointment_i = et_output_appointment_i
*** et_output_billplan_d_i = et_output_billplan_d_i
*** et_output_billplan_i = et_output_billplan_i
*** et_output_orderadm_i_qt = et_output_orderadm_i_qt
*** et_output_orderadm_i_in = et_output_orderadm_i_in
*** et_output_schedlin_i_cf = et_output_schedlin_i_cf
*** et_output_status_i = et_output_status_i
*** et_output_service_i = et_output_service_i
*** et_output_wrk_set_e_s_bbp = et_output_wrk_set_e_s_bbp
*** ev_language = ev_language
*** et_output_service_i_assi = et_output_service_i_assi
*** es_output_buag_h = es_output_buag_h
*** et_output_buag_i = et_output_buag_i
*** et_output_price_agmts_h = et_output_price_agmts_h
*** et_output_price_agmts_i = et_output_price_agmts_i.
call function 'SSF_FUNCTION_MODULE_NAME'
exporting
formname = 'ZSMART_FORM_DEMO'
importing
fm_name = func_mod_name.
call function func_mod_name
exporting
control_parameters = wa_cparam
output_options = wa_output
user_settings = 'X'
orderadm_h = es_output_orderadm_h
activity_h = es_output_activity_h
opport_h = es_output_opport_h
orgman_h = es_output_orgman_h
partner_h = et_output_partner_h
pricingdata_h = es_output_pricingdata_h
sales_h = es_output_sales_h
shipping_h = es_output_shipping_h
payplan_d_h = et_output_payplan_d_h
cumulat_h = es_output_cumulat_h
customer_h = es_output_customer_h
acs_h = es_output_acs_h
billing_h = et_output_billing_h
cancel_h = et_output_cancel_h
appointment_h = et_output_appointment_h
billplan_d_h = et_output_billplan_d_h
billplan_h = et_output_billplan_h
status_d_h = et_output_status_d_h
status_h = et_output_status_h
srv_subject_h = et_output_srv_subject_h
srv_reason_h = et_output_srv_reason_h
srv_result_h = et_output_srv_result_h
orderadm_i = et_output_orderadm_i
orderadm_i_qt = et_output_orderadm_i_qt
orderadm_i_in = et_output_orderadm_i_in
orgman_i = et_output_orgman_i
pricingdata_i = et_output_pricingdata_i
pricing_i = et_output_pricing_i
product_i = et_output_product_i
sales_i = et_output_sales_i
schedlin_i = et_output_schedlin_i
schedlin_i_cf = et_output_schedlin_i_cf
shipping_i = et_output_shipping_i
partner_i = et_output_partner_i
item_cstics_i = et_item_cstics_i
customer_i = et_output_customer_i
billing_i = et_output_billing_i
cancel_i = et_output_cancel_i
finprod_i = et_output_finprod_i
ordprp_i = et_output_ordprp_i
appointment_i = et_output_appointment_i
billplan_d_i = et_output_billplan_d_i
billplan_i = et_output_billplan_i
status_i = et_output_status_i
working_set_e_s_bbp = et_output_wrk_set_e_s_bbp
language = ev_language
exceptions
formatting_error = 1
internal_error = 2
send_error = 3
user_canceled = 4
others = 5.
if sy-subrc <> 0.
message id sy-msgid type sy-msgty number sy-msgno
with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
endif.
else.
message 'Ticket does not exists' type 'I'.
endif.
How to show a custom Program In a View
Moudle : SAP CRM TECHNICAL
Author: Rasmi Ranjan Pradhan
Hi All,
In one of my requirement, I have to show a custom Program from web ui view level means when we click the attribute it will call the program and show the smart forms
This Is my Overview Page and when I click On transaction history View 'Zsmart_form_demo ' then it will show a z program and from Z program to populate the smartform
My challenge is that to call a z program through web-ui
So I got an idea to lunch The program T.code In ui so I go through the T.code
CRMS_IC_CROSS_SYS
Make a note of logical system and URL also.
And find the link
http://.com:8000/sap/bc/gui/sap/its/webgui/!?~transaction=IC_LTX&~okcode=ICEXECUTE
so my intention is that replace IC_LTX with the custom T.code so I write the code like that in one event.
method eh_ondocflow.
call method super->eh_ondocflow
exporting
htmlb_event = htmlb_event
htmlb_event_ex = htmlb_event_ex.
data: lv_index type i, lv_column type string,
lr_coco type ref to cl_btdocflo_bspwdcomponen_impl, " local coco impl
lr_entity type ref to cl_crm_bol_entity,
lr_window type ref to cl_bsp_wd_window,
gv_popup type ref to if_bsp_wd_popup,
lv_adminh_obj type string,
gs_type type crmst_docflow_btil.
cl_thtmlb_util=>get_event_info(
exporting
iv_event = htmlb_event_ex
importing
ev_index = lv_index
ev_column = lv_column ).
* * Find Rec
lr_entity ?= me->typed_context->btdocflow->collection_wrapper->find( iv_index = lv_index ).
* lv_adminh_obj = lr_entity->get_property_as_string( iv_attr_name = 'CREATED_BY' ).
* lv_adminh_obj = lr_entity->GET_PROPERTIES( ES_ATTRIBUTES = 'CREATED_BY' ).
* GET_PROPERTY_AS_VALUE
*** IF NOT GT_ATTR IS BOUND.
*** gs_type-ref_guid = GT_ATTR-ref_guid.
*** ENDIF.
* iNSERT rec into component controller
lr_coco ?= me->comp_controller.
lr_coco->typed_context->btdocflow->collection_wrapper->clear_collection( ).
lr_coco->typed_context->btdocflow->collection_wrapper->add( iv_entity = lr_entity iv_set_focus = abap_true ).
* Navigate - Select type of navigation based on which link
*** CASE lv_column.
*** when 'id_description'.
*** IF GV_POPUP IS INITIAL.
*** GV_POPUP = COMP_CONTROLLER->WINDOW_MANAGER->CREATE_POPUP( iv_interface_view_name = 'Z05_EMPTY/MainWindow' iv_usage_name = 'CU_OV' iv_title = 'POP_UP' ).
*** endif.
*** GV_POPUP->SET_ON_CLOSE_EVENT( IV_VIEW = ME IV_EVENT_NAME = 'CLOSE_GV_POPUP' ).
*** GV_POPUP->SET_WINDOW_WIDTH( 640 ).
*** GV_POPUP->SET_DISPLAY_MODE( IF_BSP_WD_POPUP=>C_DISPLAY_MODE_SURROUNDED ).
*** GV_POPUP->OPEN( ).
***endcase.
*******bidyut
types: begin of ty_zcr4_tab,
mandt type mandt,
objtype_a type swo_objtyp,
objkey_b type crmt_doc_flow_id_wrk,
end of ty_zcr4_tab.
data: wa_zcr4_tab type ty_zcr4_tab,
it_zcr4_tab type table of ty_zcr4_tab.
wa_zcr4_tab-mandt = sy-mandt.
wa_zcr4_tab-objtype_a = '5000040'.
wa_zcr4_tab-objkey_b = 'ZSMART_FORM_DEMO'.
append wa_zcr4_tab to it_zcr4_tab .
modify zcr4_tab from table it_zcr4_tab.
*************
data: lr_struct_ref type ref to crmt_gsurlpopup_params,
lr_value_node type ref to cl_bsp_wd_value_node,
lr_bo_coll type ref to if_bol_bo_col,
lw_url_params type crmt_gsurlpopup_params.
if not gv_popup is bound.
gv_popup ?= comp_controller->window_manager->create_popup(
iv_interface_view_name = 'GSURLPOPUP/MainWindow'
iv_usage_name = 'CUGSURLPopup'
iv_title = 'Google'
).
endif.
data: v_its_url type crmc_ic_boradm-its_url,
f2 type string value 'IC_LTX',
f3 type string value 'Z_SMART_FORM'.
select its_url from crmc_ic_boradm into v_its_url where mapped_logsys = 'CRM'.
endselect.
if v_its_url ca f2.
replace f2 in v_its_url with f3.
* write : / f1.
endif.
lw_url_params-url = 'http://cit47-srvr.ivlgroup.com:8000/sap/bc/gui/sap/its/webgui/!?~transaction=Z_SMART_FORM&~okcode=ICEXECUTE&sap-client=100'.
* replace LC_ltx with Z_SMART_FORM
lw_url_params-scrolling = abap_false.
get reference of lw_url_params into lr_struct_ref.
create object lr_value_node
exporting
iv_data_ref = lr_struct_ref.
create object lr_bo_coll
type
cl_crm_bol_bo_col.
lr_bo_coll->add( lr_value_node ).
data lr_ctxt_node type ref to cl_bsp_wd_context_node.
lr_ctxt_node ?= gv_popup->get_context_node( iv_cnode_name = 'PARAMS' ).
lr_ctxt_node->set_collection(
collection = lr_bo_coll
).
gv_popup->open( ).
* data: f1 type char10 VALUE 'ID1'.
* data: f2 type char10 .
* f2 = '5000040'.
* get parameter id 'TDSFNAME' field f1.
* EXPORT F2 = F2 TO MEMORY ID F1.
**CALL TRANSACTION 'Z_SMART_FORM' AND SKIP FIRST SCREEN.
* submit Z_SMART_FORM and return.
endmethod.
After that when I click on
A popup will come
Code for the Program
*&---------------------------------------------------------------------*
*& Report Z_SMART_FORM
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
report z_smart_form.
tables: crmd_orderadm_h,
zcr4_tab.
types: begin of ty_zcr4_tab,
mandt type mandt,
objtype_a type swo_objtyp,
objkey_b type crmt_doc_flow_id_wrk,
end of ty_zcr4_tab.
data: wa_zcr4_tab type ty_zcr4_tab,
it_zcr4_tab type table of ty_zcr4_tab.
data: f1 type zcr4_tab-objtype_a,
f2 type zcr4_tab-objkey_b.
selection-screen begin of block crm with frame title text-001.
select-options: obj_id for crmd_orderadm_h-object_id no intervals no-extension.
selection-screen end of block crm.
data: wa_cparam type ssfctrlop,
wa_output type ssfcompop,
ssf_name type tdsfname,
func_mod_name type rs38l_fnam.
data: es_output_orderadm_h type crmt_output_orderadm_h_com,
es_output_activity_h type crmt_output_activity_h_com,
es_output_lead_h type crmt_output_lead_h_com,
es_output_opport_h type crmt_output_opport_h_com,
es_output_orgman_h type crmt_output_orgman_h_com,
es_output_pricingdata_h type crmt_output_pricingdata_h_com,
es_output_sales_h type crmt_output_sales_h_com,
es_output_shipping_h type crmt_output_shipping_h_com,
et_output_partner_h type crmt_output_partner_h_comt,
et_output_payplan_d_h type crmt_output_payplan_d_h_comt,
es_output_customer_h type crmt_output_customer_h_com,
es_output_cumulat_h type crmt_output_cumulat_h_com,
et_output_billing_h type crmt_output_billing_h_comt,
et_output_cancel_h type crmt_output_cancel_h_comt,
et_output_appointment_h type crmt_output_appointment_h_comt,
et_output_billplan_d_h type crmt_output_billplan_d_h_comt,
et_output_billplan_h type crmt_output_billplan_h_comt,
et_output_status_d_h type crmt_output_status_d_h_comt,
et_output_srv_subject_h type crmt_output_srv_subject_h_comt,
et_output_srv_subject_i type crmt_output_srv_subject_h_comt,
et_output_srv_refobj_h type crmt_output_srv_refobj_h_comt,
et_output_srv_refobj_i type crmt_output_srv_refobj_h_comt,
et_output_srv_reason_h type crmt_output_srv_reason_h_comt,
et_output_srv_result_h type crmt_output_srv_result_h_comt,
es_output_acs_h type crmt_acs_h_com,
et_output_orderadm_i type crmt_output_orderadm_i_comt,
et_output_orgman_i type crmt_output_orgman_i_comt,
et_output_pricingdata_i type crmt_output_pricingdata_i_comt,
et_output_pricing_i type crmt_output_pricing_i_comt,
et_output_product_i type crmt_output_product_i_comt,
et_output_sales_i type crmt_output_sales_i_comt,
et_output_shipping_i type crmt_output_shipping_i_comt,
et_output_schedlin_i type crmt_output_schedlin_i_comt,
et_output_partner_i type crmt_output_partner_i_comt,
et_item_cstics_i type crmt_item_cstics_tab,
et_output_customer_i type crmt_output_customer_i_comt,
et_output_billing_i type crmt_output_billing_i_comt,
et_output_cancel_i type crmt_output_cancel_i_comt,
et_output_finprod_i type crmt_output_finprod_i_comt,
et_output_ordprp_i type crmt_output_ordprp_i_comt,
et_output_ordprp_i_d type crmt_output_ordprp_i_d_comt,
et_output_ordprp_objl_i_d type crmt_output_ordprp_objl_i_comt,
et_output_appointment_i type crmt_output_appointment_i_comt,
et_output_billplan_d_i type crmt_output_billplan_d_i_comt,
et_output_billplan_i type crmt_output_billplan_i_comt,
et_output_orderadm_i_qt type crmt_output_orderadm_i_qt_comt,
et_output_orderadm_i_in type crmt_output_orderadm_i_in_comt,
et_output_schedlin_i_cf type crmt_output_schedlin_i_cf_comt,
et_output_status_i type crmt_output_status_i_comt,
et_output_service_i type crmt_output_service_i_comt,
et_output_wrk_set_e_s_bbp type /1cn/working_set_e_s_bbp_t,
ev_language like sy-langu,
et_output_service_i_assi type crmt_output_service_i_***_comt,
es_output_buag_h type crmt_output_buag_h_com,
et_output_buag_i type crmt_output_buag_i_comt,
et_output_price_agmts_h type /1cn/working_set_e_s_crm_t,
et_output_price_agmts_i type /1cn/working_set_e_s_crm_t,
et_output_status_h type crmt_output_status_h_comt,
guid type crmt_object_guid.
*data : f2 type TDSFNAME.
* data: f1 type char10 VALUE 'ID1'.
initialization.
*set parameter id 'SSFNAME' field f2.
* IMPORT f1 FROM MEMORY ID F1.
* IMPORT f2 = f2 FROM MEMORY ID F1.
*obj_id-low = f2.
start-of-selection.
select single guid into guid from crmd_orderadm_h where object_id = obj_id-low.
select mandt
objtype_a
objkey_b from zcr4_tab into table it_zcr4_tab .
loop at it_zcr4_tab into wa_zcr4_tab.
f1 = wa_zcr4_tab-objtype_a.
f2 = wa_zcr4_tab-objkey_b.
endloop.
*delete it_ZCR4_TAB .
*IF it_ZCR4_TAB IS NOT INITIAL.
*delete ZCR4_TAB from TABLE it_ZCR4_TAB.
*ENDIF.
*delete ZCR4_TAB from wa_ZCR4_TAB. """""""""
* delete ZCR4_TAB FROM WHERE OBJTYPE_A = wa_ZCR4_TAB-OBJTYPE_A AND
* OBJKEY_B = wa_ZCR4_TAB-OBJKEY_B .
if it_zcr4_tab is not initial.
delete zcr4_tab from table it_zcr4_tab.
endif.
if not guid is initial.
wa_cparam-no_dialog = 'X'.
wa_cparam-preview = 'X'.
wa_output-tddest = 'LP01'.
wa_output-tdtitle = 'Order Confirmation'.
wa_output-tdnewid = 'X'.
wa_output-tdimmed = 'X'.
wa_output-tdcopies = '001'.
*** CALL FUNCTION 'CRM_OUTPUT_SINGLE_READ'
*** EXPORTING
*** iv_smart_form = 'ZSMART_FORM_DEMO'
*** iv_guid = guid
*** IMPORTING
*** es_output_orderadm_h = es_output_orderadm_h
*** es_output_activity_h = es_output_activity_h
*** es_output_lead_h = es_output_lead_h
*** es_output_opport_h = es_output_opport_h
*** es_output_orgman_h = es_output_orgman_h
*** es_output_pricingdata_h = es_output_pricingdata_h
*** es_output_sales_h = es_output_sales_h
*** es_output_shipping_h = es_output_shipping_h
*** et_output_partner_h = et_output_partner_h
*** et_output_payplan_d_h = et_output_payplan_d_h
*** es_output_customer_h = es_output_customer_h
*** es_output_cumulat_h = es_output_cumulat_h
*** et_output_billing_h = et_output_billing_h
*** et_output_cancel_h = et_output_cancel_h
*** et_output_appointment_h = et_output_appointment_h
*** et_output_billplan_d_h = et_output_billplan_d_h
*** et_output_billplan_h = et_output_billplan_h
*** et_output_status_d_h = et_output_status_d_h
*** et_output_srv_subject_h = et_output_srv_subject_h
*** et_output_srv_subject_i = et_output_srv_subject_i
*** et_output_srv_refobj_h = et_output_srv_refobj_h
*** et_output_srv_refobj_i = et_output_srv_refobj_i
*** et_output_srv_reason_h = et_output_srv_reason_h
*** et_output_srv_result_h = et_output_srv_result_h
*** et_output_status_h = et_output_status_h
*** es_output_acs_h = es_output_acs_h
*** et_output_orderadm_i = et_output_orderadm_i
*** et_output_orgman_i = et_output_orgman_i
*** et_output_pricingdata_i = et_output_pricingdata_i
*** et_output_pricing_i = et_output_pricing_i
*** et_output_product_i = et_output_product_i
*** et_output_sales_i = et_output_sales_i
*** et_output_shipping_i = et_output_shipping_i
*** et_output_schedlin_i = et_output_schedlin_i
*** et_output_partner_i = et_output_partner_i
*** et_item_cstics_i = et_item_cstics_i
*** et_output_customer_i = et_output_customer_i
*** et_output_billing_i = et_output_billing_i
*** et_output_cancel_i = et_output_cancel_i
*** et_output_finprod_i = et_output_finprod_i
*** et_output_ordprp_i = et_output_ordprp_i
*** et_output_ordprp_i_d = et_output_ordprp_i_d
*** et_output_ordprp_objl_i_d = et_output_ordprp_objl_i_d
*** et_output_appointment_i = et_output_appointment_i
*** et_output_billplan_d_i = et_output_billplan_d_i
*** et_output_billplan_i = et_output_billplan_i
*** et_output_orderadm_i_qt = et_output_orderadm_i_qt
*** et_output_orderadm_i_in = et_output_orderadm_i_in
*** et_output_schedlin_i_cf = et_output_schedlin_i_cf
*** et_output_status_i = et_output_status_i
*** et_output_service_i = et_output_service_i
*** et_output_wrk_set_e_s_bbp = et_output_wrk_set_e_s_bbp
*** ev_language = ev_language
*** et_output_service_i_assi = et_output_service_i_assi
*** es_output_buag_h = es_output_buag_h
*** et_output_buag_i = et_output_buag_i
*** et_output_price_agmts_h = et_output_price_agmts_h
*** et_output_price_agmts_i = et_output_price_agmts_i.
call function 'SSF_FUNCTION_MODULE_NAME'
exporting
formname = 'ZSMART_FORM_DEMO'
importing
fm_name = func_mod_name.
call function func_mod_name
exporting
control_parameters = wa_cparam
output_options = wa_output
user_settings = 'X'
orderadm_h = es_output_orderadm_h
activity_h = es_output_activity_h
opport_h = es_output_opport_h
orgman_h = es_output_orgman_h
partner_h = et_output_partner_h
pricingdata_h = es_output_pricingdata_h
sales_h = es_output_sales_h
shipping_h = es_output_shipping_h
payplan_d_h = et_output_payplan_d_h
cumulat_h = es_output_cumulat_h
customer_h = es_output_customer_h
acs_h = es_output_acs_h
billing_h = et_output_billing_h
cancel_h = et_output_cancel_h
appointment_h = et_output_appointment_h
billplan_d_h = et_output_billplan_d_h
billplan_h = et_output_billplan_h
status_d_h = et_output_status_d_h
status_h = et_output_status_h
srv_subject_h = et_output_srv_subject_h
srv_reason_h = et_output_srv_reason_h
srv_result_h = et_output_srv_result_h
orderadm_i = et_output_orderadm_i
orderadm_i_qt = et_output_orderadm_i_qt
orderadm_i_in = et_output_orderadm_i_in
orgman_i = et_output_orgman_i
pricingdata_i = et_output_pricingdata_i
pricing_i = et_output_pricing_i
product_i = et_output_product_i
sales_i = et_output_sales_i
schedlin_i = et_output_schedlin_i
schedlin_i_cf = et_output_schedlin_i_cf
shipping_i = et_output_shipping_i
partner_i = et_output_partner_i
item_cstics_i = et_item_cstics_i
customer_i = et_output_customer_i
billing_i = et_output_billing_i
cancel_i = et_output_cancel_i
finprod_i = et_output_finprod_i
ordprp_i = et_output_ordprp_i
appointment_i = et_output_appointment_i
billplan_d_i = et_output_billplan_d_i
billplan_i = et_output_billplan_i
status_i = et_output_status_i
working_set_e_s_bbp = et_output_wrk_set_e_s_bbp
language = ev_language
exceptions
formatting_error = 1
internal_error = 2
send_error = 3
user_canceled = 4
others = 5.
if sy-subrc <> 0.
message id sy-msgid type sy-msgty number sy-msgno
with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
endif.
else.
message 'Ticket does not exists' type 'I'.
endif.
CRM User time out issue
Hi All,
I have a requirment to display a popup message before crm session expires due to inactivity..Our session time out time is set to 60 min..I need to display message before 30 min if the user is ideal on that session..
I tried the option of applying the OSS message 1877120. I did the manual steps and applied the OSS message and set the parameter (CRM 7.0 EHP1)
but I am not getting any popup even though session reached to maximum logout time..any idea on this..?
I also noticed below link..to write the code..
Session Time out warning message on UI
But I would like to check is there any way to resolve this issue using any OSS message..
I appreciate your help on this.
Thanks,
Sara.
Unable to enter the COntract end date as blank in spro
Hi Experts ,
I have to set in the schedule condition the contract End date as Blank in spro I have done the changes , but when I try to schedule the action on a contract with blank contract end date the action is not getting scheduled and it seems there is some issue while setting the blank value , because when I set the date as 31129999 , it is working properly , please suggest .
Thanks ,
Vaibhav
Update details in crm transaction
Hi friends,
Im using crm_order_maintain FM to create a transaction in sap crm.Can someone help me by telling what are the key attributes to be filled in the partner table, which i will be exporting to the FM.Because when ever i create a transaction , the transaction is created with my log details in the partner column not with the partner detail i want to create with.
Thanks in advance.
issue in populating the partner by using BAPI_OPPORTUNITY_CREATEMULTI?
the partner data is not populating
Field history not saved in Web UI
Hi,
Prior to upgrade, the fields in the Web UI e.g. employee responsible, used to show a list of history data as a drop down. Now after the upgrade, this has stopped and the fields does not save historical data, how do I get back this functionality ?
Haseeb.
How to delete service contract change document entries using CRMC_OBJECTS
Hi,
I want to delete the change document entries for entitlements at item levels.
This is achieved through CRMV_OBJECTS in SM30 but can any one guide me.
Waiting for the reply.
Thanks!
CRM Interactive Reporting : Moving from Development to Quality
Hello Experts,
I have followed the config guide to setup IR in Development. Ran the /CRMBW/CONFIG_WIZARD and elimited all the errors. Interactive Reports are working fine in Development.
Now all the transports are in Quality, when running an IR for ' Accounts with Open Activities' we are getting the following errors
Online analytical processing; error SAPLRSOA FUNC RSOA_VCUBE_READ_REMOTE_DATA[6]
Online analytical processing; query execution aborted
From another thread, I gather that this is related to ' Active Transfer Rules not being attached ' .
My question is
1. Is there a way to re-transfer this from Dev to Quality
What transaction do I use ...and moreover all the tansfer rules are active in Development
2. Does this have to be manually done in Quality ..If so how do I go about it..
I earlier tried to use RSA1 for creating transfer rules , but when it asked for a DataSource [ the guide asks us to choose a similiar name to the infosource] ..I could not find similar name to the infosource.
Is there any other way to create a transfer rule.
Thanks.
Your help is much appreciated.
Regards,
Monica
Quickview Alias
Hello to all,
i want to create a quickview for GP-Selection to support our costumer. To create this quickview i have to implement some fields like contact person and business partner. Both fields come from table but000-partner, so i have to implement the but000 and create an alias from but000 to use the same field. Now i want to redefine the description from my alias field for two different field desciptions but i didn´t find the option for changing.
Has anyone some ideas?
Thanks for your help.
Regards,
Peter
Passing value for to be later used in RSPPFPROCESS scheduled action
We have scenario every time case is open from closed status ( EVAL_SCHEDCOND_PPF ) and BP is added to the case ( Parties Involved) we need to trigger an action later due to business requirement. I need help in passing ( BP ) values to be later used in RSPPFPROCESS after 4 hours of delay. Is there anyway to achieve this other than writing to our own Z-table and retrieving it while RSPPFPROCESS scheduled action runs.
Additional text beside the input field
Adjust Skin - How to change the colour of the caption of a view ?
Hi there,
I am struggling with the following (we are still on SAP CRM 7.0):
How can I change the color of the caption of a view, i.e in the below example change the "light blue" of Account Details to a different colour.
I checked in the "How to adjust Skin" Guide, and changed some colours of other web ui elements in the thtmlb_stand.css, but so far did not success to change the color of the caption.
Thanks for your help,
Bernhard
Not getting an option to create new field using AET
WebUI and SAP UI5
Hi all,
Im just a beginner in SAP and I wanted to know if WebUI and SAP UI5 are two different ui frameworks? Or both means same HTML5/Javascript based framework?
Enabling Reset Button On Account Identification Page
Hi Experts ,
Once we confirm the account , Reset button get disabled .
I want it to be visible even after account get confiremd.
For this I changed the ICCMP_BP_DETAIL/BupaDetailButton , htm file , but reset button is still grayed out.
Please help me to get it enable all time.
Thanks & regards,
Akhilesh Bhagat.
How to find Veiw description In Account Identification page
Hi Experts ,
In Account Identification page I have three View , Search on left side , contarct in right side and result in down.
SEARCH : ICCMP_BP_SEARCH ( View description :Account )
RESULT : ICCMP_BP_SEARCH (View Description : Result )
Contract :ICCMP_BT_CSPC (View Description : Contract )
I want to know how to change these view description . I debugged sone methods of component CRMCMP_BPIDENT but did no get anything regarding view description . I can get the whole page description of account identification in GET_STATE_DESCRIPTION but I need view description.
PLease help me to get the solution.
Thanks & Regards,
Akhilesh Bhagat.
How to transport territory data from quality to production
Hi,
We have some problem in production's territory table CRMM_TERRITORY, it is broken.
Is there any way we can transport some information from quality server to production server
data related to the table CRMM_TERRITORY?
Thanks.
AET Table creation added fields in crmd_orderadm_h table?
Hi Team,
I have created AET tabel form view and display to service order screeen in CRMD_ORDERADM_H...i want to save the data in CRMD_ORDERADM_H.Now these fields not avaible in CRMD_ORDERADM_H..seperate table will be created..
I want to add these fields in to crmd_orderadm_h table..but i click on append strucuture in orderadm_h ..it is getting information already table is appended..but fields not showingin crmd_orderadmh table..please help urgent.