Árvore de páginas

Descrição:O Ponto de Entrada STIPAYSFP tem a finalidade de validar a forma de pagamento selecionada pelo atendente no TOTVS PDV.
Programa Fonte:STIPayment
Eventos:

O ponto de entrada é executado ao dar duplo clique na linha da Forma de pagamento.

Parâmetros:

ParamIxb[1]  // Numérico, Valor total da venda
ParamIXB[2]  // String, Cliente
ParaIXB[3]  // String, Loja Cliente
ParamIXB[4]  //  String, Vendedor
ParamIXB[5]  // String, Usuário caixa
aramIXB[6]   // String, Forma de Pagamento selecionada
ParamIXB[7] // Array, Formas de pagamentos selecionadas anteriormente, {<Forma>,<Valor>}

Retorno:Lógico, caso retorne .T., o painel da forma de pagamento será apresentado corretamente, caso retorne .F. o operador será impedido de utilizar a Forma de Pagamento selecionada.
Exemplo:

User FuncTion STIPAYSFP()
Local lRet := .T.
Local nVlrTot   := ParamIxb[1]  // Valor total da venda
Local cCliente  := ParamIXB[2]  // Cliente
Local cLojaCli  := ParamIXB[3]  // Loja Cliente
Local cVend     := ParamIXB[4]  // Vendedor
Local cUserCx   := ParamIXB[5]  // Usuario caixa
Local cFormPg   := ParamIXB[6]  // Forma de Pagamento selecionada
Local aPagtosAnt := ParamIXB[7] // Formas de pagamentos selecionadas anteriormente



// Exemplo de lógica
If nVlrTot < 50 .AND. UPPER(cFormPg) == "CC"
    lRet := .F.
EndIf

return lRet