Index

Objective

Accounts payable are commitments represented by the purchase of goods, services, salaries, taxes, leasing, loans, contributions, machinery, inputs for production, and more.
The Accounts Payable routine of the Microsiga Protheus system controls all documents, also called bills, that the company pays and which can be: trade notes, checks, promissory notes, prepayments, advance payments, invoices, etc. The data registered contribute to decision making on all company commitments that involve the disbursement of resources, being also attributed to the following criteria:

Cash Flow preparation.
To make sure the term of payment is met, considering the possibility of getting discounts and, mainly, to avoid penalties leading to the payment of fines and interest.
To prioritize payments in the hypothesis of financial difficulties.
To identify situations contracted but not paid.
To ensure reconciliation with accounting balances.

The types of bills identify the amount pertaining to a determined income or expense. You must define them in table 05 (Bill Types) of the Configurator module or in the Bill Types routine.

You can add a bill to the portfolio payable manually (by personally typing bills) or automatically (from incoming invoices, provided that the Purchases and/or Stock and Costs modules are integrated with the Financial module).

To automatically generate the bill, the Purchases and/or Stock and Costs modules must be deployed and integrated, because the process depends on the receipt of incoming documents and purchase orders.
The Accounts Payable register is prepared as follows:

Incoming invoice created in the Stock and Costs module	Bills generated in Accounts Payable
101010 (R$ 6,000) in 6 installments of 1,000	101010 A - 1,000 101010 B - 1,000 101010 C - 1,000 101010 D - 1,000 101010 E - 1,000 101010 F - 1,000

To configure installments alphabetically, set the content of parameter MV_1DUP to the letter A. Yet, to divide installments numerically, select option 1.

Grouping the bills by nature generates results in a structured and organized manner (reports), which is a powerful management tool.

Use the breakdown option to generate multiple bills from a single bill, all with the same value (installment) or the value divided by the number of installments (total).

Invoicing, when integrated, generates bills payable through the Commission Update routine. These bills are displayed by default with option COM. Set parameter MV_3DUPREF to define their prefix.

The system tracks the suppliers history details like maximum balance, average and maximum arrears and control of balances payable as value due, overdue and others.

When paying bills, the system offers company X bank features, such as automatic payments and printing checks. You can post bills payable either manually or automatically, by unit or by batches received from banks.

You can control bills regarded for cash flow purposes, because when you add accounts payable, the system updates this flow and makes accounting entries through parameter settings and standardized entries.

Mental Map

Study the chart below to become acquainted with the features of this routine:

Linha Microsiga Protheus - Inglês > Accounts Payable - FINA050 - Financials - P12 > FINA050_390555.jpg

Before you start the addition process, press key [F12\] to set routine parameters, following these criteria:

Field:	Description
Display Acctg. Entry?	Select Yes or No to indicate whether to display accounting entry when booking online. Example: Yes.
Book Prov. Bills?	Select Yes or No to indicate whether to book provisional bills. Example: No.
Ent. accts in apportionment?	Select Yes or No whether to display fields for entry of debit and credit accounts in bill apportionment. Example: Yes.
Online Booking?	Select Yes or No to indicate whether to book transactions online; that is, one at a time (adding a bill, posting, generating a check, deleting, etc.) or offline, with all entries not made online are booked in one batch process. Example: No.
Gen. check f/ Adv.?	Select Yes or No to indicate whether to generate check for advance payment bills. Thus, the system enables field Check when you add the advance payment and when you enter its number, the bank transaction occurs. Example: Yes.
Apportion value?	Enter value for accounts payable apportionment. It offers options Gross (bill value plus taxes) and Net (value without taxes). Example: Gross.
Group Accounting Entry?	Select Yes or No to indicate whether to group accounting entries of apportionment in a single line, if accounts, cost center, item and value class are the same in the entries. Example: No.
Display apportionment deletion?	Select Yes or No to display apportionment screen when deleting the bill. Example: Yes.
Bank Trans. w/out check?	Enter whether to generate bank transaction when field Gen. Check f/ Adv. is filled out with option No. It offers these options: Yes: cash advance (with transaction). No: advance without bank transaction for submission of CNAB (DOC/TED). Example: No.
Gen. apportionment?	For situations involving multiple natures, enter whether to generate apportionment as nature/cost center. For tax values, it is applied only if value apportionment option is filled out as net. It offers options Bill and Bill/Taxes. Example: Bill.
Add Apportionment of a bill from a module other than Financials.	Select the bill and go to option Edit, access tab Accounting and find the field Apportionment (E2_RATEIO). When you select Yes or No, the apportionment screen is displayed. Example: No. Note: The bill cannot be booked for this situation.

In the main page of the routine, the following options are available:

You can add information from documents/bills to be paid by the company.
Upon selecting this option, choose the Branch desired and click Ok.
Follow the instructions in Main Fields to fill out the data.
See also the features available in Related Features.

You can edit information from documents/bills to be paid by the company.
Upon selecting this option, choose the Branch desired and click Ok.
Follow the instructions in Main Fields to adjust the data.
See also the features available in Related Features.

You cannot edit fields Nature (E2_NATUREZ), Due Date (E2_VENCTO), Actual Due Date (E2_VENCREA) and Value (E2_VALOR) if the financial bill has tax bill(s) posted, because these fields directly affect the data of tax bills.

You can delete a document/bill. To do so, select the item and click Related Features / Delete.
Check available data and click Confirm.
See also the features available in Related Features.

You can view information from documents/bills to be paid by the company.
See also the features available in Other Actions.

Use filters to search for information, ordering it in accordance with a given characteristic.
Example:

branch+prefix+bill no.+installment+type+supplier+store.
branch+paymt. order

Characteristically, you can add a provisional bill in the accounts payable routine without the company having the invoice or the official document. Thus, when the provisional bill is replaced by the original one, you can edit such data as values, nature, history, taxes, etc. You can also select bills of different currencies and generate them in the target currency following these criteria:

Do not convert: only bills of the currency selected are displayed for replacement.
Convert: all provisional bills from the supplier are displayed and the balances of the bills checked are converted to the currency selected.

When you activate option Replace, enter supplier number and bill store. If you prefer, use the standard query feature (press key F3).
A list of bills is displayed in accordance with selected supplier of type PR.
Select and confirm the bill. The system then offers the option to register the bill payable.

You can delete bills with breakdowns. When you activate this option, place the cursor on the bill that generates the breakdown you want to cancel and confirm the procedure.

This option allows viewing of apportionments generated while adding bills payable.

You can schedule the due date of the bill. Just enter the date desired and confirm it.

Run the default knowledge base routine of the system with generic information stored in files. This information can be pictures, texts, spreadsheets or any relevant file type.

Use this option to indicate the status of bills through colors and/or symbols.

Linha Microsiga Protheus - Inglês > Accounts Payable - FINA050 - Financials - P12 > fina050_legenda.jpg

To display processing log data on the bill selected, as well as to search its information ordered by filters in accordance with the characteristic desired, such as date+time or user+date+time.
Use option Details to view highlighted data on date, time, user, message, process and subprocess.

To locate and display accounting entries from the document that originated them.

To control documents when the bill is linked to them.

Use this option to query a contract (and its status) associated with a bill payable, as well as when the bill was generated from an incoming document composed of items from more than one purchase order with contract.

To edit bills payable in batches, through feature Facilitator (MATA984)

Main Fields

Field:

Description

Prefix:

