RCCSEC_MIGRATION_075 is a standard Executable ABAP Report available within your SAP system (depending on your version and release level). It is used for You can use this program to encrypt or decrypt credit card numbers that are stored in a readable format in the databases of Travel Management...see full standard documentation available for this report. Also check out the submitted Comments related to this SAP report and the details below to see which OBJECTS it interacts with such as TABLES, FUNCTION MODULES, INCLUDES ETC.
If you would like to execute this report or see the full code listing simply enter RCCSEC_MIGRATION_075 into the relevant SAP transactions such as SE38 or SE80
This report can be called from another progam/report simply by using the ABAP SUBMIT statement, see below for example ABAP code snipts of how to do this.
Selection Text: I_CCOMP = D .
Selection Text: IT_PERNR = D .
Selection Text: I_TRANS = Transaction Data
Selection Text: I_TEST = Test Run
Selection Text: I_TE = TE Cluster EXBEL (Mask. Only)
Selection Text: I_TC = Credit Card Clearing
Selection Text: I_HOTEL = Hotel: Guarantee, Deposit
Selection Text: I_FOP = Credit Cards of the Enterprise
Selection Text: I_ENCRYP = Encrypt
Selection Text: I_DECRYP = Decrypt
Selection Text: I_CUSTOM = Customizing Data
Selection Text: I_CCC = Credit Card Clearing Error
Selection Text: I_CAR = Car Rental: Guarantee, Deposit
Title: Migration of Credit Card Encryption in Travel Management
Text Symbol: P02 = Migrating entries
Text Symbol: P01 = Selecting entries with credit card numbers to be migrated
Text Symbol: M01 = TE cluster EXBEL can only be masked (encryption option)
Text Symbol: C06 = (Cluster TE Tab EXBEL; only one-time masking is possible!)
Text Symbol: C05 = (Table FTPT_CAR)
Text Symbol: C04 = (Table FTPT_HOTEL)
Text Symbol: C03 = (Table PTRV_CCC)
Text Symbol: C02 = (Cluster TC)
Text Symbol: C01 = (Table TA23PF)
Text Symbol: AL6 = Cluster TE Key Fields
Text Symbol: AL5 = Cluster TC Key (Pers.No.)
Text Symbol: AL4 = FTPT_CAR Key Fields
Text Symbol: AL3 = FTPT_HOTEL Key Fields
Text Symbol: AL2 = PTRV_CCC Key
Text Symbol: AL1 = TA23PF Key Fields
Text Symbol: 053 = Statistics for Decryption of Data Records in Test Run
Text Symbol: 052 = Statistics for Decryption of Data Records
Text Symbol: 051 = Statistics for Encryption of Data Records in Test Run
Text Symbol: 050 = Statistics for Encryption of Data Records
Text Symbol: 020 = Processing Mode
Text Symbol: 010 = Control Data
Text Symbol: 003 = Transaction Data
Text Symbol: 002 = Customizing Data
Text Symbol: 001 = Selection
No INCLUDES are used within this REPORT code!
No SAP DATABASE tables are accessed within this REPORT code!
SAPGUI_PROGRESS_INDICATOR call function 'SAPGUI_PROGRESS_INDICATOR' exporting percentage = gv_progress_perc text = text-p01.
SAPGUI_PROGRESS_INDICATOR call function 'SAPGUI_PROGRESS_INDICATOR' exporting percentage = gv_progress_perc text = text-p02.
CCSECP_READ_CUSTOMIZING CALL FUNCTION 'CCSECP_READ_CUSTOMIZING' IMPORTING e_seclv = gv_seclv.
CCSECP_CHECK_DISPLAY_ALLOWED CALL FUNCTION 'CCSECP_CHECK_DISPLAY_ALLOWED' EXCEPTIONS no_authorization = 1 OTHERS = 2.
CCSECP_CHECK_DISPLAY_ALLOWED * CALL FUNCTION 'CCSECP_CHECK_DISPLAY_ALLOWED' * EXCEPTIONS * NO_AUTHORIZATION = 1 * OTHERS = 2.
REUSE_ALV_FIELDCATALOG_MERGE CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE' EXPORTING i_program_name = rp_repid i_internal_tabname = rp_tabname i_structure_name = rp_strucname i_client_never_display = 'X' CHANGING ct_fieldcat = rt_fieldcat EXCEPTIONS inconsistent_interface = 1 program_error = 2.
REUSE_ALV_GRID_DISPLAY CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY' EXPORTING i_callback_program = gp_repid i_structure_name = 'PTRV_CCSECMIGR075' is_layout = gs_layout it_fieldcat = gt_fieldcat[] i_grid_title = gv_grid_title i_save = 'A' TABLES t_outtab = pt_statmigr.
PTRM_UTIL_IMPORT_TC_CLUSTER CALL FUNCTION 'PTRM_UTIL_IMPORT_TC_CLUSTER' EXPORTING i_pernr = lv_pernr i_sw_decryption = space IMPORTING et_ccbel = lt_ccbel[] et_inbel = lt_inbel[] et_trans = lt_trans[] e_letzt = lv_letzt e_subrc = lv_tc_subrc.
PTRM_UTIL_CCNUM_ENCRYPT_STORE CALL FUNCTION 'PTRM_UTIL_CCNUM_ENCRYPT_STORE' EXPORTING i_cc_provider = ls_ta23pf-fop_text(2) i_cc_number = lv_cc_number IMPORTING e_cc_number_masked = lv_cc_number_masked e_cc_number_guid = ls_ta23pf-fop_text_guid EXCEPTIONS encryption_error = 1 OTHERS = 2.
CCSECP_CCNUM_DECRYPTION CALL FUNCTION 'CCSECP_CCNUM_DECRYPTION' EXPORTING i_enctype = '2' "tab ccsec_enc i_guid = ls_ta23pf-fop_text_guid IMPORTING e_ccnum = lv_cc_number EXCEPTIONS decryption_error = 1 invalid_card_guid = 2 OTHERS = 3.
PTRM_UTIL_EXPORT_TC_CLUSTER CALL FUNCTION 'PTRM_UTIL_EXPORT_TC_CLUSTER' EXPORTING i_pernr = lv_pernr it_ccbel = lt_ccbel[] it_inbel = lt_inbel[] it_trans = lt_trans[] i_letzt = lv_letzt i_sw_nomessage = 'X' IMPORTING * et_ccbel = ccbel[] * et_inbel = inbel[] * et_trans = trans[] * e_letzt = letzt e_subrc = lv_return.
CCSECP_CCNUM_DECRYPTION CALL FUNCTION 'CCSECP_CCNUM_DECRYPTION' EXPORTING i_enctype = '2' "tab ccsec_enc i_guid = ls_ccbel-ccard_guid IMPORTING e_ccnum = lv_cc_number EXCEPTIONS decryption_error = 1 invalid_card_guid = 2 OTHERS = 3.
CCSECP_CCNUM_DECRYPTION CALL FUNCTION 'CCSECP_CCNUM_DECRYPTION' EXPORTING i_enctype = '2' "tab ccsec_enc i_guid = ls_inbel-ccard_guid IMPORTING e_ccnum = lv_cc_number EXCEPTIONS decryption_error = 1 invalid_card_guid = 2 OTHERS = 3.
CCSECP_CCNUM_DECRYPTION CALL FUNCTION 'CCSECP_CCNUM_DECRYPTION' EXPORTING i_enctype = '2' "tab ccsec_enc i_guid = ls_trans-ccard_guid IMPORTING e_ccnum = lv_cc_number EXCEPTIONS decryption_error = 1 invalid_card_guid = 2 OTHERS = 3.
PTRM_UTIL_EXPORT_TC_CLUSTER CALL FUNCTION 'PTRM_UTIL_EXPORT_TC_CLUSTER' EXPORTING i_pernr = lv_pernr it_ccbel = lt_ccbel[] it_inbel = lt_inbel[] it_trans = lt_trans[] i_letzt = lv_letzt i_sw_nomessage = 'X' IMPORTING * et_ccbel = ccbel[] * et_inbel = inbel[] * et_trans = trans[] * e_letzt = letzt e_subrc = lv_return.
PTRM_UTIL_CCNUM_ENCRYPT_STORE CALL FUNCTION 'PTRM_UTIL_CCNUM_ENCRYPT_STORE' EXPORTING i_cc_provider = ls_ptrv_ccc-cardcomp i_cc_number = lv_cc_number IMPORTING e_cc_number_masked = lv_cc_number_masked e_cc_number_guid = ls_ptrv_ccc-cardnum_guid EXCEPTIONS encryption_error = 1 OTHERS = 2.
CCSECP_CCNUM_DECRYPTION CALL FUNCTION 'CCSECP_CCNUM_DECRYPTION' EXPORTING i_enctype = '2' "tab ccsec_enc i_guid = ls_ptrv_ccc-cardnum_guid IMPORTING e_ccnum = lv_cc_number EXCEPTIONS decryption_error = 1 invalid_card_guid = 2 OTHERS = 3.
SAPGUI_PROGRESS_INDICATOR CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR' EXPORTING percentage = 100 text = text-p02.
ICON_CREATE CALL FUNCTION 'ICON_CREATE' EXPORTING name = 'ICON_GREEN_LIGHT' * TEXT = ' ' * info = 'I' * ADD_STDINF = 'X' IMPORTING RESULT = gv_green EXCEPTIONS icon_not_found = 1 outputfield_too_short = 2 OTHERS = 3.
ICON_CREATE CALL FUNCTION 'ICON_CREATE' EXPORTING name = 'ICON_RED_LIGHT' * TEXT = ' ' info = 'E' * ADD_STDINF = 'X' IMPORTING RESULT = gv_red EXCEPTIONS icon_not_found = 1 outputfield_too_short = 2 OTHERS = 3.
ICON_CREATE CALL FUNCTION 'ICON_CREATE' EXPORTING name = 'ICON_YELLOW_LIGHT' * TEXT = ' ' info = 'W' * ADD_STDINF = 'X' IMPORTING RESULT = gv_yellow EXCEPTIONS icon_not_found = 1 outputfield_too_short = 2 OTHERS = 3.
PTRM_UTIL_CCNUM_ENCRYPT_STORE CALL FUNCTION 'PTRM_UTIL_CCNUM_ENCRYPT_STORE' EXPORTING i_cc_provider = p_guarantee(2) i_cc_number = lv_ccnum IMPORTING e_cc_number_masked = lv_ccnum_masked e_cc_number_guid = p_guarantee_guid EXCEPTIONS encryption_error = 1 OTHERS = 2.
PTRM_UTIL_CCNUM_ENCRYPT_STORE CALL FUNCTION 'PTRM_UTIL_CCNUM_ENCRYPT_STORE' EXPORTING i_cc_provider = p_deposit(2) i_cc_number = lv_ccnum IMPORTING e_cc_number_masked = lv_ccnum_masked e_cc_number_guid = p_deposit_guid EXCEPTIONS encryption_error = 1 OTHERS = 2.
CCSECP_CCNUM_DECRYPTION CALL FUNCTION 'CCSECP_CCNUM_DECRYPTION' EXPORTING i_enctype = '2' i_guid = p_guarantee_guid IMPORTING e_ccnum = lv_ccnum EXCEPTIONS decryption_error = 1 invalid_card_guid = 2 OTHERS = 3.
CCSECP_CCNUM_DECRYPTION CALL FUNCTION 'CCSECP_CCNUM_DECRYPTION' EXPORTING i_enctype = '2' i_guid = p_deposit_guid IMPORTING e_ccnum = lv_ccnum EXCEPTIONS decryption_error = 1 invalid_card_guid = 2 OTHERS = 3.
CCSECP_CCNUM_MASKING CALL FUNCTION 'CCSECP_CCNUM_MASKING' EXPORTING i_ccnum = lv_ccnum IMPORTING e_ccnum_masked = lv_ccnum_masked EXCEPTIONS not_available = 1 OTHERS = 2.
ENQUEUE_EPTRV CALL FUNCTION 'ENQUEUE_EPTRV' EXPORTING pernr = p_pernr reinr = p_reinr _scope = '1' EXCEPTIONS foreign_lock = 1 system_failure = 2 OTHERS = 3.
DEQUEUE_EPTRV CALL FUNCTION 'DEQUEUE_EPTRV' EXPORTING pernr = p_pernr reinr = p_reinr EXCEPTIONS OTHERS = 1.
ENQUEUE_EPCLTC CALL FUNCTION 'ENQUEUE_EPCLTC' EXPORTING relid = gv_relid_tc srtfd = lv_srtfd EXCEPTIONS foreign_lock = 1 system_failure = 2 OTHERS = 3.
DEQUEUE_EPCLTC CALL FUNCTION 'DEQUEUE_EPCLTC' EXPORTING relid = gv_relid_tc srtfd = pcl1-srtfd EXCEPTIONS OTHERS = 1.
VIEW_ENQUEUE CALL FUNCTION 'VIEW_ENQUEUE' EXPORTING action = p_action enqueue_mode = 'E' view_name = p_tabname enqueue_range = ' ' EXCEPTIONS client_reference = 1 foreign_lock = 2 invalid_action = 3 invalid_enqueue_mode = 4 system_failure = 5 table_not_found = 6 OTHERS = 7.
Although this basic information may have limited use it does provide an easy to find location to store any knowledge about this program/report.
The contribute/comments section below therefore offer's an opportunity for anyone to add additional information. This can be anything from useful hints, tips and screen shots to relevant SAP notes or anything else you feel is relevant to this report.
This will then be available for everyone to easily find by simply searching on the report name RCCSEC_MIGRATION_075 or its description.
RCCSEC_MIGRATION_075 - Migration of Credit Card Encryption in Travel Management RCCSEC_MIGRATION_075 - Migration of Credit Card Encryption in Travel Management RCCSEC_MIGRATION_070 - HCM Infotype 0105 Credit Card Encryption Data Conversion RCCSEC_MIGRATION_070 - HCM Infotype 0105 Credit Card Encryption Data Conversion RCCSEC_MIGRATION_060 - Program RCCSEC_MIGRATION_060 RCCSEC_MIGRATION_060 - Program RCCSEC_MIGRATION_060