Linha Microsiga Protheus

Árvore de páginas

Ponto-de-Entrada: MTVALRPS - Validar série e número na emissão do RPS


Versões:Protheus
Idiomas:Todos


Descrição:

Esse ponto de entrada tem a função de validar a série e número escolhida no momento da emissão do RPS, para poder permitir ou não o faturamento da nota.



Programa Fonte
MATXFUNA.PRW

Sintaxe

MTVALRPS( cSerNF, cNumNF ) --> lFatura


Parâmetros:


NomeTipoDescriçãoObrigatório
cSerNFCaracterSérie escolhida pelo usuário no momento do faturamento.X
cNumNFCaracterNúmero escolhido pelo usuário no momento do faturamentoX


Retorno
lFatura - Tipo: Lógico, sendo:

.T. - Permite a emissão da nota.
.F. - Cancela a emissão da nota.

Exemplo:


#Include 'Protheus.ch'

User Function MTVALRPS()

Local _cSerNF  := PARAMIXB[1]	//Série da NF
Local _cNumNF  := PARAMIXB[2]	//Número da NF
Local _lFatura := .T.

If AllTrim(_cSerNF) == "A"
	_lFatura := .F.
EndIf

Return _lFatura