Cross Segmentos/Totvs Backoffice Prothreus - SIGACOM - Exemplo Ponto de Entrada MT100TOK para verificação dos campos na tabela DKD

Tempo aproximado para leitura: 00:03:00 min

Dúvida
Exemplo da configuração do ponto de entrada MT100TOK, para verificação de campos customizados na tabela DKD.

Tabela DKD campos customizados na SD1

Ambiente
Cross Segmento - TOTVS Backoffice (Linha Protheus) - Compras - A partir do release 12.1.33

Solução

#Include "Protheus.ch"
#Include "RwMake.ch"
#Include "TbiConn.ch"

User Function MT100TOK()

Local lRet := .T.
Local nX := 1
Default aColsDKD := {}

For nX := 1 To Len(aColsDKD)
    IF Empty(aColsDKD[nX][2])

        MSGALERT(" Você deve digitar uma OBS no campo DKD_OBS do Item: " +cValToChar(aColsDKD[nX][1]))
        lRet := .F.

    EndIf

Next nX

Return lRet

Saiba Mais :

Pontos de entrada disponíveis na MATA103

PÁGINA CENTRALIZADORA COMPRAS

Mais Artigos Materiais - Compras (SIGACOM)