Tempo aproximado para leitura: 00:03:00 min
Dúvida
Exemplo de utilização do Ponto de Entrada M460NUM - Seleção da série
Ambiente
Cross Segmento - TOTVS Backoffice (Linha Protheus) - SIGAFAT - A partir da release 12.
Solução
O ponto de entrada é executado após a seleção da série na rotina de documento de saída.
Seu objetivo é permitir a troca da série e do número do documento através de customização local.
O número do documento de saída pode ser alterado através da variável Private cNumero e a série pela variável cSerie.
Observações:
1) O ponto de entrada é executado fora da transação do programa de preparação do documento de saída.
2) O ponto de entrada tem um comportamento diferente quando o parâmetro MV_TPNRNFS estiver configurado como 3. Nesta situação o valor informado na variável cNumero não condiz com o próximo número que será gerado e caso o desenvolvedor queira que o sistema obtenha o próximo número, deve-se atribuir a variável cNumero uma string vazia.
Exemplo
#Include 'Protheus.ch'
#INCLUDE "TOPCONN.CH"
User Function M460NUM()
Local aParam := ParamIxb
Local cNumero := "000460" //Número da NF
Local cSerie := "1" //Série da NF
Alert ("Ponto de Entrada M460NUM - NF: " + cNumero + " - Serie: " + cSerie)
Return
Saiba Mais
0 Comentários