children porn children porn children porn children porn children porn children porn children porn children porn children porn children porn children porn children porn children porn children porn children porn children porn children porn
DBCLOSEAREA ( ) - AdaptaPro

DBCLOSEAREA( )

Cierra un área de trabajo

Sintaxis

     DBCLOSEAREA() –> NIL

Devuelve

DBCLOSEAREA() devuelve siempre NIL.

Descripción

DBCLOSEAREA() libera el área de trabajo actual. Se escriben las actualizaciones pendientes, se liberan los bloqueos y se cierra o se libera cualquier recurso asociado con el área de trabajo. DBCLOSEAREA() es equivalente al mandato CLOSE estándar sin cláusulas. Si desea más información, consulte los mandatos USE y CLOSE.

 Ejemplos

     ¦  En el ejemplo siguiente se cierra un área de trabajo con una referencia de alias:

        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() )

              ? «Registro borrado: «, Ventas->( DELETED() )

           ENDIF

        ELSE

           ? «No se encuentra»

           Distribu->( DBCLOSEAREA() )

        ENDIF

 Ficheros:  La biblioteca asociada es DPXBASE.CH.