Linha Microsiga Protheus.

Home

Linha Microsiga Protheus

Páginas filhas
  • F060VLOK - Validação de informações no borderô -- 90767

Ponto-de-Entrada: F060VLOK - Validação de informações no borderô
Abrangências: Microsiga Protheus 10
Versões: Todas
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Descrição: 
Este Ponto de Entrada permite que o usuário faça a validação das informações na tela onde são informados os parâmetros, para geração do borderô a receber. O mesmo será executado após clicar no botao OK, para a inclusão deste registro.
Programa Fonte 
FINA060.PRX
Sintaxe

F060VLOK - Validação de informações no borderô ( [ cNumBor ], [ cPort060 ], [ cAgen060 ], [ cConta060 ], [ cSituacao ], [ dVencIni ], [ dVencFim ], [ nLimite ], [ nMoeda ], [ cContrato ], [ dEmisDe ], [ dEmisAte ], [ cCliDe ], [ cCliAte ] ) --> aRet

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
cNumBor Caracter Número do Borderô.
cPort060 Array of Record Portador.
cAgen060 Array of Record Agência.
cConta060 Array of Record Conta.
cSituacao Array of Record Situação.
dVencIni Array of Record Data de Vencimento Inicial.
dVencFim Array of Record Data de Vencimento Final.
nLimite Array of Record Limite Valor.
nMoeda Array of Record Moeda.
cContrato Array of Record Contrato.
dEmisDe Array of Record Data Emissão De.
dEmisAte Array of Record Data Emissão Até.
cCliDe Array of Record Cliente De.
cCliAte Array of Record Cliente Até.
Retorno
    aRet(array_of_record)
  • Retorna um array com 14 posições seguindo as informações dos parâmetros passando no ponto de entrada. Caso o ponto de entrada retorne o conteúdo FALSO, o processo não será realizado mantendo a tela de parâmetros para a geração do borderô.
Exemplos 
User Function F060VLOK()Local cNumBor := paramixb[1]Local cPort060 := paramixb[2]Local cAgen060 := paramixb[3]Local cConta060 := paramixb[4]Local cSituacao := paramixb[5]Local dVencIni := paramixb[6]Local dVencFim := paramixb[7]Local nLimite := paramixb[8]Local nMoeda := paramixb[9]Local cContrato := paramixb[10]Local dEmisDe := paramixb[11]Local dEmisAte := paramixb[12]Local cCliDe := paramixb[13]Local cCliAte := paramixb[14] alert("Numero do bordero: "+cNumBor)alert("Portador: "+cPort060)alert("Agencia: "+cAgen060)alert("Conta: "+cConta060)alert("Situaçao: "+cSituacao)alert("data de vencimento inicial: "+DtoS(dVencIni))alert("data de vencimento final: "+DtoS(dVencFim))alert("limite: "+STR(nLimite))alert("moeda: "+STR(nMoeda))alert("Contrato: "+cContrato)alert("data de emissao inicial: "+DtoS(dEmisDe))alert("data de emissao final: "+DtoS(dEmisAte))alert("cliente de: "+cCliDe)alert("cliente ate: "+cCliAte) Return .F.