Histórico da Página
...
| Portuguese | ||||||||||||||||||||||||||||||||||||||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Ponto-de-Entrada: LJ7009 - Validação de Alteração de Pagamento
Descrição: Esse ponto de entrada é chamado na confirmação da tela de alteração das parcelas na rotina Venda Assistida. retornar um boleano ou um vetor. 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. estrutura do vetor retornado é: Data (data) Valor (numérico) Descrição da forma de pagamento (3 caracteres) Checkbox "Utiliza nas próximas parcelas" (lógico) Identificação seqüencial do cartão (1 caracter) Programa Fonte LOJA701B.PRW Sintaxe LJ7009 - Validação de Alteração de Pagamento ( < Array> ) --> xRet Parâmetros:
Retorno xRet
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
Function LJ7009() variáveis com os valores alterados
e com os valores originais Local aParams := iIf( PARAMIXB<>nil, aClone(PARAMIXB), {} ) aParcResul := iIf( Len(aParams) > 0, aParams[1], {} )
dados originais do pagamentoLocal aParcAlterdo pagamento Local aParcAlter := iIf( Len(aParams) > 1, aParams[2], {} ) // novos dados para o pagamentoLocal xReto pagamento .T. nQtdParcs := Len(aParcAlter) nI := 0Local aAuxRet0 {} // verifica se possui informaçãoIf ( nQtdParcs > 0 ) Ifpossui informação If ( nQtdParcs > 0 ) 'Cartao de Credito' ) // avalia qual o tipo de pagamento
:= .F. // sendo cartão de crédito aborta a operação, mantendo a informação antiga Else xRetantiga .T. // do contrário efetua o processamento EndIfEndIfprocessamento If( xRet ) // quando o processo pode continuar, é preciso retornar um vetor com os novos dados xRet
aParcAlter Return xRet |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas