Histórico da Página

Descrição

Observações

Exemplos

User Function MNTA7655()

Local aTitulo := aClone(PARAMIXB[1])    // Array contendo informações a serem alteradas
Local nParcel := PARAMIXB[2]             // Número de parcelas em que o título foi dividido
Local nDescon := M->TRX_DESCON     // Valor de desconto sobre o valor total do título

/*----------------------------------------------------
aTitulo [N1][N2], onde:

N1 Indica o campo a ser alterado
N2 Utilizar posição 2 para alteração
----------------------------------------------------*/ 

aTitulo[15][2] := Space(TAMSX3("E2_HIST")[1])  // Limpa o desconto do histórico
aTitulo[16][2] := nDescon/nParcel              // Adiciona desconto no decréscimo

Return aTitulo