Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Descrição:

Function NfeTotFin() - Esta rotina tem como objetivo verificar se o somatorio das parcelas é igual ao total de duplicatas do documento de Entrada.

Este ponto de entrada pode ser utilizado como última validação do folder financeiro na emissão da nota fiscal de entrada.
Ele deverá retornar .T. para um operação válida ou .F. para uma operação inválida.

Parâmetros:

PARAMIXB[1]
Tipo: CaracterArray
Descrição: Código do produto aHeader do getdados apresentado no folder Financeiro.

PARAMIXB[2]
Tipo: Numérico Array
Descrição: Saldo calculado pelo sistema
PARAMIXB[3]
Tipo: Caracter
Descrição: Filial Abastecida
PARAMIXB[4]
Tipo: Caracter
Descrição: Metodo (1 - Media de Vendas / 2 - Previsao de Vendas / 3 - Demanda Gerada)
PARAMIXB[5]
Tipo: Data
Descrição: Data De
PARAMIXB[6]
Tipo: Data
Descrição: Data Até
PARAMIXB[7 aCols do getdados apresentado no folder Financeiro.

PARAMIXB[3]
Tipo: Lógico
Descrição: Considera Dev. Venda
PARAMIXB[8]
Tipo: Numérico
Descrição: Incremento (%)
PARAMIXB[9]
Tipo: Numérico
Descrição: Dias de cobertura
PARAMIXB[10]
Tipo: Caracter
Descrição: Se tipo de sugestão for "Transferência", código do cliente / fornecedor
PARAMIXB[11]
Tipo: Caracter
Descrição: Se tipo de sugestão for "Transferência", código da loja do cliente / fornecedor Informa se a rotina deverá continua no fluxo normal do processo.

Retorno:

lLocRet
Tipo: Lógico
Descrição: Este retorno informa se a rotina deverá continua no fluxo normal do processo (.T.) ou deverá ser interrompido devido à alguma violação na regra de negócio (.F.).

Exemplo:

User

Function MT179CONS()
Return nSldConsumo

Function MT103FIN()

Local aLocHead := PARAMIXB[1] // aHeader do getdados apresentado no folter Financeiro.
Local aLocCols := PARAMIXB[2] // aCols do getdados apresentado no folter Financeiro.
Local lLocRet := PARAMIXB[3] // Flag de validações anteriores padrões do sistema.

// Caso este flag esteja como .T., todas as validações
// anteriores foram aceitas com sucesso, no contrário, .F.
// indica que alguma validação anterior NÃO foi aceita.

If aLocCols[1][3]<100
Alert('Somente será permitido notas fiscais com vencimentos superiores a R$100,00.')
lLocRet := .F.
EndIf

Return(lLocRet)