import.css=/download/attachments/327912/newLayout.css |
O parâmetro aBindParam e o conceito de bind de queries só está disponível a partir da lib label 20211116 |
Compatível Países: | Todos |
Sistemas Operacionais: | Todos |
Compatível às Bases de Dados: | Todos |
Nível de Acesso: | Nível 1 (Acesso Clientes) |
Idiomas: | Português, Inglês, Espanhol |
Versão | P12 |
Nome | Tipo | Descrição | Default | Obrigatório | Referência |
cQuery | Caractere | Query a ser executada | x | ||
cAlias | Caractere | Alias que será atribuida a query. | GetNextAlias() | ||
aSetField | Caractere | Array com os campos para execução de TCSetField com a estrutura: | |||
cDriver | Caracter | Driver a ser utilizado. Somente aceita o driver TOPCONN ou os drivers nativos do SQLITE (SQLITE_SYS, etc) | |||
aBindParam | Array | Array com os campos para inserção via statement. Deve ser enviado na mesma ordem dos campos da query e todos devem ser enviados. Ele é obrigatório caso a query estava utlizando o conceito de bind (vide exemplo abaixo) |
user Function mybind() Local cQuery as character Local cAlias as character Local aBindParam as array cQuery := "SELECT E1_NUM FROM SE1T10 WHERE E1_FABOV = ? AND D_E_L_E_T_ = ?" cQuery := ChangeQuery(cQuery) //os parametros DEVEM ser enviados na mesma ordem em que aparecem na query. aBindParam := {'0', ' '} cAlias := MPSysOpenQuery(cQuery,,,,aBindParam) (cAlias)->(DbCloseArea()) Return |
user Function MyOpen() Local cQuery as character Local cAlias as character cQuery := "SELECT E1_NUM FROM SE1T10 WHERE E1_FABOV = '0' AND D_E_L_E_T_ = ' '" cQuery := ChangeQuery(cQuery) cAlias := MPSysOpenQuery(cQuery) (cAlias)->(DbCloseArea()) Return |
Caso o alias passado já exista, o mesmo será fechado.
A alias atual não é alterada, ou seja, é necessário acessar a tabela via (cAlias)->CAMPO, ou efetuar um DbSelectArea(cAlias), e fazer o tratamento de salvar e restaurar área.