Histórico da Página

Índice

maxLevel	2
minLevel	2
style	circle

01. VISÃO GERAL

A rotina Faturas a Pagar permite aglutinar vários títulos em outros, com diversas parcelas, para o mesmo fornecedor e permite gerá-los apenas para a loja do título principal ou se desejar para todas as lojas do fornecedor.

Estas transações atendem empresas que emitem ou recebem várias notas e apenas uma fatura.

Nesta operação novos títulos são gerados e o sistema solicita o Código da Condição de Pagamento no qual é definido o desdobramento do título, baixando os títulos originais.

02. EXECUÇÃO

Manual

Procedimento efetuado de forma manual via rotina Faturas a Pagar (FINA290), com exibição das telas envolvidas no processo e necessitando de ações/comandos do usuário

...

Bloco de código

language	java
theme	Midnight
title	Exemplo de rotina automática
collapse	true

#include “Protheus.ch”

User Function F290Fat2()

Local aCab := {} // array que recebera as informações do titulo
Local aFatPagAut := {} // array que recebera dados para geração da fatura
Local aTit := {}
Private lMsErroAuto := .F.

//|-------------------------------|
//| ARRAY DE TITULOS              |
//|-------------------------------|


aTit := {{ "FIN" /*Prefixo*/,;

"FINA290 " /*Numero*/,;

"1" /*Parcela*/,;

"NF " /*Tipok*/,;

.F. /*Título localizado na geracao de fatura (lógico)*/},;

{ "FIN" /*Prefixo*/,;

"FINA290 " /*Numero*/,;

"2" /*Parcela*/,;

"NF " /*Tipok*/,;

.F. /*Título localizado na geracao de fatura (lógico)*/};
}

//|----------------------------------------------|
//| ARRAY DE GERAÇÃO FATURA                      |
//|----------------------------------------------|


aFatPagAut := { "FIN" /*Prefixo*/,;

"FT" /*Tipo*/,;

"1520165" /*Numero da Fatura*/,;

"FIN2000028" /*Natureza*/, ;

CtoD("15/09/2016") /*Data de*/,;

CtoD("15/09/2016") /*Data Ate*/,;

"FIN142" /*Fornecedor*/,;

"01" /*Loja*/,;

"" /*Fornecedor para geracao*/,;

"" /*Loja do fornecedor para geracao*/,;

"003" /*Condicao de pagto*/,;

01 /*Moeda*/,;

aTit /*ARRAY com os titulos da fatura*/,;

/*Valor de decrescimo*/,;

/*Valor de acrescimo*/ 
}

MsExecAuto( { |x,y,z| FINA290(x,y,z)}, 3,aFatPagAut, .T.)//3 - Inclusao, 4 - Alteração, 5 - Exclusão (nPosArotina,aFatPag,lAutomato)

If lMsErroAuto
   MostraErro()
Else
   Alert("Fatura gerada com sucesso!")
Endif

Return

/*
______________________________________________________________________________________________________________________________________________

*/
#include “Protheus.ch”

User Function F290Fat2()

Local aCab := {} // array que recebera as informações do titulo
Local aFatPagAut := {} // array que recebera dados para geração da fatura
Local aTit := {}
Private lMsErroAuto := .F.

//|-------------------------------|
//| ARRAY DE TITULOS              |
//|-------------------------------|


aTit := {{ "FIN" /*Prefixo*/,;

"FINA290 " /*Numero*/,;

"1" /*Parcela*/,;

"NF " /*Tipok*/,;

.F. /*Título localizado na geracao de fatura (lógico)*/},;

{ "FIN" /*Prefixo*/,;

"FINA290 " /*Numero*/,;

"2" /*Parcela*/,;

"NF " /*Tipok*/,;

.F. /*Título localizado na geracao de fatura (lógico)*/};
}

//|----------------------------------------------|
//| ARRAY DE GERAÇÃO FATURA                      |
//|----------------------------------------------|


aFatPagAut := { "FIN" /*Prefixo*/,;

"FT" /*Tipo*/,;

"1520165" /*Numero da Fatura*/,;

"FIN2000028" /*Natureza*/, ;

CtoD("15/09/2016") /*Data de*/,;

CtoD("15/09/2016") /*Data Ate*/,;

"FIN142" /*Fornecedor*/,;

"01" /*Loja*/,;

"" /*Fornecedor para geracao*/,;

"" /*Loja do fornecedor para geracao*/,;

"003" /*Condicao de pagto*/,;

01 /*Moeda*/,;

aTit /*ARRAY com os titulos da fatura*/,;

/*Valor de decrescimo*/,;

/*Valor de acrescimo*/ 
}

MsExecAuto( { |x,y,z| FINA290(x,y,z)}, 3,aFatPagAut, .T.)//3 - Inclusao, 4 - Alteração, 5 - Exclusão (nPosArotina,aFatPag,lAutomato)

If lMsErroAuto
   MostraErro()
Else
   Alert("Fatura gerada com sucesso!")
Endif

Return

03. OPERAÇÕES

SelecionarEsta opção permite incluir títulos para aglutinação.
VisualizarEsta opção permite visualizar todos os dados do título, independente do seu tipo.
PesquisarEsta opção permite pesquisar títulos com as opções de filtro e por configuração de perguntas (F12).
CancelarEsta operação efetua a contrapartida da fatura, ou seja estornar o valor que eu paguei.
LegendaImage Added
Imprimir Broswe

04. PARÂMETROS APLICADOS

05. REGRA FINANCEIRA

...

Árvore de páginas

Versões comparadas

Versão antiga 2

Nova versão 3

Chave

01. VISÃO GERAL

02. EXECUÇÃO

03. OPERAÇÕES

04. PARÂMETROS APLICADOS

05. REGRA FINANCEIRA