FM Pas
FM Pas
FM Pas
METHOD on_init.
DATA:
ls_smp_dyntxt TYPE smp_dyntxt,
ls_sscr_restrict TYPE sscr_restrict,
ls_sscr_opt_list TYPE sscr_opt_list,
ls_sscr_ass TYPE sscr_ass.
.
CLEAR ls_smp_dyntxt.
ls_smp_dyntxt-text = 'Configurações'(t01).
ls_smp_dyntxt-icon_id = icon_configuration.
ls_smp_dyntxt-icon_text = 'Configurações'(t01).
sscrfields-functxt_01 = ls_smp_dyntxt.
ls_sscr_opt_list-name = 'ONLY_EQ'.
ls_sscr_opt_list-options-eq = 'X'.
APPEND ls_sscr_opt_list TO ls_sscr_restrict-opt_list_tab.
CLEAR: ls_sscr_ass.
ls_sscr_ass-kind = 'S'.
ls_sscr_ass-sg_main = 'I'.
ls_sscr_ass-sg_addy = space.
ls_sscr_ass-op_main = 'ONLY_EQ'.
ls_sscr_ass-op_addy = 'ONLY_EQ'.
ls_sscr_ass-name = 'S_ACCKEY'.
APPEND ls_sscr_ass TO ls_sscr_restrict-ass_tab.
********
SCMS_STRING_TO_XSTRING => Converte string para Xstring
***********
Página 1 de Funções
BDL_SERVER_PING => Ping em RFC destination
****************
C147_WORKAREA_TO_CHARFIELD => converter workarea em char (filler)
*********************
ALSM_EXCEL_TO_INTERNAL_TABLE or TEXT_CONVERT_XLS_TO_SAP => Excel para tabela interna ou
*****************
DEVELOPER_CHECK => para chave desenvolvedor
******************
READ_MULTIPLE_TEXTS => read_text multiplo
*********************
MOVE_CHAR_TO_NUM => Converte numero em um CHAR para tipo Númerico (package)
*********************
VIEWCLUSTER_MAINTENANCE_CALL => abrir cluster view
*************************
TREX_UTF8_TO_TEXT_LANG => Converter de UTF-8 para texto (Xstring)
*************************
HRCM_STRING_TO_AMOUNT_CONVERT => Converte string em decimal
*******************************
TR_SYS_PARAMS => informações do sistema (se é produtivo ou não)
**********************
Verificiar se o usuário é de sistema ou dialog
CALL FUNCTION 'SUSR_USER_LOGONDATA_GET'
EXPORTING
USER_NAME = sy-uname
IMPORTING
USER_LOGONDATA = ls_logond
EXCEPTIONS
OTHERS = 1.
IF SY-SUBRC <> 0 or ls_logond-ustyp <> 'A'.
* All but dialog users have to leave here
exit.
ENDIF.
***************************
VB_CP_CONVERT_STRING_2_ITF => convert string para itab TLINE
************************
ICON_CREATE => criar icone com quickinfo
*******************
GUID_CREATE: Criar GUID
************************
TADIR_ACCESS_KEY_CHECK: Check objeto standard liberado (chave objeto)
**************
SCMS_BASE64_ENCODE_STR ou SSFC_BASE64_ENCODE: Xstring to Base 64
****************
Obtem detalhes da tabela (estrutura) no programa #struct #itab
CALL FUNCTION 'GET_COMPONENT_LIST'
EXPORTING
program = g_data_0200-program
fieldname = g_data_0250-table-program_name "of the table
TABLES
components = l_components_t.
*****************************************************
SYSTEM_CALLSTACK = Stack (Pilha) ABAP
constants:
BEGIN OF c_blocktype,
function TYPE abap_callstack_line-blocktype VALUE 'FUNCTION',
form TYPE abap_callstack_line-blocktype VALUE 'FORM',
END OF c_blocktype .
constants:
Página 2 de Funções
constants:
BEGIN OF c_blockname,
create_inbound_deliv TYPE abap_callstack_line-blockname VALUE 'J_1BNFE_CREATE_INBOUND_DELIV',
me_conf_read_avis TYPE abap_callstack_line-blockname VALUE 'ME_CONFIRMATION_READ_AVIS',
deliver_purchase_order TYPE abap_callstack_line-blockname VALUE 'DELIVER_PURCHASE_ORDER',
END OF c_blockname .
***********************************************************
TH_REDISPATCH => RESET TIMEOUT
*************************
RFC_HOST_TO_IP => Ping para saber IP (Server) - Local: CL_GUI_FRONTEND_SERVICES=>GET_IP_ADDRESS
*************************
RH_DYNAMIC_WHERE_BUILD => Converter ABAP para WHERE (SQL)
*****************
TH_IN_UPDATE_TASK => check update task
*******************
SE16N_INTERFACE => Se16n via se37
***********
RS_ACCESS_PERMISSION => Ao editar objeto ABAP (edit lock, etc) - Table TRDIR...
***********
COMPARE_TABLES : Comparar tabelas internas
************
http_activate_node: Ativar nó SICF
*****************
Página 3 de Funções