To identify a set of bills that belong to the same group or branch. Once you enter the prefix, it becomes an integral part of the access key to the bill.

To configure installments alphabetically, set the content of parameter MV_1DUP to the letter A. Yet, to divide installments numerically, select option 1.

Bill No.:

Enter bill number.

Example:

FIN000024

Installment:

Enter bill installment. The system allows you to control the breakdowns of a bill.

Example:

1

Type:

Classify the bill by its purpose. The types are registered in table 05 (Bill Types) of module Configurator or in routine Bill Types. If needed, you can use the Standard Query feature to select the bill and fill out the field.

Example:

TX (this acronym refers to fees bill).

Special Types

Provisional Bills

Provide revenues that occur for budget/cash flow purposes.

When you deploy the bill, specify type PR or enter its status in field Bill Types.

To confirm it, use the Replace option, entering the code/store of customer/supplier.

Advances

Identify a bill paid in advance (PA); that is, paid fully or in part before the invoice is issued. Bank balance is updated online as there is inflow/outflow of money in the Bank.

When you deploy the bill, enter type RA or PA or advance receipt/payment in field Bill Types. Then, enter the data related to the advance: Bank, branch, account and check (only for payments).

Set parameter MV_PABRUTO to generate the advance payment, as follows:

Gross Value: when taxes are not deducted from advance payment.
Net Value: when taxes are deducted from advance payment.

System default is to add a PA calculating tax value on gross amount, generating a bill related to the net value and the bills for each withheld tax.

You can also withhold INSS in the advance payment by generating a bill of type INA to pay the tax. To do this, set field Calculate INSS to Yes. The full package involves some routines:

Addition of bills in accounts payable routine.
Payments bordereau.
Manual and automatic posting.
Clearing of accounts payable.
Payments bordereau with taxes.

Credit Notes

Used to indicate the existence of credit/debit notes in Customers or Suppliers. In these cases, the bank balance is not updated.

When you deploy a credit note, specify type NCC or NDF, or enter Credit Note/Debit Note in field Bill Types.

Deductions

Use this to enter values to be deducted from the bill. It is always linked to a main bill.

To deploy a deduction bill, enter type AB or the type indicated as Deduction in field Bill Types. Enter the prefix, number and installment of the main bill, or place the cursor on the main bill and enter the type related to the deduction.

If the system finds bills with keys similar to the key of the deduction you are adding, a screen is displayed with the bills for you to select the correct bill to be deducted.

Example:

Linha Microsiga Protheus - Inglês > Accounts Payable - FINA050 - Financials - P12 > image2019-8-6_16-24-24.png

Nature:

Identify the origin of the nature of the bill and use this item for consolidation, as well as to control the budget. If needed, you can use the Standard Query feature to select the nature of the bill and fill out the field.

Example:

ISS

This field will not be available for editing when the bill payable is booked or posted.

Supplier:

Enter supplier code. If needed, you can use the Standard Query feature to select the registered supplier and fill out the field.

Example:

FIN061

Store:

Enter the code of the supplier's store.

Example:

01

Supplier Name

Display the name of the supplier. This is automatically filled out in accordance with the content of field Supplier.

Example:

LE Supplier

Issue Dt.:

Date of bill issue.

Example:

12/17/2015

Due Date:

Enter the nominal due date of bill also taking any possible postponements into account.

Example:

Bill number FIN000024 is due on 12/17/2015, but due to business matters with the supplier, its payment is postponed 10 days. Thus, fill out this field with the date 12/27/2015.

The system does not allow a due date set before the issue date of the bill.

Actual Due Date:

Actual due date of bill automatically calculated from the date entered in field Due Date.

Example:

12/17/2015

The system takes only business days into account; that is, it checks whether the due date is on a Saturday, Sunday or holiday, disregarding these days. There is also the checking of the days of withholding suggested by the Bank, which includes the transfer of bills from the Bank to the portfolio and, consequently, adjusts the content of the field.

Bill Value:

Original value of the bill in currency.

Example:

1,835.62

History:

Use this field to add a short note about the bill.

Balance:

In this field, the system keeps the updated balance of the bill value after each transaction you make.

Example:

1,835.62

Currency:

Code of the currency used in the bill. Currency 1 = default domestic currency and currencies 2 to 5 in accordance with criteria set in parameters MV_MOEDA2, MV_MOEDA3, MV_MOEDA4 and MV_MOEDA5 through the Configurator module.

Example:

1

BRL Vl.:

Value of bill stated in currency.

Example:

1,835.62

Currency Rate:

If you enter a rate, it is used as conversion base at the time of posting; otherwise, the rate contracted or the currency date on day of posting is used.

Approv. Code:

Approver code of bill following simple approval rules or fixed fund competence. If needed, you can use the Standard Query feature to select the approver of the bill and fill out the field.

The fields of this folder are automatically filled out in accordance with the instructions registered in routines Nature and Supplier (here tax withholding follows the business rule attributed to the supplier).

The field contents can also come from routines that involve integrated processes, such as the TIO and Product registers.

You can adjust the values that are automatically filled out; however, they interfere in the calculation of the bill for payment.

Field

Description

ISS:

The content of this field refers to service tax and is automatically calculated by the system following this priority:

The system checks whether the class registered allows ISS calculation defined in the Calculate ISS? field.

In the Suppliers register, it checks the collection of ISS through the content defined in field Collect ISS?

Thus, when the field is filled out with Yes, the system does not perform the calculation (because the supplier collects the ISS). If it is set to option No, the system calculates it in accordance with MV_ALIQISS parameter settings.

The following parameters are also considered:

MV_MUNIC: Indicates the ISS provider. The system generates a new bill payable for the city government defined in this parameter, when the bill receivable is added.

MV_DIAISS: due date for paying the bill.

Example:

Rate of 5% in parameter MV_ALIQISS; that is, content equal to 5.
Registration of a nature that calculates ISS and of a supplier that does not collect this tax.
With this scenario, the addition of a bill payable of BRL 1,000.00 will have field ISS automatically filled out with the value BRL 50.00.

The system deducts the original ISS value from the bill; that is, in the aforementioned example, when you enter the value of 1,000.00 for the bill, it is converted to 950.00 (deducting 50.00 that refer to ISS).

While adding, the system automatically creates a bill (Type ISS) for payment of ISS collected for the city government.

IRRF:

Field IRRF (Income Tax Withheld by Tax Authorities) is automatically calculated in accordance with the priorities set for Natural Person and Legal Entity.

For both situations, the use of common parameters is worth considering; however, their settings meet each profile in their own way and occasion:

MV_VENCIRF: Indicate whether to generate the IR bill from the date of issue, due date or bill booking date.
MV_VLRETIR: Specify the minimum value for exemption from IRRF withholding. In this case, the bill with amount lower than this parameter is not generated and IR is zero.

The cummulativeness parameter affects only the Legal Entity calculation.

MV_ACMIRRF: Define whether to accrue minimum value of IRRF tax.

Natural Person Supplier

The system considers the IRRF Table or it may use the Nature Rate.

Some operations require the use of a rate different from the progressive table. In these situations, just fill out the following fields in the Nature Register:

IRRF calculation (ED_CALCIRF) = Yes

IRRF percentage (ED_PERCIRF) = 10

Capital interest (ED_JURCAP) = Yes

Examples of operations that use a rate different from progressive table:

Own Capital Interest, Contract Termination, Prizes in Goods or Services, etc.

Example:

