| Linha de Produto: | Microsiga Protheus® |
|---|---|
| Segmento: | Backoffice |
| Módulo: | Financeiro |
| Função: | Baixas a Receber (FINA070) |
Permite manipular as variáveis da tela de Cancelamento de Baixa a Receber.
Esse ponto de entrada será executado no momento em que clicar na opção "Cancelamento de Baixa". |
| Nome | Tipo | Descrição |
|---|---|---|
| PARAMIXB[1] | Numérico | Variável contendo os abatimentos. |
| PARAMIXB[2] | Numérico | Variável contendo o valor dos impostos. |
| PARAMIXB[3] | Numérico | Variável contendo os pagamentos iniciais. |
| PARAMIXB[4] | Numérico | Variável contendo a correção monetária. |
| PARAMIXB[5] | Numérico | Variável contendo os descontos. |
| PARAMIXB[6] | Numérico | Variável contendo o valor de multa. |
| PARAMIXB[7] | Numérico | Variável contendo a taxa de permanência. |
Nome | Tipo | Descrição |
aRet | Array | Retorna um array com as sete posições, seguindo a sequência dos parâmetros informados no ponto de entrada. |
#include "protheus.ch"
/*/------------------------------------------------------------------------------------------------------
{Protheus.doc} F070CANCEL
Ponto de entrada que permite manipular as variáveis da tela de Cancelamento de Baixa a Receber.
@author
@since 03/07/2012
/*/------------------------------------------------------------------------------------------------------
User Function F070CANCEL()
Local nTotAbLiq as Numeric
Local nTotAbImp as Numeric
Local nValorM1 as Numeric
Local nCM1 as Numeric
Local nDescont as Numeric
Local nMulta as Numeric
Local nJuros as Numeric
Local aTeste as Array
nTotAbLiq := PARAMIXB[1]
nTotAbImp := PARAMIXB[2]
nValorM1 := PARAMIXB[3]
nCM1 := PARAMIXB[4]
nDescont := PARAMIXB[5]
nMulta := PARAMIXB[6]
nJuros := PARAMIXB[7]
aTeste := {}
AADD(aTeste,{nTotAbLiq,nTotAbImp,nValorM1,nCM1,nDescont,nMulta,nJuros})
alert("Abatimentos: "+STR(nTotAbLiq))
alert("Impostos: "+STR(nTotAbImp))
alert("Pagamentos Parciais: "+STR(nValorM1))
alert("Correçao Monetaria: "+STR(nCM1))
alert("Descontos: "+STR(nDescont))
alert("Multa: "+STR(nMulta))
alert("Tx Permanencia: "+STR(nJuros))
Return aTeste
|