import.css=/download/attachments/327912/newLayout.css |
Ponto-de-Entrada: PLSCALL - Entrada de Dados
Descrição:
Programa Fonte
PLSXTMK.PRW
Sintaxe
PLSCALL - Entrada de Dados ( < ParamIxb[1]> , < ParamIxb[2]> ) --> aRet
Parâmetros:
Retorno
Observações
Exemplo de parâmetros de envio:
[1] “00000101” [2] “SA1”
Sendo a primeira posição a chave do arquivo de clientes (código e loja) e a segunda o respectivo alias (SA1)
_________________________________________________________________________________________ aRet ->Array na estrutura abaixo: [1] .T. caso o processo possa ser continuado ou .F. caso o processo não possa ser continuado [2] Caso o item acima seja .T. devera ser retornado a chave (primeira posição do array parâmetros enviados) alterado para uma possível outra chave de pesquisa
Exemplos
Abaixo vamos exemplificar um exemplo onde o contato sendo vinculado a vida (BTS) e ao entrar no ponto de entrada será selecionado o usuário (BA1) relativo aquela vida e com isso ser dado seqüência ao processo ou não.User Function PLSCALLLOCAL lRet := .T.Local lSelEntF3 := GetNewPar("MV_TMKF3",.F.)LOCAL cChave := paramixb[1]LOCAL cEntidade := paramixb[2] If cEntidade == "BTS" lRet := selecionausr(.T.,BTS->BTS_MATVID) //função selecionausr e apenas um exemplo If lRet If ! lSelEntF3 cChave := BA1->(BA1_CODINT+BA1_CODEMP+BA1_MATRIC+BA1_TIPUSU+BA1_TIPREG+BA1_DIGITO) Else cChave := BA1->(BA1_CODINT+BA1_CODEMP+BA1_MATRIC+BA1_TIPREG+BA1_DIGITO) Endif EndifEndif Return({lRet,cChave})
|