If, when adding a bill payable, you consider a Natural Person supplier and set a percentage rate of 15% set in field IRRF Perc of the Nature Register, and also set field Calculate IRRF = Yes and field Cap Interest 1 = Yes.

When you enter a value of BRL 10,000.00, the system displays the following information: field value is recalculated and displays the value of BRL 8,500.00, whereas in the taxes tab, the system displays in IRRF field the value of BRL 1,500.00 and in field IRRF Base the system displays the value of BRL 10,000.00.

When you add the bill, the system generates a bill payable of type TX with the IRRF value calculated for the Federal Government.

For natural person IRRF calculation using progressive table, fill out the following fields in the Nature Register:

IRRF calculation (ED_CALCIRF) = Yes

IRRF percentage (ED_PERCIRF) = 0

Capital interest (ED_JURCAP) = No

Example:

You add a bill payable with a supplier that is a Legal Entity, setting a percentage of 3% in the IRRF Table and using a nature that calculates the IRRF with a percentage of 8%. If you enter a bill in the amount of BRL 1,000.00, the system automatically fills out the field IRRF with the value of 30.00 (considering the IRRF table, not the Natures register).

The system deducts the IRRF value from the original value of the bill. Thus, when you enter the amount of 1,000.00 for the bill, the system converts it to 970.00 (after deducting 30.00 pertaining to IRRF).

When you add the bill, the system generates a bill payable of type TX with the IRRF value calculated for the Federal Government.

Besides the IRRF Table, you must also set some influential parameters:

MV_VCTIRPF: uniquely generates the IRRF by date when the bill payable is from a Natural Person supplier. You may set its content in accordance with the following options:

E: to generate the bill related to the IRRF from the bill issue date.

V: to generate it from the bill due date.

C: to generate it from the bill booking date.

Example:

Issue of bill - E

Dados do título principal R$ 7.300,00 (R$ 10.000,00)
IRRF - R$ 2.700,00.
Data emissão do título - 01/09/2015.
Vencimento do título - 12/10/2015.

Dados do título TX de IRRF gerado
Valor principal do título R$ 2.700,00.
Vencimento do título 10/10/2015.

Vencimento - V

Dados do título principal R$ 7.300,00 (R$ 10.000,00)
IRRF - R$ 2.700,00.
Data emissão do título - 01/09/2015.
Vencimento do título - 12/10/2015.

Dados do título TX de IRRF gerado
Valor principal do título R$ 2.700,00.
Vencimento do título 10/11/2015.

Contabilização - C

Dados do título principal R$ 7.300,00 (R$ 10.000,00)
IRRF - R$ 2.700,00.
Data emissão do título - 01/09/2015.
Vencimento do título - 12/10/2015.
Data de contabilização - 01/09/2015.

Dados do título TX de IRRF gerado
Valor principal do título R$ 2.700,00.
Vencimento do título 10/10/2015.

Se não for criado o parâmetro MV_VCTIRPF o sistema manterá o tratamento para gerar o imposto de IRRF de acordo com o parâmetro MV_VENCIRF tanto para Pessoa Física como para Jurídica.

MV_TMSVDEP: contempla o cálculo do IRRF de Pessoas Físicas na emissão de títulos de contas a pagar, considerando o número de dependentes, desta forma, a geração do título desconta no cálculo do IRRF o valor por dependente definido pela Receita Federal.

Fornecedor Pessoa Jurídica

O sistema verifica os campos Calcula IRRF e Porc. IRRF localizados no cadastro de Naturezas e, também, o conteúdo do parâmetro MV_ALIQIRF.

Exemplo:

Definida a alíquota de 3% no parâmetro MV_ALIQIRF e uma natureza que calcula IRRF com percentual de 8%. Na inclusão de um título de R$ 1.000,00, o sistema preencherá o campo IRRF com o valor de R$ 80,00 (referente ao cadastro de Naturezas).

Cálculo e retenção de IR na fonte para Pessoas Jurídicas de acordo com o artigo 724, inciso II do RIR, aprovado pelo decreto nº 3.000/99

A retenção de imposto na fonte ocorre somente para os rendimentos que integram a base de cálculo do imposto devido pelas Pessoas Jurídicas tributadas com base no lucro real, presumido ou arbitrado.

Fica entendido que o fato gerador do IR-Fonte em relação a serviços prestados por Pessoas Jurídicas a outras Pessoas Jurídicas é diário e, portanto, notas fiscais do mesmo fornecedor e do mesmo dia devem ser somadas para efeito de limite e não devem ser somadas as notas fiscais cujos fatos geradores ocorram em dias diferentes.

Assim, se no mês houver mais de um pagamento ou crédito de rendimentos à mesma Pessoa Jurídica, o imposto será calculado sobre o valor de cada um e se não alcançar o valor mínimo de R$ 10,00 ficará dispensado de retenção, ainda que o montante do imposto apurado no mês sobre o somatório desses rendimentos ultrapasse esse limite.

Exemplo:

Descrição	Valores
Nota fiscal nº 100.	R$ 550,00
Nota fiscal nº 120.	R$ 650,00
Total a pagar no dia 10/09/2015.	R$ 1.200,00
IRRF a ser retido (R$ 1.200,00 x 1,5%).	R$ 18,00
Total líquido a pagar ao fornecedor (com retenção de IR).	R$ 1.182,00

O sistema efetua o cálculo do IRRF de acordo com a Tabela Progressiva para Fornecedor Pessoa Jurídica nos casos de representantes comerciais autônomos que exercem exclusivamente a mediação para a realização de negócios mercantis, quando praticada por conta de terceiros.

Para que o cálculo seja efetuado, é necessário, ao incluir um título de contas a pagar, associar um Fornecedor (Pessoa Jurídica) e que o campo IRRF Prog. esteja preenchido com a opção Sim.

Além da Tabela Progressiva, há também a influência e configuração de alguns parâmetros:

MV_VENCIRF e MV_MP447: retenção de IRRF na geração de títulos a pagar com o parâmetro, de acordo com a Medida Provisória 447/2008.

As datas de vencimento dos títulos de imposto gerados (IRRF e INSS) serão calculadas até o dia 20 do mês subsequente.

Exemplo:

Imposto	Conf. Parâmetro	Emissão título original	Vencimento título original	Vcto. Real título original	Data de Vencimento
IRRF	Emissão (MV_VENCIRF)	21/11/15	20/12/15	22/12/15	19/12/15
IRRF	Vencimento (MV_VENCIRF)	21/11/15	20/12/15	22/12/15	20/01/15

O parâmetro MV_MP447 só será considerado para o cálculo do vencimento de IRRF e INSS se o título apresentar data de ocorrência (Emissão ou Vencimento) a partir de 01/11/15. No exemplo, tanto a data de emissão quanto a de vencimento serão contempladas neste parâmetro.

MV_VENCCRC: tratamento diferenciado na geração dos impostos de IRRF de acordo com o artigo 34 da lei nº 10.833.

As entidades da Administração Pública Federal, atendendo ao disposto no artigo 34 da lei n. 10.833, estão obrigadas a efetuar retenções na fonte em títulos a pagar para o Imposto de Renda, CSLL, COFINS e PIS/PASEP.

Para atender a esta exigência da legislação, é necessário configurar o parâmetro MV_VENCCRC com conteúdo padrão igual a 6147#6175#6188#8739#8767#6190.

Exemplo:

