Função Inserir Zeros a Esquerda

download Função Inserir Zeros a Esquerda

If you can't read please download the document

description

Tutorial

Transcript of Função Inserir Zeros a Esquerda

FUNO PARA INSERIR ZEROS A ESQUERDA.**************************************************************************************FORM insere_zeros CHANGING p_campo TYPE any. CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT' EXPORTING input = p_campo IMPORTING output = p_campo.ENDFORM. "insere_zeros************************************************************************************************************************************************************************************************************************************DELETAR ZEROS A ESQUERDAData: v_Txt(10) Value '0000000443'. Shift v_Txt Left Deleting Leading '0'.**********************************************************************************************************************************************