Tempo aproximado para leitura: 00:00:40 min
Dúvida
Como implementar o ponto de entrada EDIREG40 - Revisão de campos gravados no fonte?
Ambiente
TOTVS Logística - TOTVS TMS (Linha Protheus) - Gestão de Transportes (TMS) - Todas as versões
Solução
O ponto de entrada EDIREG40 é utilizado para verificação de campos que serão gravados no arquivo de trabalho RT2 no fonte EDIMT.
Programa Fonte: EDIMT.PRW
Sintaxe: EDIREG40 - Revisão de campos gravados no fonte ( [ ] )
Parâmetros:
| Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
| Array of Record |
Retorno:
()
Observações: Como este ponto de entrada foi incluído antes do MSUNLOCK na tabela RT2 é possível fazer verificações e alterar campos como os opcionais.
Exemplos:
#Include "Protheus.ch"
User Function EDIREG40()//--Alterando valores do ICMS e FRETE sempre que passar pelo ponto.
RT2->VALICMS := "10"
RT2->VALFRET := "200"
MSGALERT("Passou pelo Ponto de entrada EDIREG40")
Return Nil
Variáveis:
| Nome | Tipo | Escopo | Pode Alterar | descrição | ||||||||||
| Array of Record | Global | Não |
0 Comentários