Dados do título principal R$ 9.850,00 (R$ 10.000,00)
IRRF - R$ 150,00.
Data emissão do título - 01/09/2015.
Vencimento do título - 19/09/2015.

Dados do título TX de IRRF gerado
Valor principal do título R$ 150,00.
Vencimento do título 13/10/2015.

Se não for criado o parâmetro MV_VENCCRC o sistema manterá o tratamento padrão do sistema, definido pelo parâmetro MV_VENCIRF e que atende ao disposto no artigo 70 da lei 11.196 de 21/11/2005. Pelo exemplo apresentado, e de acordo com o parâmetro MV_VENCIRF, o vencimento do título de IRRF seria dia 10/10/15.

INSS:

Este campo contempla a Contribuição ao Instituto Nacional de Seguro Social e será preenchido automaticamente pelo sistema na inclusão de um título a pagar, de acordo com os seguintes critérios:

O sistema verifica se a natureza cadastrada permite o cálculo de INSS por meio do campo Calcula INSS?, bem como, seu respectivo percentual por meio do campo Porc. INSS.

No cadastro de Fornecedores verifica se o campo Calcula INSS? está preenchido com Sim.

Exemplo:

Cadastro de uma Natureza que calcula INSS (percentual de 8%), cliente com cálculo de INSS e inclusão de um título a pagar de R$ 1.000,00 para o fornecedor. Com este cenário, o campo INSS será preenchido automaticamente com o valor de R$ 80,00.

O sistema abate o valor do INSS do valor original do título. No exemplo mencionado, ao informar o valor de 1.000,00 para o título, o sistema o converte para 920,00 (abatendo os 80,00 referente ao INSS).

No momento da inclusão do título, o sistema gera um título a pagar do tipo INS com o valor do INSS calculado para o INPS.

O conteúdo deste campo também sobre influência da configuração de alguns parâmetros:

MV_INSS: indica a natureza para classificação do título de INSS.
MV_VLRETIN: indica o valor mínimo para dispensa do recolhimento e não gera o título.
MV_VENCINS e MV_MP447: retenção de INSS na geração de títulos a pagar de acordo com a Medida Provisória 447/2008.

As datas de vencimento dos títulos de imposto gerados (IRRF e INSS) serão calculadas até o dia 20 do mês subsequente:

Exemplo:

Imposto	Conf.Parâmetro	Emissão título original	Vencimento título original	Vcto. Real título original	Data de vencimento
INSS	Emissão (MV_VENCINS)	21/11/15	20/12/15	22/12/15	19/12/15
INSS	Vencimento (MV_VENCINS)	21/11/15	20/12/15	22/12/15	20/01/15

O parâmetro MV_MP447 só é considerado para o cálculo do vencimento de IRRF e INSS se o título apresentar data de ocorrência (Emissão ou Vencimento) a partir de 01/11/15. No exemplo, tanto a data de emissão quanto a de vencimento serão contempladas neste parâmetro.

Gera DIRF:

Indica se o título será utilizado para geração da DIRF na integração com a Folha de Pagamento. Seu preenchimento é feito por meio da seleção entre as opções 1-Sim e 2-Não.

Exemplo:

2-Não

Código Retenção:

Permite flexibilizar os códigos diferenciados para retenção de impostos quando uma nota fiscal for incluída pelos módulos de Compras ou Financeiro com retenção de impostos de PIS, COFINS ou CSLL e os campos Cód. Ret. PIS, Cód. Ret. COF. ou Cód. Ret. CSL estiverem preenchidos, desta forma, as informações são gravadas na duplicata Pai ignorando os códigos pré-definidos atualmente no sistema, que são:

5952 - quando o título retém os três impostos: PIS, COFINS e CSLL.
5979 - quando o título retém somente PIS.
5960 - quando o título retém somente COFINS.
5987 - quando o título retém somente CSLL.

Nos impostos Filhos, são gravados os códigos de retenção no campo Cód. Retenção, de acordo com a informação dos novos campos, caso estejam criados e preenchidos. Quando não preenchidos, o sistema também grava neste campo, porém, utiliza o mesmo tratamento da duplicata Pai.

Exemplos:

Inclusão de título a pagar com retenção de PIS, COFINS ou CSLL sem o preenchimento dos campos Cód. Ret. PIS, Cód. Ret. COF e Cód. Ret. CSL:

- Título retém os três impostos: PIS, COFINS e CSLL.

Valor principal	R$ 6.000,00
PIS	R$ 39,00
COFINS	R$ 180,00
CSLL	R$ 60,00
Cód. Retenção	5952

- Título retém somente o imposto de PIS:

Valor principal	R$ 6.000,00
PIS	R$ 39,00
COFINS	R$ 0,00
CSLL	R$ 0,00
Cód. Retenção	5979

- Título retém somente o imposto de COFINS:

Valor principal	R$ 6.000,00
PIS	R$ 0,00
COFINS	R$ 180,00
CSLL	R$ 0,00
Cód. Retenção	5960

- Título retém somente imposto de CSLL:

Valor principal	R$ 6.000,00
PIS	R$ 0,00
COFINS	R$ 0,00
CSLL	R$ 60,00
Cód. Retenção	5987

- Inclusão de um título a pagar com os campos Cód. Ret. PIS = 3770 / Cód. Ret. COF = 5960 / Cód. Ret. CSL = 5987 preenchidos:

Valor principal	R$ 6.000,00
PIS	R$ 39,00
COFINS	R$ 180,00
CSLL	R$ 60,00
Cód. Retenção	3770
Cód.Ret.COFINS	5960
Cód.Ret.CSL	5987

SEST/SENAT:

O cálculo do valor das contribuições ao SEST/SENAT (Serviço Social do Transporte / Serviço Nacional de Aprendizagem do Transporte) pode ser gerado pelo módulo Financeiro quando não é utilizado o módulo de Gestão de Transportes.

O parâmetro MV_FORSEST indica o fornecedor padrão para os títulos de SEST.

COFINS:

Valor da Contribuição para o Financiamento da Seguridade Social calculado sobre a receita bruta de empresas.

Exemplo:

300,00

PIS/PASEP:

Valor correspondente à alíquota de 1% incidente sobre a folha de salários.

Exemplo:

65,00

CSLL:

Valor correspondente a alíquota da Contribuição social sobre lucro de acordo com as atividades realizadas.

Exemplo:

100

Base PCC:

Valor base utilizado para cálculo do imposto.

Exemplo:

10.000,00

Venc ISS:

Data de vencimento do ISS gerada na inclusão da Nota Fiscal de Entrada.

Vlr. Ac. Serv.:

Valor de serviço tomado dentro do mês, conforme Lei Municipal No. 1.802, de 26 de Dezembro de 1.969 de São Bernardo do Campo – SP.

Variac. DCTF:

Identifica a variação para o código de receita conforme Tabela de Códigos na DCTF.

Period. DCTF:

Identifica a periodicidade do código de receita utilizado na DCTF.

D: para periodicidade diária.
S: para periodicidade semanal.
X: para periodicidade decendial.
Q: para periodicidade quinzenal.
M: para periodicidade mensal.
B: para periodicidade bimestral.
T: para periodicidade trimestral.
U: para periodicidade quadrimestral.
E: para periodicidade semestral.
A: para periodicidade anual.

Form. Ret. ISS:

Indica a condição que deve ser aplicada no cálculo da retenção do ISSQN (Imposto Sobre o Serviço de Qualquer Natureza) para este título que pode considerar o valor mínimo para retenção ou reter sempre. O preenchimento do campo contempla as opções:

