VA01信贷使用
业务在正式机中发现，当使用VA01输入客户编号回车后会报错
1\. SE24进入CL_IM_UKM_SD_FSCM_INTEGR1
2\. 双击方法IF_EX_BADI_SD_CM~FSCM_CREDIT_CHECK_ORDER
3\. 找到并进入cl_ukm_xi_facade_r3_50=>if_ukm_credit_query_r3~check_credit
4\. 在此处创建隐式增强
ZSD_WS_Credit
FSCM Credit Webservice Enhancement
5.粘贴的代码
"-----------------------------------------@斌将军--------------------------------------------ENHANCEMENT 1 ZSD_WS_CREDIT. "active version """""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""$"$\SE:(2) Class CL_UKM_XI_FACADE_R3_50, Interface IF_UKM_CREDIT_QUERY_R3, Method CHECK_CREDIT, Start, Enhancement ZSD_WS_CREDIT, Start A* Data Declarations that would be used for local mapping of structures
DATA: ls_query1 TYPE ukmr3_credit_worthiness_query, ls_response1 TYPE ukmr3_cw_response, lx_exc1 TYPE REF TO cx_root, lx_ai1 TYPE REF TO cx_ai_system_fault, e_message1 LIKE LINE OF et_return, ltext1 TYPE string.* Data declaration to get the input data to the proxy DATA: ls_input TYPE ukm_credit_worthiness_q_in, ls_ouput TYPE ukm_credit_worthiness_r_out, ls_chk_sch TYPE ukm_credit_worthiness_query_ch,* ls_chk_sch1 TYPE ukmr3_cw_checkingschedule1, ls_chk_sch1 LIKE LINE OF ls_query1-credit_worthiness_query-credit_worthiness_query-checking_schedule, lref_wor_qu TYPE REF TO cl_ukm_credit_worthiness_query, ls_in_cre_par TYPE ukm_cw_creditor_party,* ls_out_cre_par TYPE ukmr3_cw_creditor_party2, ls_out_cre_par TYPE ukm_cw_creditor_party, ls_in_sel_par TYPE ukm_cw_seller_party,* ls_out_sel_par TYPE ukmr3_cw_seller_party2, ls_out_sel_par TYPE ukm_cw_seller_party, ls_in_pro_cat TYPE ukm_cw_product_category,* ls_out_pro_cat TYPE ukmr3_cw_product_category2. ls_out_pro_cat TYPE ukm_cw_product_category.
**Using the below method convert the Import Parameters coming into Check Credit Method - query data being sent to PI CALL METHOD cl_ukm_xi_facade_r3_50=>credit_query_convert_outbound EXPORTING i_partner = i_partner i_credit_sgmnt = i_credit_sgmnt i_amount = i_amount i_currency = i_currency i_checkrule = i_checkrule i_checkseverity = i_checkseverity i_retrieval_flag = i_retrieval_flag i_effective_date = i_effective_date i_log_reference = i_log_reference it_schedule = it_schedule IMPORTING es_query = ls_query1.• Map the values from ls_query1 to ls_input and than calling the inbound proxy of FSCM* information of the segment id
MOVE: ls_query1-credit_worthiness_query-credit_worthiness_query-credit_segment_internal_id TO ls_input-credit_worthiness_query-credit_worthiness_query-credit_segment_internal_id,
• information of the amount to be checked ls_query1-credit_worthiness_query-credit_worthiness_query-checked_amount-currency_code TO ls_input-credit_worthiness_query-credit_worthiness_query-checked_amount-currency_code,
ls_query1-credit_worthiness_query-credit_worthiness_query-checked_amount-VALUE TO ls_input-credit_worthiness_query-credit_worthiness_query-checked_amount-VALUE,* Details of the rule code ls_query1-credit_worthiness_query-credit_worthiness_query-checking_rule_code TO ls_input-credit_worthiness_query-credit_worthiness_query-checking_rule_code,
• Details of severity code ls_query1-credit_worthiness_query-credit_worthiness_query-checking_severity_code TO ls_input-credit_worthiness_query-credit_worthiness_query-checking_severity_code,
• Details of permission indicator ls_query1-credit_worthiness_query-credit_worthiness_query-car_permission_indicator TO ls_input-credit_worthiness_query-credit_worthiness_query-credit_agency_permission_ind.
LOOP AT ls_query1-credit_worthiness_query-credit_worthiness_query-checking_schedule INTO ls_chk_sch1.MOVE: ls_chk_sch1-valuation_date TO ls_chk_sch-valuation_date, ls_chk_sch1-checked_amount TO ls_chk_sch-checked_amount, ls_chk_sch1-credit_segment_internal_id TO ls_chk_sch-credit_segment_internal_id, ls_chk_sch1-debtor_party-scheme_id TO ls_chk_sch-debtor_party-scheme_id, ls_chk_sch1-debtor_party-scheme_agency_id TO ls_chk_sch-debtor_party-scheme_agency_id, ls_chk_sch1-debtor_party-VALUE TO ls_chk_sch-debtor_party-VALUE.
APPEND ls_chk_sch TO ls_input-credit_worthiness_query-credit_worthiness_query-checking_schedule. CLEAR ls_chk_sch.
ENDLOOP.• setting up values of DEBTOR PARTY MOVE: ls_query1-credit_worthiness_query-credit_worthiness_query-debtor_party-internal_id-scheme_id TO ls_input-credit_worthiness_query-credit_worthiness_query-debtor_party-internal_id-scheme_id,
ls_query1-credit_worthiness_query-credit_worthiness_query-debtor_party-internal_id-scheme_agency_id TO ls_input-credit_worthiness_query-credit_worthiness_query-debtor_party-internal_id-scheme_agency_id,
ls_query1-credit_worthiness_query-credit_worthiness_query-debtor_party-internal_id-VALUE TO ls_input-credit_worthiness_query-credit_worthiness_query-debtor_party-internal_id-VALUE,
• setting up values of CREDITOR PARTY ls_query1-credit_worthiness_query-credit_worthiness_query-creditor_party-internal_id-scheme_id TO ls_input-credit_worthiness_query-credit_worthiness_query-creditor_party-internal_id-scheme_id,
ls_query1-credit_worthiness_query-credit_worthiness_query-creditor_party-internal_id-scheme_agency_id TO ls_input-credit_worthiness_query-credit_worthiness_query-creditor_party-internal_id-scheme_agency_id,
ls_query1-credit_worthiness_query-credit_worthiness_query-creditor_party-internal_id-VALUE TO ls_input-credit_worthiness_query-credit_worthiness_query-creditor_party-internal_id-VALUE,
• setting up values of seller party ls_query1-credit_worthiness_query-credit_worthiness_query-seller_party-internal_id-scheme_id TO ls_input-credit_worthiness_query-credit_worthiness_query-seller_party-internal_id-scheme_id,
ls_query1-credit_worthiness_query-credit_worthiness_query-seller_party-internal_id-scheme_agency_id TO ls_input-credit_worthiness_query-credit_worthiness_query-seller_party-internal_id-scheme_agency_id,
ls_query1-credit_worthiness_query-credit_worthiness_query-seller_party-internal_id-VALUE TO ls_input-credit_worthiness_query-credit_worthiness_query-seller_party-internal_id-VALUE,
• setting up values of product category ls_query1-credit_worthiness_query-credit_worthiness_query-product_category-internal_id-scheme_id TO ls_input-credit_worthiness_query-credit_worthiness_query-product_category-internal_id-scheme_id,
ls_query1-credit_worthiness_query-credit_worthiness_query-product_category-internal_id-scheme_agency_id TO ls_input-credit_worthiness_query-credit_worthiness_query-product_category-internal_id-scheme_agency_id,
ls_query1-credit_worthiness_query-credit_worthiness_query-product_category-internal_id-VALUE TO ls_input-credit_worthiness_query-credit_worthiness_query-product_category-internal_id-VALUE.
** Call the inbound Proxy with the data mapped in previous steps **** This is the Proxy method that is called when the FSCM inbound call
...
