Quantcast
Channel: SCN : All Content - SAP CRM: Webclient UI - Framework
Viewing all 4552 articles
Browse latest View live

Enhance LaunchTransactionAdmin.js file of BSP component UICMP_LTX ?

$
0
0

HI Expert ,

 

I want to enhance LaunchTransactionAdmin.js file of UI component : UICMP_LTX . I have enhanced UICMP_LTX component but still am not able to edit & enhance LaunchTransactionAdmin.js file  .

 

Please help....

 

 

 

 

Regards,

Rishi


How to show a custom Program In a View

$
0
0

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

http://cit47-srvr.ivlgroup.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 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

$
0
0

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

Untitled.png

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

Untitled.png

 

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

Untitled.png

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.

Untitled.png

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

Untitled.png

A popup will come

Untitled.pngUntitled.png

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

$
0
0

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

$
0
0

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 .

 

Capture.PNG

 

Thanks ,

Vaibhav

Update details in crm transaction

$
0
0

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?

$
0
0

the partner data is not populating

Field history not saved in Web UI

$
0
0

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

$
0
0

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

$
0
0

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

$
0
0

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

$
0
0

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

$
0
0

Hello Experts,

 

I have one simple requirement where I need to display some additional text beside the input field.

 

Please check the attached picture for reference.

Image.JPG

 

 

 

 

 

 

Can someone please help me get this?


Thank you.

Adjust Skin - How to change the colour of the caption of a view ?

$
0
0

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

 

Imagen1.png

Not getting an option to create new field using AET

$
0
0

Hi Experts ,

 

I am trying to add a field to a webui screen , but am not getting the option to 'Add new Field' using webui after clicking on show configurable ares .

 

Capture1.PNG

Capture2.PNG

In the above screenshot I ma not getting the option to add a field .

 

 

Thanks ,

Vaibhav


WebUI and SAP UI5

$
0
0

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

$
0
0

Hi Experts ,

 

Once we confirm the account , Reset button get disabled .

I want it to be visible even after account get confiremd.

 

reset.PNG

 

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

$
0
0

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

$
0
0

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?

$
0
0

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.

Viewing all 4552 articles
Browse latest View live


Latest Images

<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>