Á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 para permitir validar a Tela de digitação manual do NSU e Código de Autorização, caso deseje obrigar a digitação das informações da transação manual de cartão ou realizar outro tipo de validação que achar conveniente.

O ponto de entrada é executado ao clicar no botão "OK" ou ao tentar fechar a tela.

VersõesProtheus 12 (SIGALOJA)
Parâmetros

PARAMIXB[1] - Caractere, Forma de Pagamento (CD / CC)

PARAMIXB[2] - Caractere, ID do Cartão

PARAMIXB[3] - Caractere, Valor

PARAMIXB[4] - Caractere, NSU Digitado pelo usuário

PARAMIXB[5] - Caractere, Código de Autorização Digitado pelo usuário

RetornoLógico (.T. = Permite prosseguir ; .F.=Impede de prosseguir)
Programa FonteLOJXREC.PRW
Exemplo
Bloco de código
languagedelphi
firstline1
linenumberstrue
User Function LJVNSUAU()
Local lRet      := .T.
Local cFormaPG  := PARAMIXB[1] //Forma de Pagamento (CD / CC)
Local cIdCartao := PARAMIXB[2] //ID do Cartão
Local nValor    := PARAMIXB[3] //Valor
Local cNSU      := PARAMIXB[4] //NSU Digitado pelo usuário
Local cAutoriz  := PARAMIXB[5] //Código de Autorização Digitado pelo usuário

If Empty(cNSU)
    MsgAlert("O Código de NSU deve ser informado.")
    lRet := .F.
ElseIf Empty(cAutoriz)
    MsgAlert("O Código de Autorização deve ser informado.")
    lRet := .F.
EndIf

Return lRet
















HTML
<!-- esconder o menu --> 


<style>
div.theme-default .ia-splitter #main {
    margin-left: 0px;
}
.ia-fixed-sidebar, .ia-splitter-left {
    display: none;
}
#main {
    padding-left: 10px;
    padding-right: 10px;
    overflow-x: hidden;
}

.aui-header-primary .aui-nav,  .aui-page-panel {
    margin-left: 0px !important;
}
.aui-header-primary .aui-nav {
    margin-left: 0px !important;
}
</style>