Tempo aproximado para leitura: 00:03:00 min
Ocorrência
Ao copiar o cadastro de cliente/fornecedor não preenche o código de cliente automático.
Ambiente
Cross Segmentos - Backoffice Protheus - SIGAFAT - Todas as versões
Causa
As funções GetSXENum e GetSX8Num não existem por padrão no campo de Código do Cliente (A1_COD), alguns clientes inserem a validação manualmente, porém algumas particularidades não são tratadas pela função, veja mais detalhes em "Passo 2 - Função no Dicionário" no link:
Solução
A orientação da TOTVS, conforme documentação citada acima, é que seja utilizada uma função customizada para tratar o controle de numeração, apenas com a inserção das funções GetSXENum e GetSX8Num, em alguns cenários, podem ocorrer erros no controle de numeração.
Abaixo indicamos um exemplo de função, lembrando que trata-se apenas de um exemplo, caso necessite customizar, solicite o acompanhamento de seu analista programador:
#Include 'TOTVS.ch'
User Function NextSA1Cod()
Local cNum := GETSXENUM("SA1","A1_COD")
DbSelectArea("SA1")
SA1->(DbSetOrder(1))
While (DbSeek(xFilial("SA1")+cNum))
ConfirmSX8()
cNum := GETSXENUM("SA1","A1_COD")
Enddo
DbCloseArea()
RollbackSx8()
Return cNum
Saiba mais:
0 Comentários