Linha Microsiga Protheus

Árvore de páginas

Acrescentado parâmetro de número da nota fiscal selecionada no PE MTValRps

Linha de Produto:

Microsiga Protheus

Segmento:

Serviços

Módulo:

Faturamento (SIGAFAT)

Função:

Emissão de Notas Fiscais de Saída (MATXFUNA.PRX)

Situação/Requisito:

Ponto de entrada MTValRps valida apenas a série da nota escolhida. Foi solicitado que o PE também permita a validação no número escolhido.

Solução/Implementação:

Foi realizada uma melhoria onde o número da nota selecionado pelo usuário durante a emissão de notas fiscais de saída também é passado via parâmetro cNumNf , permitindo que funções de usuário validem também este valor.

Exemplo de PE:

User Function MTVALRPS()
Local lRet := .T. 
Local cPrefix := ""
Local cNum := ""

IF !Empty(ParamIxb[1]) .And. !Empty(ParamIxb[2])
cPrefix := ParamIxb[1]
cNum := ParamIxb[2]
//Impede a seleção de notas entre a sequencia 000005-000010 e Série 'A'
If AllTrim(cPrefix) == 'A' .And. ( Val(cNum) <= 10 .And. Val(cNum) >= 5 )
lRet := .F.
EndIf

EndIf

Return lRet