Pesquisar

Página 5 de 84. A exibir 831 resultados (0.155 segundos)

1. DBCommit

   das instruções. Exemplos destas funções: DBGoTop(), DBSeek(), Recno(), DBAppend() etc. Exemplos FUNCTION Example() Local cT1 := "T1" TCLink() DBCreate("T1", {{"FIELD_NAME", "C", 10, 0},; {"FIELD_TYPE", "C", 10, 0}}, "TOPCONN") DBUseArea(.F., 'TOPCONN', cT1, (cT1), .F., .T
   TOTVSTEC • 21 jun, 2017

2. DBAppend

   ', {{"FIELD_NAME", "C", 10, 0}, ; {"FIELD_TYPE" , "C", 10, 0}}, 'TOPCONN') RETURN FUNCTION Example() Local cT1 := "T1" TCLink() CreateTable() DBUseArea(.F., 'TOPCONN', cT1, (cT1), .F., .F.) (cT1)->( DBAppend( .F. ) ) (cT1)->FIELD_NAME := "name" (cT1)->FIELD_TYPE := "string" (cT1
   TOTVSTEC • 23 dez, 2016

3. IndexOrd

   de trabalho não selecionada, através de expressão aliasada. Exemplos user function test() local cT1 := "T1" TCLink() if TcCanOpen(cT1) TCDelFile(cT1) endif DBCreate(cT1, {{"T1_COD" , "C", 2, 0}, ; {"T1_NAME", "C", 10, 0}}, "TOPCONN") DBUseArea(.T., "TOPCONN", cT1
   TOTVSTEC • 04 dez, 2017

4. OrdSetFocus

   com qualquer uma das RDDs válidas. user function test() local cT1 := "T1" local nI TCLink() if TcCanOpen(cT1) TCDelFile(cT1) endif DBCreate(cT1, {{"T1_COD" , "N", 2, 0}, ; {"T1_NAME" , "C", 10, 0}}, "TOPCONN") DBUseArea(.T., "TOPCONN", cT1, (cT1), .F., .F.) DBCreateIndex("T1INDEX1", "T1_COD
   TOTVSTEC • 12 dez, 2017

5. OrdBagName

   () local cT1 := "T1" TCLink() if TCCanOpen(cT1) TCDelFile(cT1) endif DBCreate(cT1, {{"T1_COD" , "C", 2, 0}, ; {"T1_NAME", "C", 10, 0}}, "TOPCONN") DBUseArea(.T., "TOPCONN", cT1, (cT1), .F., .F.) DBCreateIndex("T1INDEX1", "T1_COD" , {|| T1_COD
   TOTVSTEC • 07 dez, 2017

6. IndexKey

   not in use. Exemplos user function test() local cT1 := "T1" TCLink() if TcCanOpen(cT1) TCDelFile(cT1) endif DBCreate(cT1, {{"T1_COD" , "C", 2, 0}, ; {"T1_NAME", "C", 10, 0}}, "TOPCONN") DBUseArea(.T., "TOPCONN", cT1, (cT1), .F., .F.) DBCreateIndex
   TOTVSTEC • 04 dez, 2017

7. DBSetIndex

   () local cT1 := "T1" TCLink() if TCCanOpen(cT1) TCDelFile(cT1) endif DBCreate(cT1, {{"FIELD_COD" , "C", 2, 0}, ; {"FIELD_NAME", "C", 10, 0}}, "TOPCONN") DBUseArea(.T., "TOPCONN", cT1, (cT1), .F., .F.) DBCreateIndex("T1INDEX1", "FIELD_COD" , {|| FIELD_COD
   TOTVSTEC • 18 jul, 2018

8. DBSetOrder

   não é desposicionado. Exemplos user function test() local cT1 := "T1" TcLink() if TcCanOpen(cT1) TCDelFile(cT1) endif DBCreate(cT1 … ", cT1, (cT1), .F., .F.) DBCreateIndex("T1INDEX1", "FIELD_COD" , {|| FIELD_COD }) DBCreateIndex("T1INDEX2", "FIELD_COD+FIELD_NAME
   TOTVSTEC • 27 nov, 2017

9. DBOrderNickname

   : "Work area not in use" e será retornado falso (.F.). Exemplos user function test() local cT1 := "T1" TcLink() if TcCanOpen(cT1) TCDelFile(cT1) endif DBCreate(cT1, {{"FIELD_COD" , "C", 2, 0}, ; {"FIELD_NAME", "C", 10, 0}}, "TOPCONN") DBUseArea(.F., "TOPCONN", cT1, (cT1), .F., .F
   TOTVSTEC • 21 nov, 2017

10. DBSkip

    ('T1', {{"FIELD_NAME", "C", 10, 0}, ; {"FIELD_TYPE", "C", 10, 0}}, 'TOPCONN') return user function test() Local cT1 := "T1" TCLink() CreateTable() DBUseArea(.F., 'TOPCONN', cT1, (cT1), .F., .F.) for nI := 1 to 20 (cT1)->( DBAppend( .F. ) ) (cT1)->FIELD_NAME := "name
    TOTVSTEC • 21 nov, 2017