Descrição

O ponto de entrada M103ALTS sugere séries diferentes baseados nos arrays informados

Observações

Quando o lançamento do Documento for efetuado manualmente, a rotina sugere a alteração, caso selecione a opção Sim a série é alterada, caso contrário não é permitido o lançamento.
Quando utilizado rotina automática o tratamento será automático ou seja, caso o documento já exista cadastrado ele tentará a próxima combinação, se estiver disponível utiliza, caso contrário tentará a próxima, caso não haja nenhuma disponível abortará o processo como ocorria anteriormente.

Idioma

Português(Brasil)

Versões

Microsiga_Protheus11

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Parâmetros

cNFiscal -> Código da Nota Fiscal
cNfSerie -> Série da Nota Fiscal
cA100For -> Código do Fornecedor
cLoja -> Código da Loja

Retorno

aSeries -> Array multidimensional com as alternativas para as séries
Cada linha será uma alternativa, sendo que a primeira coluna será do caractere adicional a série e a segunda coluna poderá ter o conteúdo numérico 1 ou 2, sendo que 1 representa prefixo, ou seja, o caracter será inserido a frente da série Exemplo: ".1" se o conteúdo for 2 representa sufixo, ou seja, adicionado a frente da série, Exemplo: "1."

Eventos de chamada do Ponto de Entrada

Via Rotina Automática (ExecAuto): Na validação do campo de Fornecedor do Documento de Entrada.
Via Rotina Manual (Em tela): Na validação do cabeçalho do Documento de Entrada.

Programa Fonte

MATA103.PRW

#Include 'Protheus.ch'

User Function M103ALTS(cNFiscal,cNfSerie,cCodFor,cLoja)

Local aSeries := {}

Aadd(aSeries,{".",1}) // Prefixo
Aadd(aSeries,{".",2}) // Sufixo
 
Return aSeries