1 – Cons. Vlr. Min. (valor padrão).

2 – Sempre retém.

Aplic. Vl. Min.:

Define se os valores de retenção de PIS/COFINS lançados no título a pagar deverão respeitar o valor mínimo de retenção de R$ 5.000,00, apresentado na Lei 10.925 ou reter independente do valor. O preenchimento do campo contempla as opções:

1 – Sim.

2 – Não.

Parc. FETHAB:

Número da parcela do FETHAB (Fundo Estadual de Transporte e Habitação).

Vlr. FETHAB:

Valor do título do FETHAB (Fundo Estadual de Transporte e Habitação).

Cod. Aliq. ISS:

Este campo fica habilitado quando a alíquota de ISS foi cadastrada por meio da rotina Múltiplas Alíquotas de ISS e, desta forma, permite selecionar uma alíquota de ISS para o título a pagar. Se este campo não for preenchido, a alíquota utilizada no título a pagar, é a que foi definida no parâmetro MV_ALIQISS.

Base IRPF:

Base de cálculo dos impostos (quando apenas este campo estiver habilitado) ou base de Cálculo do IRRF quando outros campos da base de impostos estiverem habilitados. Desta forma, ele define se o cálculo de IRPF será reduzido, atendendo os casos contemplados na Instrução Normativa SRF nº 15 de 6 de fevereiro de 2001.

Ao informar o valor reduzido de IRPF, ele será calculado na baixa das contas a pagar, desta forma, é necessário:

Cadastro de Fornecedor: deve ser Pessoa Física, com a retenção de IR na Baixa do título.
Cadastro de Natureza: natureza que efetua o cálculo de IR e que tenha a base reduzida.

Fundamentação legal

Instrução Normativa SRF nº 15 de 6 de fevereiro de 2001

Art. 12. No caso de aluguéis de imóveis pagos por Pessoa Jurídica, não integram a base de cálculo para efeito de incidência do imposto de renda:

I - o valor dos impostos (IPTU), taxas e emolumentos incidentes sobre o bem que produzir o rendimento;

II - o aluguel pago pela locação do imóvel sublocado;

III - as despesas pagas para sua cobrança (boleto Bancário) ou recebimento;

IV - as despesas de condomínio.

§ 1º Os encargos acima somente podem ser excluídos do valor do aluguel quando o ônus tenha sido exclusivamente do locador.

§ 2º Quando o aluguel for recebido por meio de imobiliárias, procurador ou por qualquer outra pessoa designada pelo locador, considera-se data de recebimento aquela em que o locatário efetuou o pagamento, independentemente de quando for feito o repasse para o beneficiário.

§ 3º A indenização por rescisão antecipada ou término do contrato é considerada rendimento tributável para o beneficiário.

Cod. Ret. INSS:

Código de retenção do INSS.

ID DARF:

Identificação DARF (Documento de Arrecadação de Receitas Federais).

Prov. INSS:

Este campo armazena o provisionamento do INSS para títulos do tipo PA (Pagamento antecipado) de acordo com a configuração dos parâmetros MV_PABRUTO=2 e MV_PAPRIME=2.

Parc. FABOV:

Parcela do tributo FABOV (Fundo de apoio ao desenvolvimento da bovinocultura).

Vlr. FABOV:

Valor do tributo FABOV (Fundo de apoio ao desenvolvimento da bovinocultura).

Parc. FACS:

Parcela do tributo FACS (Fundo de apoio a cultura da soja).

Vlr. FACS:

Valor do tributo FACS (Fundo de apoio a cultura da soja).

Campo:

Descrição

Taxa Perman.:

Indica o valor que deve ser acrescentado ao título por dia de atraso de pagamento. Para efeito de cálculo, o sistema considera dias corridos e este campo tem prioridade sobre o campo Porc. Juros na baixa do título.

Caso necessário, a prioridade pode ser alterada de acordo com a configuração do parâmetro MV_FINJRTP que considera alguns critérios quando os títulos estiverem com ambos os campos preenchidos:

1 - Aplica somente a Taxa de Permanência (conteúdo padrão).

2 - Aplica somente Juros.

3 - Aplica a Taxa de Permanência e os Juros.

Exemplo:

Considerando um título com as seguintes características:

- Prefixo: 001.
- Número: 000014.
- Tipo: DP.
- Data da emissão: 10/04/15.
- Vencimento: 11/04/15.
- Vencimento real: 11/04/15.
- Valor original: 1.000,00.
- Taxa de permanência: 1,00.

Na baixa do título, o sistema apresenta as seguintes informações:

- Data da baixa do título: 16/04/15.
- Valor da taxa de permanência: 5,00 (referente a 5 dias de atraso).
- Valor recebido do título: 1.005,00.

Porc. Juros:

Neste campo deve ser informado o percentual de juros que será cobrado por dia de atraso no pagamento sobre o valor original do título. Para efeito de cálculo, o sistema considera dias corridos.

Para o sistema considerar o percentual de juros, o campo Taxa de Permanência não pode estar informado, caso contrário ele é considerado como prioridade.

Caso necessário, a prioridade pode ser alterada de acordo com a configuração do parâmetro MV_FINJRTP que considera alguns critérios quando os títulos estiverem com ambos os campos preenchidos:

1 - Aplica somente a Taxa de Permanência (conteúdo padrão).

2 - Aplica somente Juros.

3 - Aplica a Taxa de Permanência e os Juros.

Exemplo:

Considere um título que tenha vencimento no dia 11/04/15 (sábado). Neste caso, seu vencimento real será no dia 13/04/15, porém, caso o pagamento seja feito no dia 16/04/15, o sistema considera 5 dias de atraso e o cenário fica da seguinte forma:

- Prefixo: 001.
- Número: 000015.
- Tipo: DP.
- Data da emissão: 09/04/15.
- Vencimento: 11/04/15.
- Vencimento real: 13/04/15.
- Valor original: 1.000,00.
- Taxa de permanência: não Informada.
- Porc. juros: 1,00 (1% sobre o valor original do título).
- Data da baixa: 16/04/15.
- Valor recebido: 1.050,00.

Acréscimo:

Valor de acréscimo aplicado ao título. Será adicionado no momento da baixa, ainda que o título seja pago até a data de vencimento e um valor de acréscimo fixo conhecido no momento da implantação.

Fluxo de caixa:

Neste campo é definido se o título deve ser considerado no fluxo de caixa, ou seja, no controle da movimentação financeira que contempla as entradas e saídas de recursos financeiros. As opções que contemplam seu preenchimento são:

S – Sim.
N – Não.

Desdobramento:

Permite a geração de diversos títulos com datas de vencimento diferenciadas a partir de uma única inclusão. Este recurso deve ser utilizado para despesas com vencimentos fixos (como por exemplo, o pagamento de aluguéis).

O desdobramento de um título pode ser por rateio contábil (lançamento padrão 511) ou por múltiplas naturezas (lançamento padrão 510). Os percentuais informados no rateio serão copiados para todas as parcelas do desdobramento.

O sistema não faz o tratamento de impostos nesta situação.

Se for utilizado desdobramento sem rateio o lançamento contábil padrão é o 577.

Não é possível efetuar desdobramento por rateio e por múltiplas naturezas em uma mesma operação.

Para que os impostos sejam calculados quando há desdobramento de títulos, é necessário ter as seguintes condições:

