Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

Descrição

Ponto de entrada destinado a alteração de dados utilizados para geração de títulos (SE2) na inclusão ou alteração de registros da rotina de Multas (MNTA765).

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

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

PARAMIXB[1] - Array contendo informações a serem alteradas. Posições do array:

  1. E2_PREFIXO - Caracter
  2. E2_NUM - Caracter
  3. E2_TIPO - Caracter
  4. E2_NATUREZ - Caracter
  5. E2_FORNECE - Caracter
  6. E2_LOJA - Caracter
  7. E2_EMISSAO - Caracter
  8. E2_ORIGEM - Caracter
  9. E2_MOEDA - Numérico
  10. E2_CCD - Caracter
  11. E2_VENCTO - Caracter
  12. E2_VALOR - Numérico
  13. E2_VLCRUZ - Numérico
  14. E2_PARCELA - Caracter
  15. E2_HIST - Caracter
  16. E2_DECRESC - Numérico

PARAMIXB[2] - Número de parcelas em que o título foi dividido

Retorno

Array( aTitulo )

Eventos de chamada do Ponto de Entrada

 

Variáveis

 

Programa Fonte

MNTA765.PRX