Retorna um array com a lista de registros bloqueados na tabela atual pelo processo corrente.
DBRLockList() |
Nome | Tipo | Descrição |
---|---|---|
aRet | vetor | Retorna uma lista com os números dos registros bloqueados na tabela corrente. |
O exemplo abaixo utiliza a RDD "TOPCONN", mas a função pode ser utilizada com qualquer uma das RDDs válidas.
user function test() Local nHandle := TCLink( "MSSQL/DSN1", "127.0.0.1", 7890 ) Local cTable := "MYTABLE" Local cRDD := "TOPCONN" // Abre a tabela em modo exclusivo DBUseArea( .T., cRDD, cTable, (cTable), .F., .F. ) varinfo( "ret", DBRLockList() ) // Retorna: { 0 } DBCloseArea() // Abre a tabela em modo compartilhado DBUseArea( .F., cRDD, cTable, (cTable), .T., .F. ) varinfo( "ret", DBRLockList() ) // Retorna: {} DBGoTop() DBRLock() // Bloqueia o primeiro registro DBRLock( 110 ) // Bloqueia o registro de número 110 DBRLock( 100 ) // Bloqueia o registro de número 100 varinfo( "ret", DBRLockList() ) // Retorna: { 1, 110, 100 } DBRLock( 110 ) // Bloqueia o registro de número 110 DBRLock( 1 ) // Bloqueia o primeiro registro varinfo( "ret", DBRLockList() ) // Retorna: { 1, 110, 100 } // Fecha a tabela DBCloseArea() // Desconecta do SGBD TCUnlink( nHandle ) return |