Utilizar o processo de Rastreamento financeiro: oferece uma forma de visualização referente às negociações ocorridas com títulos financeiros que compõe o documento inicial).
Nas rotinas de Fornecedor e Natureza o campo Desdobramento deve estar preenchido com a opção Sim.

Os títulos de impostos, configurados para retenção na emissão dos títulos a pagar são gerados conforme a regra de cálculo de cada imposto.

Para os impostos que contemplam a apuração por determinado período ou valor (como por exemplo, PIS, COFINS e CSLL retidos na emissão), não haverá recálculo ou ajustes nas seguintes situações:

O título retentor dos impostos esteja fora do desdobramento.
Após o cancelamento, quando o procedimento padrão de cumulatividade para retenção dos impostos não é atendido.

A exclusão de títulos com desdobramentos é realizada por meio da rotina de Contas a Receber.

Aprovador:

Aprovador necessário para o pagamento do título. Pode ser utilizado no processo de workflow.

Decréscimo:

Este campo define um valor de decréscimo aplicado ao título. Quando é informado na baixa a pagar (independente da data da baixa), o sistema diminui do valor do título o decréscimo informado nesse campo.

Mult. Natureza:

Este campo define se os títulos serão classificados em múltiplas naturezas. Para que este campo esteja habilitado na inclusão do título a pagar, é necessário que o parâmetro MV_MULNATP esteja configurado com T.

Ao distribuir o valor do título entre múltiplas naturezas, existe a possibilidade de ratear o valor de cada natureza entre diversos centros de custos, considerando alguns critérios para os lançamentos padrões:

508 - Rateio por centro de custo de distribuição em múltiplas naturezas.
509 – Cancelamento do rateio por centro de custo de distribuição em múltiplas naturezas.

Estes lançamentos padrões estão disponíveis para contabilização on-line (508, 509) ou off-line (508) e devem ser utilizados em conjunto com o lançamento padrão 510 (inclusão de títulos de contas a pagar).

As distribuições de valores por múltiplas naturezas que não utilizam o rateio por centro de custo serão contabilizadas como inclusão (lançamentos padrão 510).

As distribuições que utilizam o rateio por centro de custo terão sua contabilização efetuada pelos lançamentos mencionados (lançamento padrão 508, porém, não será executado caso não exista o lançamento padrão 510).

A contabilização de títulos a pagar distribuídos em múltiplas naturezas será efetuada utilizando o mesmo lançamento padrão da inclusão/exclusão do título, sendo necessário apenas informar no cadastro do Lançamento padrão o valor que deve ser utilizado na contabilização. Se não for feito desta maneira, a contabilização fica exposta a duplicidade de valores.

Na inclusão de títulos a pagar com rateio via rotina automática, deve-se utilizar o parâmetro MV_RATAUTO configurado com .T., para exibir a tela de rateio multi natureza.

Tx. Cor. Moeda:

Campo que contem a última taxa que foi utilizada no cálculo da correção monetária para os títulos com moeda diferente de 1.

Possuí Docs:

Define se o título possui documentos vinculados com o objetivo de bloquear os títulos a pagar que não apresentam os documentos necessários.

Campo:	Descrição
Portador:	Código do portador utilizado para identificar o agente cobrador responsável pela cobrança do título.
Mod. pagamento:	Modalidade de pagamento prevista. Exemplo: 1 – TED.
Data agend.:	Data de agendamento da liquidação do título.
Linha dig.:	Dados referentes a linha digitável do título.
Agência for.:	Agência bancária de pagamento do fornecedor do título a pagar.
DV agência:	Dígito verificador da agência bancária de pagamento do fornecedor do título a pagar.
Conta for.:	Conta bancária de pagamento do fornecedor do título a pagar.
DV conta:	Dígito verificador da conta bancária de pagamento do fornecedor do título a pagar.
Banco for.:	Banco de pagamento do fornecedor do título a pagar.
Forma pagto:	Indica a forma de pagamento preferencial para o fornecedor.

Campo:

Descrição

Rateio:

Indica se o valor do título deve ser rateado em diversos centros de custos por meio do preenchimento entre as opções S – Sim e N – Não.

Os lançamentos dos títulos a pagar podem ser rateados entre entidades contábeis (conta contábil, centro de custo, item contábil e classe valor). Desta forma, devem ser cadastrados os lançamentos padrões:

511 - Inclusão de título de contas a pagar com rateio (lançamento padronizado).
512 - exclusão de título de contas a pagar com rateio.

É importante verificar a configuração dos campos acionados por meio da tecla [F12], pois, determinam o valor utilizado no rateio (bruto ou líquido), aglutinação dos lançamentos, informação das contas contábeis etc.

Os rateios lançados para o processo de contas a pagar sofrem um controle interno como chave única de digitação, por meio do campo It. Seq. (não apresentado em tela), de maneira que, as linhas do rateio são numeradas como itens de forma automática e sequencial.

A configuração do parâmetro MV_INTPMS permite ratear as contas a pagar por projeto.

Cta. contábil:

Define a conta contábil em que será efetuado o lançamento contábil manual nos planos de orçamentos referente ao processo de contas a Pagar.

Seq. diário:

Código sequencial do diário para a contabilidade.

Cod. diário:

Código do diário que deve ser utilizado para o movimento.

C. de custo:

Centro de Custo considerado para o processo de contas a pagar.

Campo:	Descrição
Rateio proj.:	Indicador de rateio de Projetos (ligado ao PMS – Gestão de Projetos). O preenchimento do campo é definido por meio da seleção entre as opções 1 – Sim e 2 – Não.
Cod. orçam.:	Representa o código do plano orçamentário e a solicitação será validada neste plano em relação ao orçado e realizado. O sistema sempre considera o conteúdo deste campo com o plano padrão definido no parâmetro MV_PLAPAD, entretanto, também é possível informar o plano desejado para efetuar a compra e, consequentemente, a reserva dos valores pré-definidos neste plano.
Num. contrato:	Código do contrato.
Ver. cont.:	Código da revisão do contrato.
Num. planilh.:	Código da planilha do contrato.
Num. cronogr.:	Código do cronograma financeiro do contrato.
Num. parcela:	Parcela do cronograma financeiro.
Cod. RDA:	Código da rede de atendimento relacionado à rotina de Redes de Atendimento do módulo Plano de Saúde.
Bonific. Ctr.:	Valor de bonificações do contrato abatido no título financeiro.
Retenção Ctr.:	Valor de retenção do contrato abatido no título financeiro.
Multa Ctr.:	Valor de multas do contrato abatido no título financeiro.
Desconto Ctr.:	Valor de descontos do contrato abatido no título financeiro.
Proc. refer.:	Número do processo referenciado relacionado ao título. Essa informação é considerada na geração do SPED, PIS e COFINS.
Tp. processo:	Define o tipo do processo relacionado ao título. Essa informação é considerada na geração do SPED, PIS e COFINS.
Cod. operad.:	Código da operadora de frete responsável pela geração do título.
Nome operad.:	Nome da operadora de frete responsável pela geração do título.
Tp de serv.:	Tipo de serviço prestado.
Vl. FAMAD:	Valor do tributo FAMAD (Fundo de Apoio à Madeira).
Vl. FUMIPEQ:	Valor do FUMIPEQ (Fundo Municipal de Fomento à Micro e Pequena Empresa).
Parc. FAMAD:	Parcela do FAMAD (Fundo de Apoio à Madeira).
Parc. FUMIPEQ:	Parcela do FUMIPEQ (Fundo Municipal de Fomento à Micro e Pequena Empresa).
Ret. INSS:	Trata o valor do INSS retido quando os títulos são gerados pelo módulo Gestão de Transportes por meio do campo INSS Retido na rotina Complemento de Viagem quando a frota do veículo é referente a terceiro ou agregado, entretanto, quando é própria o campo não fica habilitado. Os valores informados no campo INSS Retido referem-se aos serviços de transportes prestados pelo motorista em outras transportadoras. Esse valor é somado ao valor do INSS calculado em relação ao frete que deve ser recebido no contrato de carreteiro considerando a configuração do parâmetro MV_LIMINSS.
Cod. CNO:	Informe o código referente ao cadastro nacional de obra.
CNPJ:	CNPJ do retentor de INSS.
Desc. F100	Classifica o valor de Decréscimo como Condicional ou Incondicional no envio dos dados no bloco F100 do SPED PIS/COFINS. Se o título estiver classificado como Desconto F100 = I (incondicional) o valor do decréscimo é subtraído no valor da base para o cálculo das apurações e o registro referente ao valor do desconto não é enviado no bloco F100 do SPED PIS/COFINS.

