DBCOMMITALL( )
Escribe en el disco las actualizaciones pendientes de todas las áreas de trabajo
Sintaxis
DBCOMMITALL() –> NIL
Devuelve
DBCOMMITALL() devuelve siempre NIL.
Descripción
DBCOMMITALL() hace que se guarden en el disco todas las actualizaciones pendientes de todas las áreas de trabajo. Equivale a invocar el mandato DBCOMMIT() en cada área de trabajo ocupada.
Si desea más información, consulte DBCOMMIT() y el mandato COMMIT.
Notas
¦ DBCOMMITALL() utiliza la interrupción 21h, función 68h del DOS para ejecutar la escritura de disco duro. La realización correcta de esta petición es función del sistema operativo de red. Consulte con el distribuidor de red para comprobar si se acepta esta función.
Ejemplos
¦ En el ejemplo siguiente se escriben todas las actualizaciones pendientes en el disco:
cApellido := “López”
//
DBUSEAREA(.T., “DBFNTX”, “Ventas”, “Ventas”, .T.)
DBSETINDEX( “SALEFNAM” )
DBSETINDEX( “SALELNAM” )
//
DBUSEAREA(.T., “DBFNTX”, “Distribu”, “Distribu”, .T.)
DBSETINDEX( “COLLFNAM” )
DBSETINDEX( “COLLLNAM” )
DBSELECTAREA( “Ventas” ) // seleccionar el área
// de trabajo “Ventas”
IF ( Ventas->(DBSEEK(cApellido)) )
IF Ventas->(DELETED() ) .AND. Ventas( RLOCK())
Ventas->( DBRECALL() )
? “Se ha recuperado el registro borrado.”
ENDIF
ELSE
? “No se encuentra”
ENDIF
// proceso completado, escribir las
// actualizaciones en el disco y cerrar
DBCOMMITALL()
DBCLOSEALL()
QUIT
Ficheros: La biblioteca asociada es DPXBASE.CH.