Histórico da Página
01. DADOS GERAIS
Linha de Produto: | Microsiga Protheus® |
---|---|
Segmento: | Serviços |
Módulo: | Financeiro |
Rotina: | FINA080 - Baixa a Pagar Manual |
02. DESCRIÇÃO
O ponto de entrada F80L9816 foi disponibilizado para atender a Lei 9.816 de 1999, onde é possível que seja informada a taxa do câmbio a ser utilizada para determinar a na formação da base de calculo do IRRF, que não é necessariamente a taxa utilizada na baixa do título a pagar. Ele será executado nas baixa manuais do contas a pagar e em sua respectiva rotina automática.
...
- Ja existe o ponto de entrada F080TXIR que trata a mesma funcionalidade, contudo , ele esta disponível somente para rotina automática e possui alguns critérios de execução, conforme documentação disponível no link abaixo.
- O ponto de entrada F80L9816 esta disponível para execução da baixa de qualquer registro, cabe a quem for implementar, criar os critérios e regras de utilização, conforme previsto em lei.
Informações | ||||||||
---|---|---|---|---|---|---|---|---|
| ||||||||
Parâmetros:ParamIXB[1] - Chave do título - SE2→(E2_FILIAL+E2_PREFIXO+E2_NUM+E2_PARCELA+E2_TIPO+E2_FORNECE+E2_LOJA) Além dos parâmetros informados no ponto de entrada, pode-se utilizar de qualquer informação disponível do Título a Pagar (campos da tabela SE2) e Fornecedor (campos da tabela SA2) que esta sendo processado, pois os registros estão posicionados.
|
03. EXEMPLO DE UTILIZAÇÃO
Bloco de código | ||||||
---|---|---|---|---|---|---|
| ||||||
#INCLUDE "PROTHEUS.CH" User Function F80L9816() Local cChave := ParamIXB[1] Local dDtBaixa := ParamIXB[2] Local dDtDebito := ParamIXB[3] Local nOpc := ParamIXB[4] Local dDtTaxa := dDataBase Local aArea := GetArea() Local nTaxa := 0 dDtTaxa:=dDtBaixa-2 If SA2->A2_TIPO=='X' .And. SE2->E2_MOEDA > 1 dbSelectArea('SED') dbSetOrder(1) dbSeek(xFilial('SED')+SE2->E2_NATUREZ) If ED_CALCIRF=='S' //-- Retorna taxa na data solicitada nTaxa:=RecMoeda(dDtTaxa,SE2->E2_MOEDA) EndIF EndIF RestArea(aArea) Return(nTaxa) |
...
F080TXIR - Ponto de entrada para informar taxa em baixas manuais (rotina automática)
05. ASSUNTOS RELACIONADOS
Templatedocumentos |
---|
...