Árvore de páginas


01. DADOS GERAIS

Produto:

TOTVS Framework

Linha de Produto:

Linha Datasul

Segmento:

Tecnologia

Módulo:

Framework (Linha Datasul) - Utilitários (MUT)

Função:Utilitário CRC16
País:Brasil
Ticket:
Requisito/Story/Issue (informe o requisito relacionado) :DFWKTOOLS-6811


02. SITUAÇÃO/REQUISITO

Efetuar a implementação da geração do CRC-16 CCITT-TRUE (Kermit).

03. SOLUÇÃO

Foi disponibilizado um utilitário utp/ut-crc.p (Procedure ComputeChecksumKermit(INPUT <valor_para_codificar>, OUTPUT <valor_crc_16_kermit>) para que seja retornado o valor do CRC-16 CCITT-TRUE (Kermit) de acordo com um texto informado.

Segue abaixo um trecho de código com exemplo de sua utilização. Lembrando que os parâmetros de entrada e saida são no formato CHARACTER.

Exemplo de utilização
DEFINE VARIABLE hTest AS HANDLE NO-UNDO.

IF NOT VALID-HANDLE(hTest) THEN
	RUN utp/ut-crc.p PERSISTENT SET hTest.
    
DEFINE VARIABLE cValorCodificar   AS CHARACTER NO-UNDO.
DEFINE VARIABLE cValorCrc16Kermit AS CHARACTER NO-UNDO.

ASSIGN cValorCodificar = "123456789".

RUN ComputeChecksumKermit IN hTest(INPUT cValorCodificar, OUTPUT cValorCrc16Kermit).

/* DEVE EXIBIR O VALOR EM STRING "2189", REPRESENTAÇÃO EM HEXADECIMAL SEM O 0X */ 
MESSAGE cValorCrc16Kermit VIEW-AS ALERT-BOX. 

04. DEMAIS INFORMAÇÕES

IMPORTANTE!

Funcionalidade implementada somente para o sistema operacional Windows.


05. ASSUNTOS RELACIONADOS

  • Não se aplica.