FINRATAUT - Ponto de Entrada.

Descrição

Ponto de entrada executado antes da validação do aColsSev.

Observações

Devido às características na chamada da rotina, não é carregada as variáveis do tipo Array (aColsSev) e (aHeaderSev), ou seja, não é possível alimentar a tabela SEV e posteriormente a SEZ.

Exemplos

USER Function FINRATAUT()
Local aCabec := PARAMIXB[1]
Local aColuna := PARAMIXB[2]
Multiauto(@aCabec,@aColuna,"SE1","SEV")
aColuna[1][1] := '11'//natureza
aColuna[1][2] := 2500 // valor
aColuna[1][3] := 50 // percentual
aColuna[1][4] := '2' // 2 - não rateia centro de custo
aColuna[1][5] := .F.
aadd(acoluna, {'11',2500, 50, '2',.F.})
Return{aCabec,aColuna}

Preview

Veja também

Idioma

Português(Brasil)

Versões

Microsiga_Protheus11

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Updates

Parâmetros

aHeaderSev, aColsSev

Retorno

aCabec,aColuna

Eventos de chamada do Ponto de Entrada

If lFINRATAUT
aRatRet := ExecBlock("FINRATAUT",.f.,.f.,{aHeaderSev, aColsSev})
If ValType(aRatRet) == "A" .AND. Len(aRatRet) == 2
aHeaderSev := aRatRet\\\[1]
aColsSev := aRatRet\\\[2]
Endif
Endif

Variáveis

Local lFINRATAUT := ExistBlock("FINRATAUT")

Programa Fonte

FINXFUN.PRX