Árvore de páginas

Versões comparadas

Chave

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

 Ponto de Entrada: STValidRec - Habilita/Desabilita edição dos valores do recebimento de títulos - TOTVS PDV

Descrição:

Este Ponto de Entrada é executado após acionamento da opção Editar Valores, presente na tela de seleção de recebimentos de títulos do TOTVS PDV. Possui como parâmetros de entrada array com todas as informações do recebimento de título, selecionado para edição de seus valores.

Programa Fonte:

StwReceiptTitle

Observação: É necessário atualização dos fontes pertencentes a rotina de recebimento de títulos do TOTVS PDV.

Função:

A função recebe o parâmetro PARAMIXB[1], que no fonte é passado pela variável aVldTitulo - Array com as informações do recebimento de título selecionado. 

PARAMIXB[1] [1] Campo reservado 
PARAMIXB[1] [2]Prefixo do título (E1_PREFIXO) 
PARAMIXB[1] [3] Número do título (E1_NUM) 
PARAMIXB[1] [4]Parcela do título (E1_PARCELA) 
PARAMIXB[1] [5]Valor real do título (E1_VENCREA) 
PARAMIXB[1] [6]Valor do título (E1_VALOR) 
PARAMIXB[1] [7] Valor de multa do título (E1_MULTA) 
PARAMIXB[1] [8]Valor de juros do título (E1_JUROS) 
PARAMIXB[1] [9]Valor de desconto do título
PARAMIXB[1] [10]Valor do título - saldo do título (E1_VALOR-E1_SALDO) 
PARAMIXB[1] [11]Tipo do título (E1_TIPO) 
PARAMIXB[1] [12]Número do contrato de financiamento (E1_NUMCRD) 
PARAMIXB[1] [13]Cliente do título (E1_CLIENTE) 
PARAMIXB[1] [14]Loja do título (E1_LOJA) 
PARAMIXB[1] [15]Filial do título (E1_FILIAL) 
PARAMIXB[1] [16]Número do RECNO do título (R_E_C_N_O_) 
PARAMIXB[1] [17]Valor de acréscimo do título (E1_ACRESC) 
PARAMIXB[1] [18]Campo reservado 
PARAMIXB[1] [19]Valor dos Abatimentos do título 
PARAMIXB[1] [20]Data de vencimento do título (E1_VENCTO) 
PARAMIXB[1] [21]Campo reservado 
PARAMIXB[1] [22]Moeda do título (E1_MOEDA) 
PARAMIXB[1] [23]Campo reservado 
PARAMIXB[1] [24]Data de baixa do título (E1_BAIXA) 
PARAMIXB[1] [25]Saldo do título (E1_SALDO)
Retorno:

Pode ser de dois modos :

lRet (logico), sendo : 

 - Verdadeiro (.T.) - caso seja permitido alterar os valores dos campos multa, juros e desconto do título selecionado. 
- Falso (.F.) - caso não seja permitido alterar os valores dos campos multa, juros e desconto do título selecionado.

aRet(array), sendo:

-aret[1] - Reservado

-aret[2] - habilita/desabilita a edição do campo de Multa

-aret[3] - habilita/desabilita a edição do campo de Juros. 

-aret[4] - habilita/desabilita a edição do campo de Desconto. 

-aret[5] - habilita/desabilita a edição do campo Valor Total. 

 

Exemplo:

#Include 'Protheus.ch'

User Function STValidRec()

Local lRet := .F.
Local aRet := {.T.,.T.,.T.,.T.,.T.}
Private _cCodSup := ""

lRet := .T.

aRet[2] := .F. // lAtuValMulta
aRet[3] := .F. // lAtuValJuros
aRet[4] := lRet // lAtuValDesconto
aRet[5] := .F. // lAtuValtotal

Return aRet