Automatic Execution

Execution of automatic operations

OVERVIEW

Example of automatic execution of the inclusion, deletion and edition operations of bills payable.
Warning
The Fa050Inclu() function cannot be used in customizations because it is a menu function; there are some dependencies on privates variables declared in FINA050.

EXAMPLE OF USE

\\
*Addition*  Expandir origem 
#INCLUDE "Protheus.ch"
USER FUNCTION FIN050INC()
 LOCAL aArray := \{\}
  \\
 PRIVATE lMsErroAuto := .F.
 \\
 //Structure for PA ( Advance Payment )
 aArray := \{ \{ "E2_PREFIXO"  , "PAG"             , NIL \},;
    \{ "E2_NUM"      , "0001"            , NIL \},;
    \{ "E2_TIPO"     , "PA"              , NIL \},;
    \{ "E2_NATUREZ"  , "001"             , NIL \},;
    \{ "E2_FORNECE"  , "0001"            , NIL \},;
    \{ "E2_EMISSAO"  , CtoD("17/02/2012"), NIL \},;
    \{ "E2_VENCTO"   , CtoD("17/02/2012"), NIL \},;
    \{ "E2_VENCREA"  , CtoD("17/02/2012"), NIL \},;
    \{ "E2_VALOR"    , 5000              , NIL \},;
    \{ "AUTBANCO"    , "001", NIL \},;
    \{ "AUTAGENCIA"  , "1234", NIL \},;
    \{ "AUTCONTA"    , "123456", NIL \} \}
\\
 //Structure for other bills
 aArray := \{ \{ "E2_PREFIXO"  , "PAG"             , NIL \},;
    \{ "E2_NUM"      , "0001"            , NIL \},;
    \{ "E2_TIPO"     , "NF"              , NIL \},;
    \{ "E2_NATUREZ"  , "001"             , NIL \},;
    \{ "E2_FORNECE"  , "0001"            , NIL \},;
    \{ "E2_EMISSAO"  , CtoD("17/02/2012"), NIL \},;
    \{ "E2_VENCTO"   , CtoD("17/02/2012"), NIL \},;
    \{ "E2_VENCREA"  , CtoD("17/02/2012"), NIL \},;
    \{ "E2_VALOR"    , 5000              , NIL \} \}
  \\
 MsExecAuto( \{ |x,y,z| FINA050(x,y,z)\}, aArray,, 3)  // 3 - Inclusion, 4 - Edition, 5 - Deletion
  \\
  \\
 If lMsErroAuto
  MostraErro()
 Else
  Alert("Bill included successfully")
 Endif
  \\
Return
*Editing*  Expandir origem 
#INCLUDE "Protheus.ch"
USER FUNCTION FIN050ALT()
 LOCAL aArray := \{\}
  \\
 PRIVATE lMsErroAuto := .F.
\\
 aArray := \{ \{ "E2_PREFIXO"  , "PAG"             , NIL \},;
    \{ "E2_NUM"      , "0001"            , NIL \},;
    \{ "E2_VALOR"    , 2000              , NIL \} \}  
\\
 DbSelectArea("SE2") 
 DbSetOrder(1)
 DbSeek(xFilial("SE2")+"PAG"+"0001     "+" "+"NF") //Edition must have SE2 record positioned
    \\
 MsExecAuto( \{ |x,y,z| FINA050(x,y,z)\}, aArray,, 4)  // 3 - Inclusion, 4 - Edition, 5 - Deletion
\\
 If lMsErroAuto
  MostraErro()
 Else
  Alert("Bill edited successfully")
 Endif
\\
Return
*Deletion*  Expandir origem 
#INCLUDE "Protheus.ch"
USER FUNCTION FIN050EXC()
 LOCAL aArray := \{\}
  \\
 PRIVATE lMsErroAuto := .F.
  \\
 DbSelectArea("SE2") 
 DbSetOrder(1)
 DbSeek(xFilial("SE2")+"PAG"+"0001     "+" "+"NF") //Deletion must have SE2 record positioned
         \\
 aArray := \{ \{ "E2_PREFIXO" , SE2->E2_PREFIXO , NIL \},;
     \{ "E2_NUM"     , SE2->E2_NUM     , NIL \} \}
  \\
 MsExecAuto( \{ |x,y,z| FINA050(x,y,z)\}, aArray,, 5)  // 3 - Inclusion, 4 - Edition, 5 - Deletion
  \\
 If lMsErroAuto
  MostraErro()
 Else
  Alert("Bill deleted successfully")
 Endif
 \\
Return
\\
*Addition with VA (Accessory Values)*  Expandir origem 
#INCLUDE "Protheus.ch"
USER FUNCTION FIN050VA()
    LOCAL aArray := \{\}
    LOCAL nOpc   := 3 // 3-Addition, 4 Editing
 \\
    // Accessory value data.
    LOCAL aVAAut     := \{\}
    LOCAL cValAce1   := "000001"  // Va Code
    LOCAL nValAce1   := 200       // Va Code
    LOCAL cValAce2   := "000012"
    LOCAL nValAce2   := 4
 \\
    PRIVATE lMsErroAuto := .F.
  \\
    aArray := \{ \{ "E2_PREFIXO"  , "PAG"             , NIL \},;
              \{ "E2_NUM"      , "0001"            , NIL \},;
              \{ "E2_TIPO"     , "NF"              , NIL \},;
              \{ "E2_NATUREZ"  , "001"             , NIL \},;
              \{ "E2_FORNECE"  , "0001"            , NIL \},;
              \{ "E2_EMISSAO"  , CtoD("17/02/2012"), NIL \},;
              \{ "E2_VENCTO"   , CtoD("17/02/2012"), NIL \},;
              \{ "E2_VENCREA"  , CtoD("17/02/2012"), NIL \},;
              \{ "E2_VALOR"    , 5000              , NIL \} \}
  \\
    // Array with accessory value
    aAdd(aVAAut, \{cValAce1, nValAce1\})
    aAdd(aVAAut, \{cValAce2, nValAce2\})
 \\
    MsExecAuto( \{ |a,b,c,d,e,f,g,h,i,j,k,l| FINA050(a, b, c, d, e, f, g, h, i, j, k, l)\}, aArray,, nOpc,,,,,,,,, aVAAut)  
  \\
    If lMsErroAuto
        MostraErro()
    Else
        If nOpc == 3       
            Alert("Bill successfully added!")
        Else
            Alert("Bill edited successfully")
        EndIf
    Endif
  \\
