Histórico da Página
...
Bloco de código | ||
---|---|---|
| ||
TCGenQry2( < xPar1 >, < xPar2 >, < cQuery >, < aValues > )
|
Parâmetros
Nome | Tipo | Descrição | Obrigatório | Referência |
---|---|---|---|---|
xPar1 | nil | Compatibilidade. | X | |
xPar2 | nil | Compatibilidade. | X | |
cQuery | caractere | String contendo a query que será aberta. | X | |
aValues | vetor | Array de strings para fazer BIND dos parâmetros | X |
Retorno
Nome | Tipo | Descrição |
---|---|---|
cRet | caractere | Retorna sempre uma string vazia. |
Informações | |||||||
---|---|---|---|---|---|---|---|
| |||||||
|
Exemplos
Bloco de código | ||||||||
---|---|---|---|---|---|---|---|---|
| ||||||||
#include 'totvs.ch' #include 'topconn.ch' USER FUNCTION TEST() Local cAlias := "QRY" Local cTable1 := "T1" Local cQry := "SELECT CPOC1, CPOC2 FROM T1 WHERE T1.CPOC2 = ? " TCLink() IF TcCanOpen(cTable1) TCDelFile(cTable1) Endif DBCreate(cTable1, {{"CPOC1", "C", 10, 0}, ; {"CPOC2", "C", 10, 0}}, "TOPCONN") DBUseArea(.T., "TOPCONN", cTable1, (cTable1), .F., .F. ) (cTable1)->( DBAppend( .F. ) ) (cTable1)->CPOC1 := "JOHN" (cTable1)->CPOC2 := "PESSOA" (cTable1)->( DBCommit() ) DBCloseArea() DBUseArea(.T., "TOPCONN", TCGenQry2(NIL,NIL,cQry, { "PESSOA" } ), (cAlias) , .F., .T. ) WHILE !Eof() CONOUT("CPOC1 = " + (cAlias)->CPOC1) CONOUT("CPOC2 = " + (cAlias)->CPOC2) DbSkip() ENDDO DBCloseArea() TCUnlink() RETURN |
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas