Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 5

changes.mady.by.user Joao Marcos Martins de Souza

Gravado em

comparado com

Nova versão 6

changes.mady.by.user Elisabete Magalhaes dos Santos Silva

Gravado em

Chave

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

...


Descrição:

Esse ponto de entrada é chamado na confirmação da tela de alteração das parcelas na rotina Venda Assistida.

Deve retornar um boleano ou um vetor.
Se retornar falso, não permite que os dados informados sejam confirmados. Se retornar um vetor, a parcela atual será atualizada com os dados do vetor.

A estrutura do vetor retornado é:
[1] Data (data)
[2] Valor (numérico)
[3] Descrição da forma de pagamento (3 caracteres)
[4] Identificação sequencial do cartão (1 carácter)
[5] Checkbox "Utiliza nas próximas parcelas" (lógico)


Programa Fonte
LOJA701B.PRW
Sintaxe

LJ7009 - Validação de Alteração de Pagamento ( < Array> ) --> xRet

Parâmetros:


Portuguese

Pagetitle
LJ7009 - Validação de Alteração de Pagamento
LJ7009 - Validação de Alteração de Pagamento

Ponto-de-Entrada: LJ7009 - Validação de Alteração de Pagamento
Abrangências:Microsiga Protheus 10 , Microsiga Protheus 11
Versões:Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Microsiga Protheus 10 , Microsiga Protheus 11
Idiomas:Português (Brasil) , Espanhol , Inglês

Nome

Tipo

Descrição

Default

Obrigatório

Referência

Array

Array of Record

Descrição abaixo (em Observações).




X




Retorno
xRet
    (qualquer)
  • 2 Tipos de RetornoLógico = False (.F.) para não continuar com o processoArray = Parcelas para considerar na Alteração
Observações

Descrição do parâmetro:

Array contendo as informações originais e as que foram alteradas: 1º Array com informações originais e 2º Array com as informações alteradas pelo usuário, ambos conforme as posições indicadas na "descrição". Importante: A edição é realizada por linha e as informações recebidas correspondem a linha que está sendo editada, quando é realizada uma inserção (escolha de um pagamento pela ação dos botões DINHEIRO, CHEQUE, CARTAO DE CREDITO, etc), o valor correspondente ao "original" é o valor sugerido na tela de edição.

Exemplos

/*** Exemplo do PE LJ7009, validação de forma de pagamento
*/
User Function LJ7009()
// variáveis com os valores alterados
// e com os valores originais

Local aParams := iIf( PARAMIXB<>nil, aClone(PARAMIXB), {} )
Local aParcResul := iIf( Len(aParams) > 0, aParams[1], {} )
// dados originais do pagamento

Local aParcAlter := iIf( Len(aParams) > 1, aParams[2], {} ) // novos dados para o pagamento
Local xRet := .T.
Local nQtdParcs := Len(aParcAlter)
Local nI := 0
Local aAuxRet := {} // verifica se possui informação

If ( nQtdParcs > 0 )
 If (Alltrim(aParcAlter[3])== 'Cartao de Credito' ) // avalia qual o tipo de pagamento
  xRet := .F. // sendo cartão de crédito aborta a operação, mantendo a informação antiga
 Else
  xRet := .T. // do contrário efetua o processamento
 EndIf
EndIf

If( xRet ) // quando o processo pode continuar, é preciso retornar um vetor com os novos dados
 xRet := aParcAlter
EndIf

Return xRet