Return
*Addition with PA with check*  Expandir origem 
#INCLUDE "Protheus.ch"
USER FUNCTION FIN050INCPA()
    LOCAL aArray := \{\}
  \\
    PRIVATE lMsErroAuto := .F.
  \\
    aArray := \{ \{ "E2_PREFIXO", "PAG"             , NIL \},;
              \{ "E2_NUM"      , "0001"            , NIL \},;
              \{ "E2_TIPO"     , "PA"              , NIL \},;
              \{ "E2_NATUREZ"  , "001"             , NIL \},;
              \{ "E2_FORNECE"  , "0001"            , NIL \},;
              \{ "E2_EMISSAO"  , CtoD("17/02/2012"), NIL \},;
              \{ "E2_VENCTO"   , CtoD("17/02/2012"), NIL \},;
              \{ "E2_VENCREA"  , CtoD("17/02/2012"), NIL \},;
              \{ "E2_VALOR"    , 5000              , NIL \},;
              \{ "AUTBANCO"    , "FIN"             , NIL \},;
              \{ "AUTAGENCIA"  , "00015"           , NIL \},;
              \{ "AUTCONTA"    , "0000000001"      , NIL \},;
              \{ "AUTMOED"     , "1"               , NIL \},;
              \{ "AUTCHEQUE"   , "124569"          , NIL \}\}
  \\
    MsExecAuto( \{ |x,y,z| FINA050(x,y,z)\}, aArray,, 3)  // 3 - Addition
   \\
    If lMsErroAuto
        MostraErro()
    Else
        Alert("Bill successfully added")
    Endif
  \\
Return
*Addition with project apportionment (PMS)*  Expandir origem 
USER FUNCTION F050IPMS()
 Local cPref := "FIN"
 Local cNum := "210408001"
 Local cPar := "1"
 Local cTipo := "NF"
 Local cNaturez := "FGRV01"
 Local cFornec := "FGRV04"
 Local cLoja := "01"
 Local nValor := 1000
 Local aGrvSe2 := \{\}
 Local aInfProj := \{\}
 Local aInfAFR := \{\}
 \\
 PRIVATE lMsErroAuto := .F.
 \\
 PREPARE COMPANY ENVIRONMENT "T1" BRANCH "D MG 01 " MODULE "FIN" TABLES "SE2","SE5","SA2","AFR","AF9","AF8"
  \\
 aAdd(aInfAFR, \{"AFR_PROJET", PadR("PMSU000023", TamSX3("AF9_PROJET")\[1\]), Nil\})
 aAdd(aInfAFR, \{"AFR_TAREFA", "01.02", Nil\})
 aAdd(aInfAFR, \{"AFR_TIPOD", PadR("0004", TamSx3("AFR_TIPOD")\[1\]), Nil\})
 aAdd(aInfAFR, \{"AFR_VALOR1", nValor, Nil\})
 aAdd(aInfAFR, \{"AFR_REVISA", StrZero(4, TamSX3("AFR_REVISA")\[1\]), Nil\})
 aAdd(aInfAFR, \{"AFR_PREFIX", cPref, Nil\})
 aAdd(aInfAFR, \{"AFR_NUM", cNum, Nil\})
 aAdd(aInfAFR, \{"AFR_PARCEL", cPar, Nil\})
 aAdd(aInfAFR, \{"AFR_TIPO", cTipo, Nil\})
 aAdd(aInfAFR, \{"AFR_FORNEC", cFornec, Nil\})
 aAdd(aInfAFR, \{"AFR_LOJA", cLoja, Nil\})
 aAdd(aInfAFR, \{"AFR_DATA", Date(), Nil\})
 aAdd(aInfAFR, \{"AFR_VENREA", Date(), Nil\})
 aAdd(aInfProj, aInfAFR)
 \\
 aGrvSe2 := \{ \{ "E2_PREFIXO" , cPref , NIL \},;
 \{ "E2_NUM" , cNum , NIL \},;
 \{ "E2_TIPO" , cTipo , NIL \},;
 \{ "E2_NATUREZ" , cNaturez , NIL \},;
 \{ "E2_FORNECE" , cFornec , NIL \},;
 \{ "E2_LOJA" , cLoja , NIL \},;
 \{ "E2_EMISSAO" , Date() , NIL \},;
 \{ "E2_VENCTO" , Date() , NIL \},;
 \{ "E2_VENCREA" , Date() , NIL \},;
 \{ "E2_VALOR" , nValor , NIL \},;
 \{ "E2_PROJPMS" , "2" , NIL \},;
 \{ "E2_HIST" , "Project Addition" , NIL \},;
 \{"AUTRATAFR" , aInfProj ,Nil \} \}
 \\
 MsExecAuto( \{ |x,y,z| FINA050(x,y,z)\}, aGrvSe2,, 3) // 3 - Addition, 4 - Editing, 5 - Deletion
 \\
 If lMsErroAuto
  MostraErro()
 Else
  Conout("Bill successfully added!")
 Endif
 \\
Return
*Bills payable withholding code*  Expandir origem 
#INCLUDE "Protheus.ch"
\\
/*When there is any type of operation involving the entry of value in field
 E2_CODRET, you need to use function SetFuName("FINA050") before running MSExecAuto(),
 because a validation exists in X3_VALID -(EXISTCPO("SX5","37"+M->E2_CODRET) .AND. Iif(FUNNAME() $ "FINA050|FINA750",FA050Natur(),.T.))
 of this field that will only calculate the tax by withholding code if FunName() is found in "FINA050".*/
\\
USER FUNCTION F050CODRET()
 LOCAL aArray := \{\}
  \\
 PRIVATE lMsErroAuto := .F.
 \\
 //Structure for other bills
 aArray := \{ \{ "E2_PREFIXO"  , "PAG"             , NIL \},;
    \{ "E2_NUM"      , "0001"            , NIL \},;
    \{ "E2_TIPO"     , "NF"              , NIL \},;
    \{ "E2_NATUREZ"  , "001"             , NIL \},;
    \{ "E2_FORNECE"  , "0001"            , NIL \},;
    \{ "E2_EMISSAO"  , CtoD("17/02/2012"), NIL \},;
    \{ "E2_VENCTO"   , CtoD("17/02/2012"), NIL \},;
    \{ "E2_VENCREA"  , CtoD("17/02/2012"), NIL \},;
    \{ "E2_VALOR"    , 5000              , NIL \},;
     \{ "E2_DIRF"     , "1", NIL \},;
    \{ "E2_CODRET"   , "3208"            , NIL \}\}
 \\
 SetFunName("FINA050") 
 MsExecAuto( \{ |x,y,z| FINA050(x,y,z)\}, aArray,, 3)  // 3 - Addition, 4 - Editing, 5 - Deletion
  \\
  \\
 If lMsErroAuto
  MostraErro()
 Else
  Alert("Bill successfully added")
 Endif
  \\
Return

OTHER INFORMATION

None available.

RELATED SUBJECTS

Reference document FINA050

Index

Objective

Mental Map

Main Fields

Automatic Execution

OVERVIEW

EXAMPLE OF USE

OTHER INFORMATION

RELATED SUBJECTS

Related Contents