Página 4 de 31. A exibir 308 resultados (0.33 segundos)
DBClearFilter
tp := "" Local age := "2" DBUseArea(.F., 'TOPCONN', cT1, (cT1), .F., .F.) WHILE (idx <= 5) name += "BA" tp += "T" age += "2" (cT1 … ") U_insert() DBUseArea(.F., 'TOPCONN', cT1, (cT1), .F., .T.) (cT1)->(DbSetFilter({|| left(FIELD_NAME, 4)="BABA" }, "FIELD_NAME=BABA") (cT1DBCloseAll
cTable1 := "MYTABLE1" Local cTable2 := "MYTABLE2" Local cRDD := "TOPCONN" // Abre a tabela 1 em modo exclusivo criando uma área de trabalho DBUseArea( .T., cRDD, cTable1, (cTable1), .F., .F. ) // Faz operações na tabela 1 // Abre a tabela 2 em modo exclusivo criando uma área de trabalho DBUseArea( .TDBFilterCB
:= "T1" Local idx := 0 Local name := "" Local tp := "" Local age := "2" DBUseArea(.F., 'TOPCONN', cT1, (cT1), .F., .F.) WHILE (idx <= 5 … }, ; {"FIELD_TYPE", "C", 10, 0}}, "TOPCONN") U_insert() DBUseArea(.F., 'TOPCONN', cT1, (cT1), .F., .T.) (cT1VCM550IC - Customização da Impressão dos Clientes por Região
("SA3")+"' AND VC1.VC1_CODVEN=SA3.A3_COD AND " cQuery += "VC1.D_E_L_E_T_=' ' AND VC5.D_E_L_E_T_=' ' AND SA3.D_E_L_E_T_=' ' " dbUseArea( .T., "TOPCONN", TcGenQry … VC3.VC3_LOJA='"+substr(cSeek,7,2)+"' AND VC3.D_E_L_E_T_=' ' " dbUseArea( .T., "TOPCONN", TcGenQry( ,, cQuery ), cQAlFro , .F., .T. ) If !( cQAlFro )->( EofAlias
explicitamente atribuído através da cláusula ALIAS usada na abertura da tabela através do comando USE ou da função DbUseArea() Alias() é o inverso da função Select(). Alias … ") DBUseArea(.F., 'TOPCONN', cTab1, cAlias1, .F., .T.) conout("Alias corrente = " + Alias() ) // Resultado deve ser "T01" DBCloseArea() conoutDBInInsert
1 em modo exclusivo criando uma área de trabalho DBUseArea( .T., cRDD, cTable1, (cTable1), .F., .F. ) conout( DBInInsert() ) // Exibe: .F. DBAppend … . // Fecha a área de trabalho DBCloseArea() // Abre a tabela 1 em modo exclusivo criando uma área de trabalho DBUseArea( .T., cRDD, cTable1DBRLockList
nHandle := TCLink( "MSSQL/DSN1", "127.0.0.1", 7890 ) Local cTable := "MYTABLE" Local cRDD := "TOPCONN" // Abre a tabela em modo exclusivo DBUseArea … DBUseArea( .F., cRDD, cTable, (cTable), .T., .F. ) varinfo( "ret", DBRLockList() ) // Retorna: {} DBGoTop() DBRLock() // BloqueiaDBEVal
() DBCreate("T1", {{"FIELD_NAME", "C", 10, 0}, ; {"FIELD_TYPE", "C", 10, 0}}, "TOPCONN") DBUseArea(.F., 'TOPCONN', cT1, (cT1 … . ) ) (cT1)->FIELD_NAME := "Maria" (cT1)->FIELD_TYPE := "string" (cT1)->( DBCommit() ) DBCloseArea() DBUseArea(.F., 'TOPCONN', cT1, (cT1), .F., .FComando TCQUERY
traduzida em tempo de compilação para a função DBUseArea(), em conjunto da Função TCGenQry(), com os parâmetros necessários para a abertura de uma Query. Veja … com a função TCGenQry() USE (TcGenQry(,,cQuery)) ALIAS QRY EXCLUSIVE NEW VIA "TOPCONN" USE // Chamando diretamente a função DbUseArea() // No final das contasExemplo de criação e abertura
("GETTEMPNAME="+cTmpID) conout("Nome Real no SGDB : "+cTmpName) DBUseArea(.T., "TOPCONN", cTmpID, "TMP", .F., .F.) // Temporária tradicional faz abertura com o nome usado … ="+cTmpID) conout("Nome real no SGDB : "+cTmpName) DBUseArea(.T., "TOPCONN", cTmpName, "TMP", .T., .F.) // Temporária compartilhada faz abertura com o nome REAL