Pesquisar

Help

Página 1 de 28. A exibir 279 resultados (0.144 segundos)

  1. TCCommit

    1 Inicializa uma transação 2 Realiza o commit da transação 3 Realiza o rollback da transação 4 Finaliza a Transação Exemplos USER FUNCTION TEST() Local cT1 := "T1" TCLink() TCCommit(1) // Inicia a Transação DBCreate("T1", { , ; {"FIELDTYPE", "C", 10, 0, "TOPCONN") DBUseArea(.F., 'TOPCONN', cT1, (cT1), .F., .F.) (cT1
    Tecnologia10 jan, 2018
  2. OrdDescend

    function test() local cT1 := "T1" local cMsg := "" local aReg := {} local nI TCLink() if TCCanOpen(cT1) TCDelFile(cT1) endif DBCreate(cT1, "T1COD" , "N", 2, 0, "TOPCONN") DBUseArea(.T., "TOPCONN", cT1, cT1, .F., .F.) for nI := 1 to 10 (cT1)>( DBAppend( .F. ) ) (cT1)>T1COD := nI (cT1)>( DBCommit() ) next DBCreateIndex
    Tecnologia15 dez, 2017
  3. EOF

    ', { , ; {"FIELDTYPE" , "C", 10, 0, 'TOPCONN') RETURN user function test() Local cT1 := "T1" TCLink() CreateTable() DBUseArea(.F., 'TOPCONN', cT1, (cT1), .F., .F.) (cT1)>( DBAppend( .F. ) ) (cT1)>FIELDNAME := "name" (cT1)>FIELDTYPE := "string" (cT1)>( DBCommit() ) (cT1)>( DBAppend( .F. ) ) (cT1)>FIELDNAME := "name2
    Tecnologia30 out, 2017
  4. Bof

    FUNCTION Example() Local cT1 := "T1" TCLink() CreateTable() DBUseArea(.F., 'TOPCONN', cT1, (cT1), .F., .F.) (cT1)>( DBAppend( .F. ) ) (cT1)>FIELDNAME := "name" (cT1)>FIELDTYPE := "string" (cT1)>( DBCommit() ) (cT1)>( DBAppend( .F. ) ) (cT1)>FIELDNAME := "name2" (cT1)>FIELDTYPE := "string" (cT1)>( DBCommit() ) (cT1
    Tecnologia30 out, 2017
  5. DBFilterCB

    Tipo Descrição bExp bloco de código Retorna o codeblock ativo na área de trabalho corrente. Exemplos FUNCTION insert() Local cT1 := "T1" Local idx := 0 Local name := "" Local tp := "" Local age := "2" DBUseArea(.F., 'TOPCONN', cT1, (cT1), .F., .F.) WHILE (idx <= 5) name = "BA" tp = "T" age = "2" (cT1)>( DBAppend( .F
    Tecnologia07 nov, 2017
  6. DBEVal

    Descrição uRet nil Sempre retorna nulo. Exemplos FUNCTION Example() Local cT1 = 'T1' Local cT2 = 'T2' TCLink() DBCreate("T1", { , ; {"FIELDTYPE", "C", 10, 0, "TOPCONN") DBUseArea(.F., 'TOPCONN', cT1, (cT1), .F., .F.) (cT1)>( DBAppend( .F. ) ) (cT1)>FIELDNAME := "Jose" (cT1)>FIELDTYPE := "string" (cT1)>( DBCommit() ) (cT1
    Tecnologia23 jun, 2017
  7. IndexOrd

    de expressão aliasada. Exemplos user function test() local cT1 := "T1" TCLink() if TcCanOpen(cT1) TCDelFile(cT1) endif DBCreate(cT1, { , ; {"T1NAME", "C", 10, 0, "TOPCONN") DBUseArea(.T., "TOPCONN", cT1, (cT1), .F., .F.) DBCreateIndex("T1INDEX1", "T1COD" , ) DBCreateIndex("T1INDEX2", "T1CODT1NAME" , ) (cT1
    Tecnologia04 dez, 2017
  8. DBSetIndex

    , todas são acrescentadas na lista e a primeira tornase ativa. Exemplos user function test() local cT1 := "T1" TcLink() if TcCanOpen(cT1) TCDelFile(cT1) endif DBCreate(cT1, { , ; {"FIELDNAME", "C", 10, 0, "TOPCONN") DBUseArea(.T., "TOPCONN", cT1, (cT1), .F., .F.) DBCreateIndex("T1INDEX1", "FIELDCOD" , ) DBCreateIndex
    Tecnologia01 dez, 2017
  9. DBSetOrder

    que, quando alterada a ordem atual de uma determinada tabela, o registro atual não é desposicionado. Exemplos user function test() local cT1 := "T1" TcLink() if TcCanOpen(cT1) TCDelFile(cT1) endif DBCreate(cT1, { , ; , ; {"FIELDTYPE", "C", 10, 0, "TOPCONN") DBUseArea(.F., "TOPCONN", cT1, (cT1), .F., .F.) DBCreateIndex
    Tecnologia27 nov, 2017
  10. IndexKey

    , seu retorno será uma string vazia ("") e ocorrerá a mensagem de erro Work area not in use. Exemplos user function test() local cT1 := "T1" TCLink() if TcCanOpen(cT1) TCDelFile(cT1) endif DBCreate(cT1, { , ; {"T1NAME", "C", 10, 0, "TOPCONN") DBUseArea(.T., "TOPCONN", cT1, (cT1), .F., .F.) DBCreateIndex("T1INDEX1", "T1COD
    Tecnologia04 dez, 2017