diff --git a/harbour/ChangeLog b/harbour/ChangeLog index eaa609dd91..a194bac4fd 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -17,6 +17,15 @@ past entries belonging to author(s): Viktor Szakats. */ +2010-02-20 22:09 UTC+0100 Viktor Szakats (harbour.01 syenar.hu) + * debian/dirs + * doc/en/Makefile + * harbour.spec + ! "en-EN" -> "en" + + - examples/hbdoc/examples + - Deleted outdated docs. + 2010-02-20 21:19 UTC+0100 Viktor Szakats (harbour.01 syenar.hu) + doc/en - doc/en-EN diff --git a/harbour/debian/dirs b/harbour/debian/dirs index bc8aff1e86..f40328cc39 100644 --- a/harbour/debian/dirs +++ b/harbour/debian/dirs @@ -3,4 +3,4 @@ usr/bin usr/lib/harbour usr/include/harbour usr/share/doc/harbour -usr/share/doc/harbour/en-EN +usr/share/doc/harbour/en diff --git a/harbour/doc/en/Makefile b/harbour/doc/en/Makefile index d1360c3d1c..680ce7ce26 100644 --- a/harbour/doc/en/Makefile +++ b/harbour/doc/en/Makefile @@ -4,7 +4,7 @@ ROOT := ../../ -DOC_SUBDIR := /en-EN +DOC_SUBDIR := /en DOC_FILES := \ array.txt \ diff --git a/harbour/examples/hbdoc/examples/en/genhtm.lnk b/harbour/examples/hbdoc/examples/en/genhtm.lnk deleted file mode 100644 index 307c50201b..0000000000 --- a/harbour/examples/hbdoc/examples/en/genhtm.lnk +++ /dev/null @@ -1,14 +0,0 @@ -!name: Harbour Version 0.37 (c) reference Guide -!credits: Harbour Version 0.37 (c) http://www.harbour-project.org - 08/06/2001 build By Luiz Rafael Culik - Functions Documented by: - Chen Kedem, Luiz Rafael Culik,Brian Hays - -!menu: Reference -Functions funcam.ngo -Command comm.ngo -Tools Tools.ngo -OOP Commands oopcom.ngo -!menu: Harbour -Information informat.ngo -Runtime Error Error.ngo diff --git a/harbour/examples/hbdoc/examples/en/genhtm.rsp b/harbour/examples/hbdoc/examples/en/genhtm.rsp deleted file mode 100644 index e7b468c27e..0000000000 --- a/harbour/examples/hbdoc/examples/en/genhtm.rsp +++ /dev/null @@ -1,47 +0,0 @@ -array.txt -binnum.txt -browse.txt -command.txt -datetime.txt -dbdelim.txt -dbsdf.txt -dbstrux.txt -diskspac.txt -dir.txt -error.txt -file.txt -hvm.txt -input.txt -license.txt -math.txt -memo.txt -menu.txt -misc.txt -nation.txt -objfunc.txt -rdd.txt -rdddb.txt -rddord.txt -rddmisc.txt -readme.txt -set.txt -string.txt -tclass.txt -terminal.txt -tgetlist.txt -tlabel.txt -treport.txt -var.txt -subcodes.txt -harbext.txt -gnulice.txt -compiler.txt -lang.txt -setmode.txt -eval.txt -sayget.txt -strotype.txt -garbage.txt -idle.txt -cmdline.txt -tbrowse.txt diff --git a/harbour/examples/hbdoc/examples/en/readme.txt b/harbour/examples/hbdoc/examples/en/readme.txt deleted file mode 100644 index 6f5cea3a5b..0000000000 --- a/harbour/examples/hbdoc/examples/en/readme.txt +++ /dev/null @@ -1,6 +0,0 @@ -/* - * $Id$ - */ - -Launch with this command: - ..\..\hbdoc -htm genhtm.lnk genhtm.rsp diff --git a/harbour/examples/hbdoc/examples/es/array.txt b/harbour/examples/hbdoc/examples/es/array.txt deleted file mode 100644 index 843cf590df..0000000000 --- a/harbour/examples/hbdoc/examples/es/array.txt +++ /dev/null @@ -1,663 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2000 Alejandro de Grate - * Documentacin en Espaol de: - * ARRAY(), AADD(), ASIZE(), ATAIL(), ASIZE(), - * AINS(), ADEL(), ADEL(), AFILL(), ASCAN() - * AEVAL(), ACOPY(), ACLONE(), ASORT() - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * ARRAY() - * $CATEGORY$ - * ARRAY - * $ONELINER$ - * Crea un array sin inicializar de la longitud especificada - * $SYNTAX$ - * ARRAY( [, ...] ) --> aArray - * $ARGUMENTS$ - * es el nmero de elementos de la dimensin especificada. - * $RETURNS$ - * Un array con las dimensiones especificadas. - * $DESCRIPTION$ - * Esta funcin retorna un array sin inicializar de tamao - * Si parmetros adicionales son especificados se crea - * un array anidado multidimensional sin inicializar dentro de la misma - * referencia del array. - * Crear una variable de memoria con el mismo nombre que el array puede - * destruir el array original y liberar el contenido entero del array. - * Esto depende, por supuesto del tipo de almacenamiento de ambos: del - * array y la variable con el mismo nombre que el array. - * $EXAMPLES$ - * * El siguiente ejemplo crea un array de diez elementos iniciales, - * luego en cada elemento de ese array, va creando submatrices - * lineales con la funcin ARRAY(). Cada una con la misma cantidad - * de items que la posicin que ocupa en aArray. Finalmente lo - * muestra. - * - * LOCAL aArray := Array(10) - * LOCAL i := 1, j - * - * FOR i = 1 to LEN( aArray ) - * aArray [i] := Array(i) - * NEXT - * - * FOR i = 1 to LEN( aArray ) - * ? i - * FOR j = 1 to LEN( aArray [i] ) - * ?? " ", aArray [i][j] - * NEXT - * NEXT - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es CA-Cl*pper Compatible en todos los casos, excepto que - * los arrays en Harbour pueden tener un nmero ilimitado de elementos - * mientras que Clipper tiene un lmite de 4096 elementos por dimensin. - * Los arrays en Harbour pueden tener un nmero ilimitado de dimensiones - * $FILES$ - * El cdigo fuente est en source\vm\arrays.c - * La librera asociada es vm - * $SEEALSO$ - * AADD(),ADEL(),AFILL(),AINS() - * $END$ - */ - - - * $DOC$ - * $FUNCNAME$ - * AADD() - * $CATEGORY$ - * ARRAY - * $ONELINER$ - * Agrega dinmicamente un nuevo elemento al final de un array - * $SYNTAX$ - * AADD(, ) --> Valor - * $ARGUMENTS$ - * es el array al cual se agrega un nuevo elemento. - * - * es el valor asignado al nuevo elemento. - * $RETURNS$ - * AADD() evala y retorna su valor. Si no esta - * especificado, AADD() retorna NIL. - * $DESCRIPTION$ - * AADD() es una funcin que dinmicamente incrementa la longitud actual - * del array destino en un elemento y asigna el valor al recin - * creado elemento del array. - * puede ser un puntero de referencia a otro array, el cual - * puede ser asignado a la posicin subndice. - * - * Es til para construir listas dinmicas o colas (queues). - * Cada vez que se ejecuta un comando @...GET, el sistema usa AADD() - * para agregar un nuevo elemento al final del array GetList, y entonces - * asignar un nuevo objeto Get al nuevo elemento. - * $EXAMPLES$ - * * Este ejemplo muestra el efecto de mltiples llamadas de la funcin - * AADD() a un array, donde va agrgando un nuevo elemento cada vez. - * - * LOCAL aArray := {} - * FOR x:= 1 to 10 - * AADD( aArray, x) - * NEXT - * - * * Este ejemplo crea un array multidemensional - * LOCAL aArray := {} // Resultado: aArray es un array vaco - * AADD( aArray, {10, 10122734 }) // Resultado: aArray es {10, 10122734} - * AADD( aArray, {11, 13173645 }) // Resultado: aArray es - * { { 10, 10122734 }, { 11, 13173645 } } - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es totalmente compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas las plataformas - * $FILES$ - * El cdigo fuente est en source\vm\arrays.c - * La librera asociada es vm - * $SEEALSO$ - * AINS(), ASIZE() - * $END$ - - -/* $DOC$ - * $FUNCNAME$ - * ASIZE() - * $CATEGORY$ - * ARRAY - * $ONELINER$ - * Ajusta (aumenta decrementa) el tamao de un array - * $SYNTAX$ - * ASIZE(, ) --> aDestino - * $ARGUMENTS$ - * es el nombre del array a ser dinmicamente alterado - * - * es el valor Numrico del nuevo tamao de - * $RETURNS$ - * ASIZE() retorna una referencia al array . - * $DESCRIPTION$ - * Esta funcin dinmicamente incrementa decrementa el tamao del - * array ajustando la longitud del array a - * posiciones. - * - * Si la longitud del array is acortada, aquellos elementos - * al final se pierden. Si la longitud del array es alargada un valor - * NIL es asignado a los elementos en las nuevas posiciones. - * $EXAMPLES$ - * * El siguiente ejemplo crea un array con un slo elemento, luego lo - * agranda y luego lo vuelve al tamao original. - * - * aArray := { 1 } // Resultado: aArray es { 1 } - * ASIZE( aArray, 3) // Resultado: aArray es { 1, NIL, NIL } - * ASIZE( aArray, 1) // Resultado: aArray es { 1 } - * $STATUS$ - * R - * $COMPLIANCE$ - * Si HB_COMPAT_C53 es definido, la funcin genera un Error, de otro - * modo retornar el mismo array. - * $FILES$ - * El cdigo fuente est en source\vm\arrays.c - * La librera asociada es vm - * $SEEALSO$ - * AADD(), ADEL(), AFILL(), AINS() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * ATAIL() - * $CATEGORY$ - * ARRAY - * $ONELINER$ - * Retorna el ltimo elemento de un array - * $SYNTAX$ - * ATAIL( ) --> Elemento - * $ARGUMENTS$ - * es el nombre del array a usar - * $RETURNS$ - * ATAIL() retorna que puede ser un valor una referencia - * contenida en el ltimo elemento en el array. - * $DESCRIPTION$ - * Esta funcin devuelve el ltimo elemento en el array llamado - * No modifica el tamao del array ni el valor de ningn subndice. - * $EXAMPLES$ - * * El siguiente ejemplo crea un array unidimensional y devuelve el - * ltimo elemento. - * - * aArray := { "Cul", "es el", "futuro", "de xBase ?", "Harbour!" } - * ? ATAIL( aArray ) - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es totalmente compatible con CA-Cl*pper. - * $FILES$ - * El cdigo fuente est en source\vm\arrays.c - * La librera asociada es vm - * $SEEALSO$ - * LEN(),ARRAY(),ASIZE(),AADD() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * AINS() - * $CATEGORY$ - * ARRAY - * $ONELINER$ - * Inserta un elemento NIL en una posicin del array - * $SYNTAX$ - * AINS( , ) --> aDestino - * $ARGUMENTS$ - * es el nombre del array al que se va a insertar un item - * - * es la posicin en el - * $RETURNS$ - * AINS() retorna una referencia al array destino, - * $DESCRIPTION$ - * Esta funcin inserta un valor NIL en el array llamado - * en la posicion . - * - * Todos los elementos del array comenzando con la sern - * desplazados hacia arriba una posicin y el ltimo item en el array - * ser removido completamente. En otras palabras, si se va a insertar - * un item en la quinta posicin de un array de diez elementos, el - * elemento que previamente estaba en la quinta posicin ahora ser - * reubicado a la sexta posicin. El elemento recin agregado ser de - * tipo NIL y el ltimo elemento es descartado. La longitud del array - * permanece sin cambios. - * $EXAMPLES$ - * * El siguiente ejemplo crea un array lineal, al cual se inserta un - * elemento en la quinta posicin, perdindose el ltimo. - * - * LOCAL aArray:= { 1, 2, 3, 4, 5, 6, 7, 8, 9, 10 } - * AINS( aArray, 5) - * - * Resultado: aArray es { 1, 2, 3, 4, NIL, 5, 6, 7, 8, 9 } - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es totalmente compatible con CA-Cl*pper. - * $FILES$ - * El cdigo fuente est en source\vm\arrays.c - * La librera asociada es vm - * $SEEALSO$ - * AADD(), ACOPY(), ADEL(), AEVAL(), AFILL(), ASIZE() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * ADEL() - * $CATEGORY$ - * ARRAY - * $ONELINER$ - * Borra un elemento del array - * $SYNTAX$ - * ADEL(, ) --> aDestino - * $ARGUMENTS$ - * es el nombre del array cuyo elemento ser removido. - * - * es la posicin del elemento a borrar - * $RETURNS$ - * ADEL() retorna una referencia al array destino, - * $DESCRIPTION$ - * Esta funcin borra el elemento que se encuentra en la posicin - * en el array . Todos los elementos en el array - * ms all de la posicin dada sern movidos hacia abajo una - * posicin en el array. - * En otras palabras, si se borra un item de la quinta posicin de un - * array de diez elementos, el elemento que estaba en la sexta posicin - * ahora ser reubicado a la quinta posicin. - * La longitud del array permanece sin cambios y el ltimo - * elemento en el array toma el valor NIL. - * $EXAMPLES$ - * * El siguiente ejemplo crea un array lineal, del cual se borra el - * elemento en la quinta posicin. - * - * LOCAL aArray:= { 1, 2, 3, 4, 5, 6, 7, 8, 9, 10 } - * ADEL( aArray, 5) - * - * Resultado: aArray es { 1, 2, 3, 4, 6, 7, 8, 9, NIL } - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es totalmente compatible con CA-Cl*pper. - * $FILES$ - * El cdigo fuente est en source\vm\arrays.c - * La librera asociada es vm - * $SEEALSO$ - * ACOPY(), AINS(), AFILL() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * AFILL() - * $CATEGORY$ - * ARRAY - * $ONELINER$ - * Rellena un array con un valor especificado - * $SYNTAX$ - * AFILL( , , [], []) --> aDestino - * $ARGUMENTS$ - * es el nombre del array a rellenar - * - * es la expresin con la que ser rellenado - * - * es la posicin de comienzo, subndice del array - * - * es el nmero de elementos que se van a rellenar - * $RETURNS$ - * AFILL() retorna una referencia al array destino, - * $DESCRIPTION$ - * Esta funcin rellena cada elemento del array llamado con - * el valor . Si es especificado, marca el elemento - * de inicio para continuar rellenando por posiciones. - * Si no es especificado, el valor de ser 1, y el valor de - * ser el valor de LEN(); y todos las posiciones - * del array sern llenadas con la expresin de . - * - * Advertencia !: - * Esta funcin slo trabaja en una sola dimensin de . - * Si hay punteros de referencia a otros arrays dentro de un subndice - * de estos valores se perdern, porque esta funcin los - * sobreescribe con los nuevos valores. - * $EXAMPLES$ - * * El siguiente ejemplo crea un array con valores asignados, luego - * lo rellena con el valor cinco. - * - * LOCAL aTest := { NIL, 0, 1, 2 } - * Afill( aTest, 5) // Resultado aTest es { 5, 5, 5, 5 } - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es totalmente compatible con CA-Cl*pper. - * $FILES$ - * El cdigo fuente est en source\vm\arrays.c - * La librera asociada es vm - * $SEEALSO$ - * AADD(), AEVAL(), DBSTRUCT(), DIRECTORY() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * ASCAN() - * $CATEGORY$ - * ARRAY - * $ONELINER$ - * Busca en un array por un valor o hasta que el block devuelva .T. - * $SYNTAX$ - * ASCAN( , , - * [], [] ) --> nParadoEn - * $ARGUMENTS$ - * es el nombre del array a examinar - * - * es la expresin a encontrar en - * - * es la posicin a la cual comenzar la bsqueda - * - * es el nmero de elementos a examinar - * $RETURNS$ - * ASCAN() retorna un valor numrico , de la posicin donde - * fu encontrada. - * $DESCRIPTION$ - * Esta funcin examina el contenido de un array llamado en - * busca del valor de . El valor devuelto es la posicin en el - * array en el cual fue encontrada. - * Si esta expresin no es encontrada el valor retornado es cero. - * - * Si es especificada, la posicin de inicio al cual comenzar la - * bsqueda puede ser establecida con el valor pasado en . - * Por defecto es uno. - * - * Si es especificado, el nmero de elementos del array a examinar puede - * ser establecido con el valor pasado en . Por defecto es - * el nmero total de elementos en el array . - * - * Si es un bloque de cdigo, la operacin de la funcin es - * ligeramente diferente. Cada referencia del subindice del array es - * pasada al bloque de cdigo para ser evaluada. La rutina de bsqueda - * continuar hasta que el valor obtenido del bloque de cdigo sea - * verdadero (.T.) hasta que el final del array haya sido alcanzado. - * $EXAMPLES$ - * * El siguiente ejemplo utiliza una funcin de biblioteca para llenar - * el array aDir con los nombres de archivos en el directorio actual. - * Posteriormente, busca si entre ellos esta presente el archivo - * test.prg, devuelve cero si no esta, mayor de cero si est. - * - * LOCAL aDir := DIRECTORY( "*.*") - * ? ASCAN( aDir,,,{|x,y| x[1] == "test.prg" } ) - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin no es compatible con CA-Cl*pper . La funcin ASCAN() de - * Clipper es afectada por la condicin SET EXACT ON/OFF - * $FILES$ - * El cdigo fuente est en source\vm\arrays.c - * La librera asociada es vm - * $SEEALSO$ - * AEVAL(), EVAL() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * AEVAL() - * $CATEGORY$ - * ARRAY - * $ONELINER$ - * Ejecuta un bloque de cdigo por cada elemento en el array - * $SYNTAX$ - * AEVAL(, , [], []) --> aArray - * $ARGUMENTS$ - * es el array a ser evaluado. - * - * es el bloque de cdigo a evaluar para cada elemento - * procesado - * es el elemento de inicio del array a evaluar. - * - * es el nmero de elementos a procesar desde - * hasta el final del array - * $RETURNS$ - * AEVAL() retorna una referencia a - * $DESCRIPTION$ - * Esta funcin evala y procesa los elementos en . - * Un bloque de cdigo pasado como define la operacion a ser - * ejecutada sobre cada elemento del array. Todos los elementos en - * sern evaluados a menos que sea especificada la posicin de - * comienzo en por elementos. - * Por defecto es uno. - * - * Dos parmetros son pasados al bloque de cdigo . Los - * elementos individuales en el array son el primer parmetro y su - * posicin en el array es el segundo. - * - * AEVAL() no reemplaza al bucle FOR...NEXT para procesar arrays. - * Si un array es una unidad autnoma, AEVAL() es apropiado. Si el array - * va a ser alterado si los elementos van a ser reevaluados, un - * bucle FOR...NEXT es ms apropiado. - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es totalmente compatible con CA-Cl*pper. - * $FILES$ - * El cdigo fuente est en source\vm\arrays.c - * La librera asociada es vm - * $SEEALSO$ - * EVAL(),DBEVAL() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * ACOPY() - * $CATEGORY$ - * ARRAY - * $ONELINER$ - * Copia elementos de un array a otro - * $SYNTAX$ - * ACOPY( , , [], [], - * [] )--> aDestino - * $ARGUMENTS$ - * es el array desde el que se copian los elementos. - * - * es el array al que se copian los elementos. - * - * es la posicin desde donde se inicia la copia en - * . Por defecto es uno. - * es el nmero de elementos a copiar comenzando en la - * posicin - * - * es la posicin de inicio en el array hacia - * donde se copian los elementos. Por defecto es uno. - * $RETURNS$ - * ACOPY() retorna una referencia al array - * $DESCRIPTION$ - * ACOPY() copia elementos desde el array hacia el array - * . Esta funcin copia todo tipo de datos. - * - * Si un elemento en el array es un puntero de referencia a - * otro array (submatriz), esa referencia ser copiada al array - * pero no todas las dimensiones sern copiadas de un array - * al otro. Esto debe ser realizado via funcin ACLONE(). - * - * Note - * Si el array es mayor que , los elementos en el - * array comienzan a ser copiados en y continuan - * copiandose hasta que el final del array es alcanzado, los - * elementos que sobran en se descartan. - * La funcin ACOPY() no agrega posiciones al array destino, el tamao - * del array permanece constante. - * $EXAMPLES$ - * * El ejemplo siguiente copia un array sobre otro. - * - * LOCAL nContador := 2, nInicio := 1, aUltimo, aPrimero - * aUltimo := { "HARBOUR", " es el ", "Heredero" } - * aPrimero := { "CLIPPER", " fue el ", "Pionero" } - * ACOPY( aUltimo, aPrimero, nInicio, nContador) - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es totalmente compatible con CA-Cl*pper. - * $FILES$ - * El cdigo fuente est en source\vm\arrays.c - * La librera asociada es vm - * $SEEALSO$ - * ACLONE(),ADEL(),AEVAL(),AFILL(),AINS(),ASORT() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * ACLONE() - * $CATEGORY$ - * ARRAY - * $ONELINER$ - * Duplica un array anidado multidimensional - * $SYNTAX$ - * ACLONE( ) --> aDuplicado - * $ARGUMENTS$ - * es el nombre del array a ser clonado. - * $RETURNS$ - * ACLONE() retorna un nueva referencia a otro array - * exactamente igual al original. - * $DESCRIPTION$ - * Esta funcin realiza una copia completa del array llamado . - * Crea todas las dimensiones en el array que existen en el - * array original y luego llena cada dimensin con los mismos valores - * de los elementos en el original. - * Ambos arrays coexisten como entidades distintas. - * $EXAMPLES$ - * * El ejemplo siguiente crea un array bidimensional y lo duplica. - * Se muestra que son copiadas ambas dimensiones. - * - * LOCAL aOrigen, aDestino - * aOrigen := { {1, 2}, {3, 4}, {5, 6}, {7, 8}, {9, 10} } - * aDestino := ACLONE( aOrigen ) - * - * * primera dimensin - * ? "Impares son: " // Resultado: es {1, 3, 5, 7, 9} - * FOR n := 1 TO LEN( aDestino) - * ?? aDestino [n][1] - * NEXT - * - * * segunda dimensin - * ? "Pares son: " // Resultado: es {2, 4, 6, 8, 10} - * FOR n := 1 TO LEN( aDestino) - * ?? aDestino [n][2] - * NEXT - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Clipper retorna NIL si el parmetro no es un array. - * $FILES$ - * El cdigo fuente est en source\vm\arrays.c - * La librera asociada es vm - * $SEEALSO$ - * ACOPY(),ADEL(),AINS(),ASIZE() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * ASORT() - * $CATEGORY$ - * ARRAY - * $ONELINER$ - * Ordena un array - * $SYNTAX$ - * ASORT( , [], [], - * [] ) --> aDestino - * $ARGUMENTS$ - * es el nombre del array a ser ordenado. - * - * es el primer elemento para comenzar el ordenamiento. - * Por defecto es uno. - * - * es el nmero de elementos a ordenar comenzando en la - * posicin . Por defecto son todos los elementos - * - * es el bloque de cdigo para el orden de ordenamiento, - * por defecto es en orden ascendente {| x, y | x < y }. - * El bloque de cdigo debe recibir dos elementos del array - * como parametros y debe retornar .T. si el orden es el - * correcto, .F. en caso contrario. - * $RETURNS$ - * ASORT() retorna una referencia al reciente array ordenado - * NIL si el parmetro no es un array. - * $DESCRIPTION$ - * Esta funcion ordena todo parte de un array dado. Si es - * omitido, la funcin espera que sea un array unidimensional - * conteniendo un solo tipo de datos (uno de: CHARACTER, DATE, LOGICAL, - * NUMERIC) y ordena este array en orden ascendente: los caracteres son - * ordenados por su valor ASCII, las fechas son ordenadas - * cronologicamente el valor lgico .F. va antes de .T. y los valores - * numricos son ordenados por su valor. - * - * Si es especificado este es usado para manejar la forma de - * ordenamiento. Cada vez que el bloque es evaluado, dos elementos del - * array son pasados al bloque de cdigo, y el bloque debe retornar un - * valor lgico que define si esos elementos estan en orden (.T.) no - * (.F.). Usando este bloque se puede ordenar arrays multidimensionales - * hacer un ordenamiento descendente an (pero para que querria Ud. - * hacerlo) ordenar un array que contenga diferentes tipo de datos. - * $EXAMPLES$ - * * El siguiente ejemplo ordena valores numericos en orden ascendente - * - * ASORT( { 3, 1, 4, 42, 5, 9 }) // Resultado: { 1, 3, 4, 5, 9, 42} - * - * * El siguiente ejemplo ordena cadenas en orden descendente - * LOCAL aKeys := { "Ctrl", "Alt", "Delete" }, n - * LOCAL bOrden := {| x, y | UPPER( x ) > UPPER( y ) } - * ASORT( aKeys,,, bOrden ) - * FOR n = 1 TO LEN( aKeys ) - * ? aKeys [n] // Resultado: { "Delete", "Ctrl", "Alt"} - * NEXT - * - * * El siguiente ejemplo ordena dos arrays bidimensionales de acuerdo - * al segundo elemento de cada par. - * - * LOCAL aPair := { {"Sun",8}, {"Mon",1}, {"Tue",57}, {"Wed",-6} } - * ASORT( aPair,,, {| x, y | x[2] < y[2] } ) - * - * FOR n = 1 TO LEN( aPair ) - * ? aPair [n][1], aPair [n][2] - * NEXT - * // Resultado: { {"Wed",-6}, {"Mon",1}, {"Sun",8}, {"Tue",57} } - * $STATUS$ - * R - * $COMPLIANCE$ - * La frecuencia de llamada al bloque de cdigo y el orden difiere de - * Clipper debido a que Harbour usa un algoritmo distinto (ms rpido) - * de ordenamiento (quicksort). - * $FILES$ - * El cdigo fuente est en source\vm\arrays.c - * La librera asociada es vm - * $SEEALSO$ - * ASCAN(),EVAL(),SORT - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/binnum.txt b/harbour/examples/hbdoc/examples/es/binnum.txt deleted file mode 100644 index b7e4b167e8..0000000000 --- a/harbour/examples/hbdoc/examples/es/binnum.txt +++ /dev/null @@ -1,495 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2000 Alejandro de Grate - * Documentacin en Espaol de: - * BIN2W(), BIN2I(), BIN2L(), BIN2U(), I2BIN(), - * W2BIN(), L2BIN(), U2BIN() - * - * Copyright 2000 Chen Kedem - * Documentacin en Ingls de: BIN2W(), BIN2I(), BIN2L(), BIN2U(), I2BIN(), - * W2BIN(), L2BIN(), U2BIN() - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * BIN2W() - * $CATEGORY$ - * Conversin binaria - * $ONELINER$ - * Convierte 2 bytes de un entero corto sin signo en un nmero - * $SYNTAX$ - * BIN2W( ) --> nNumero - * $ARGUMENTS$ - * es una cadena de caracteres que contiene un entero corto - * sin signo codificado en 16 bits (byte menos significativo - * primero). Los primeros dos bytes son tenidos en cuenta, - * si hay ms son ignorados. - * $RETURNS$ - * BIN2W() retorna un nmero entero ( cero si no es una - * cadena). - * $DESCRIPTION$ - * BIN2W() es una de las funciones de conversin binaria, de bajo nivel. - * Estas funciones convierten entre un valor numrico en Harbour y una - * representacin de cadena de un valor numrico dado. - * BIN2W() toma dos bytes de un entero corto sin signo codificado en 16 - * bits y los convierte en un valor numrico estandar de Harbour. - * - * Ud podra preguntarse cual es la necesidad de este tipo de funciones, - * bueno, primero de todo esta permite leer/escribir informacin desde/ - * hacia un archivo binario (como extraer informacin de la cabecera de - * un archivo DBF), es tambin una forma til de compartir informacin - * desde otra fuente distinta a Harbour (lenguaje C por ejemplo). - * BIN2W() es la inversa de W2BIN() - * $EXAMPLES$ - * - * // Muestra la longitud de la cabecera de un DBF - * FUNCTION main() - * LOCAL nHandle, cBuffer := SPACE( 2 ) - * nHandle := FOPEN( "test.dbf" ) - * - * IF nHandle > 0 - * FSEEK( nHandle, 8 ) - * FREAD( nHandle, @cBuffer, 2 ) - * ? "Longitud de la cabecera del DBF en bytes:", BIN2W( cBuffer ) - * FCLOSE( nHandle ) - * ELSE - * ? "No puedo abrir el archivo..." - * ENDIF - * RETURN NIL - * - * $STATUS$ - * R - * $COMPLIANCE$ - * BIN2W() funciona exactamente como la funcin de CA-Cl*pper, BIN2W() - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * BIN2I(),BIN2L(),BIN2U(),I2BIN(),W2BIN(),WORD()*,U2BIN(),FREAD() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * BIN2I() - * $CATEGORY$ - * Conversin binaria - * $ONELINER$ - * Convierte 2 bytes de un entero con signo en un nmero en Harbour - * $SYNTAX$ - * BIN2I( ) --> nNumero - * $ARGUMENTS$ - * es una cadena de caracteres que contiene un entero corto - * con signo codificado en 16 bits (byte menos significativo - * primero). Los primeros dos bytes son tenidos en cuenta, - * si hay ms son ignorados. - * $RETURNS$ - * BIN2I() retorna un nmero entero ( cero si no es una - * cadena). - * $DESCRIPTION$ - * BIN2I() es una de las funciones de conversin binaria, de bajo nivel. - * Estas funciones convierten entre un valor numrico en Harbour y una - * representacin de cadena de un valor numrico dado. - * BIN2I() toma dos bytes de un entero corto con signo codificado en 16 - * bits y los convierte en un valor numrico estndar de Harbour. - * - * Ud podra preguntarse cual es la necesidad de este tipo de funciones, - * bueno, primero de todo esta permite leer/escribir informacin desde/ - * hacia un archivo binario (como extraer informacin de la cabecera de - * un archivo DBF), es tambien una forma til de compartir informacin - * desde otra fuente distinta a Harbour (lenguaje C por ejemplo). - * BIN2I() es la inversa de I2BIN() - * $EXAMPLES$ - * - * // Muestra la fecha de la ltima actualizacin del DBF - * FUNCTION main() - * LOCAL nHandle, cAno, cMes, cDia - * nHandle := FOPEN( "test.dbf" ) - * - * IF nHandle > 0 - * FSEEK( nHandle, 1 ) - * cAno := cMes := cDia := " " - * FREAD( nHandle, @cAno, 1 ) - * FREAD( nHandle, @cMes, 1 ) - * FREAD( nHandle, @cDia, 1 ) - * ? "Fecha de actualizacin:", BIN2I( cAno ), BIN2I( cMes ), ; - * BIN2I( cDia ) - * FCLOSE( nHandle ) - * ELSE - * ? "No puedo abrir el archivo..." - * ENDIF - * - * RETURN NIL - * - * $STATUS$ - * R - * $COMPLIANCE$ - * BIN2I() funciona exactamente como la funcin de CA-Cl*pper, BIN2I() - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * BIN2L(),BIN2U(),BIN2W(),I2BIN(),W2BIN(),WORD()*,U2BIN(),FREAD() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * BIN2L() - * $CATEGORY$ - * Conversin binaria - * $ONELINER$ - * Convierte 4 bytes de un entero largo con signo en un nmero - * $SYNTAX$ - * BIN2L( ) --> nNumero - * $ARGUMENTS$ - * es una cadena de caracteres que contiene un entero largo - * con signo codificado en 32 bits (byte menos significativo - * primero). Los primeros cuatro bytes son tenidos en cuenta, - * si hay ms son ignorados. - * $RETURNS$ - * BIN2L() retorna un nmero entero ( cero si no es una - * cadena). - * $DESCRIPTION$ - * BIN2L() es una de las funciones de conversin binaria, de bajo nivel. - * Estas funciones convierten entre un valor numrico en Harbour y una - * representacin de cadena de un valor numrico dado. - * BIN2L() toma cuatro bytes de un entero largo con signo codificado en - * 32 bits y los convierte en un valor numrico estndar de Harbour. - * - * Ud podra preguntarse cual es la necesidad de este tipo de funciones, - * bueno, primero de todo esta permite leer/escribir informacin desde/ - * hacia un archivo binario (como extraer informacin de la cabecera de - * un archivo DBF), es tambien una forma til de compartir informacin - * desde otra fuente distinta a Harbour (lenguaje C por ejemplo). - * BIN2L() es la inversa de L2BIN() - * $EXAMPLES$ - * - * // Muestra el nmero de registros en el DBF - * FUNCTION main() - * LOCAL nHandle, cBuffer := SPACE( 4 ) - * nHandle := FOPEN( "test.dbf" ) - * - * IF nHandle > 0 - * FSEEK( nHandle, 4 ) - * FREAD( nHandle, @cBuffer, 4 ) - * ? "nmero de registros en el archivo:", BIN2L( cBuffer ) - * FCLOSE( nHandle ) - * ELSE - * ? "No puedo abrir el archivo..." - * ENDIF - * - * RETURN NIL - * - * $STATUS$ - * R - * $COMPLIANCE$ - * BIN2L() funciona exactamente como la funcin de CA-Cl*pper, BIN2L() - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * BIN2I(),BIN2U(),BIN2W(),I2BIN(),L2BIN(),W2BIN(),WORD()*,U2BIN() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * BIN2U() - * $CATEGORY$ - * Conversin binaria - * $ONELINER$ - * Convierte 4 bytes de un entero largo sin signo en un nmero - * $SYNTAX$ - * BIN2U( ) --> nNumero - * $ARGUMENTS$ - * es una cadena de caracteres que contiene un entero largo - * sin signo codificado en 32 bits (byte menos significativo - * primero). Los primeros cuatro bytes son tenidos en cuenta, - * si hay ms son ignorados. - * $RETURNS$ - * BIN2U() retorna un nmero entero ( cero si no es una - * cadena). - * $DESCRIPTION$ - * BIN2U() es una de las funciones de conversin binaria, de bajo nivel. - * Estas funciones convierten entre un valor numrico en Harbour y una - * representacin de cadena de un valor numrico dado. - * BIN2U() toma cuatro bytes de un entero largo sin signo codificado en - * 32 bits y los convierte en un valor numrico estndar de Harbour. - * - * Ud podra preguntarse cual es la necesidad de este tipo de funciones, - * bueno, primero de todo esta permite leer/escribir informacin desde/ - * hacia un archivo binario (como extraer informacin de la cabecera de - * un archivo DBF), es tambien una forma util de compartir informacin - * desde otra fuente distinta a Harbour (lenguaje C por ejemplo). - * BIN2U() es la inversa de U2BIN() - * $EXAMPLES$ - * - * // Muestra el nmero de registros en el DBF - * FUNCTION main() - * LOCAL nHandle, cBuffer := SPACE( 4 ) - * nHandle := FOPEN( "test.dbf" ) - * - * IF nHandle > 0 - * FSEEK( nHandle, 4 ) - * FREAD( nHandle, @cBuffer, 4 ) - * ? "Nmero de registros en el archivo:", BIN2U( cBuffer ) - * FCLOSE( nHandle ) - * ELSE - * ? "No puedo abrir el archivo..." - * ENDIF - * - * RETURN NIL - * - * $STATUS$ - * R - * $COMPLIANCE$ - * BIN2U() es una funcin de compatibilidad con Xbase++ y no existe como - * una funcin estndar en CA-Cl*pper 5.x - * Esta funcin es solamente visible si el archivo source/rtl/binnum.c - * fue compilado con la bandera HB_COMPAT_XPP. - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * BIN2I(),BIN2L(),BIN2W(),I2BIN(),W2BIN(),WORD()*,U2BIN(),FREAD() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * I2BIN() - * $CATEGORY$ - * Conversin binaria - * $ONELINER$ - * Convierte un nmero en 2 bytes de un entero corto con signo. - * $SYNTAX$ - * I2BIN( ) --> cBuffer - * $ARGUMENTS$ - * es un valor numrico a convertir (los digitos decimales - * son ignorados). - * $RETURNS$ - * I2BIN() retorna una cadena de caracteres de dos bytes que - * contienen un entero corto con signo, codificado en 16 bits (byte - * menos significativo primero). - * $DESCRIPTION$ - * I2BIN() es una de las funciones de conversin binaria, de bajo nivel. - * Estas funciones convierten entre un valor numrico en Harbour y una - * representacin de cadena de un valor numrico dado. - * I2BIN() toma un valor numrico y lo convierte en dos bytes de - * un entero corto con signo, codificado en 16 bits. - * - * Ud podra preguntarse cual es la necesidad de este tipo de funciones, - * bueno, primero de todo esta permite leer/escribir informacin desde/ - * hacia un archivo binario (como extraer informacin de la cabecera de - * un archivo DBF), es tambien una forma util de compartir informacin - * desde otra fuente distinta a Harbour (lenguaje C por ejemplo). - * I2BIN() es la inversa de BIN2I() - * $EXAMPLES$ - * - * // El ejemplo cambia la "fecha de ultima actualizacin" del DBF - * #include "fileio.ch" - * FUNCTION main() - * LOCAL nHandle, cAno, cMes, cDia - * - * USE test - * ? "La fecha original de actualizacin es:", LUPDATE() - * CLOSE - * nHandle := FOPEN( "test.dbf", FO_READWRITE ) - * - * IF nHandle > 0 - * FSEEK( nHandle, 1, ) - * cAno := I2BIN( 68 ) - * cMes := I2BIN( 8 ) - * cDia := I2BIN( 1 ) - * FWRITE( nHandle, cAno , 1 ) // escribe solo el primer byte - * FWRITE( nHandle, cMes, 1 ) - * FWRITE( nHandle, cDia, 1 ) - * FCLOSE( nHandle ) - * USE test - * ? "La nueva fecha de actualizacin es:", LUPDATE() - * CLOSE - * ELSE - * ? "No puedo abrir el archivo..." - * ENDIF - * - * RETURN NIL - * - * $STATUS$ - * R - * $COMPLIANCE$ - * I2BIN() funciona exactamente como la funcin de CA-Cl*pper, I2BIN() - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * BIN2I(),BIN2L(),BIN2U(),BIN2W(),W2BIN(),WORD()*,U2BIN(),FWRITE() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * W2BIN() - * $CATEGORY$ - * Conversin binaria - * $ONELINER$ - * Convierte un nmero en 2 bytes de un entero corto sin signo - * $SYNTAX$ - * W2BIN( ) --> cBuffer - * $ARGUMENTS$ - * es un valor numrico a convertir (los digitos decimales - * son ignorados). - * $RETURNS$ - * W2BIN() retorna una cadena de caracteres de dos bytes que - * contienen un entero corto sin signo, codificado en 16 bits (byte - * menos significativo primero). - * $DESCRIPTION$ - * W2BIN() es una de las funciones de conversin binaria, de bajo nivel. - * Estas funciones convierten entre un valor numrico en Harbour y una - * representacin de cadena de un valor numrico dado. - * W2BIN() toma un valor numrico y lo convierte en dos bytes de - * un entero corto sin signo, codificado en 16 bits. - * - * Ud podra preguntarse cual es la necesidad de este tipo de funciones, - * bueno, primero de todo esta permite leer/escribir informacin desde/ - * hacia un archivo binario (como extraer informacin de la cabecera de - * un archivo DBF), es tambien una forma util de compartir informacin - * desde otra fuente distinta a Harbour (lenguaje C por ejemplo). - * W2BIN() es la inversa de BIN2W() - * $STATUS$ - * R - * $COMPLIANCE$ - * W2BIN() es una funcin de compatibilidad con Xbase++ y no existe como - * una funcin estandar en CA-Cl*pper 5.x - * Esta funcin es solamente visible si el archivo source/rtl/binnum.c - * fue compilado con la bandera HB_COMPAT_XPP. - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * BIN2I(),BIN2L(),BIN2U(),BIN2W(),I2BIN(),WORD()*,U2BIN(),FWRITE() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * L2BIN() - * $CATEGORY$ - * Conversin binaria - * $ONELINER$ - * Convierte un nmero en 4 bytes de un entero largo con signo - * $SYNTAX$ - * L2BIN( ) --> cBuffer - * $ARGUMENTS$ - * es un valor numrico a convertir (los digitos decimales - * son ignorados). - * $RETURNS$ - * L2BIN() retorna una cadena de caracteres de cuatro bytes que - * contienen un entero largo con signo, codificado en 32 bits (byte - * menos significativo primero). - * $DESCRIPTION$ - * L2BIN() es una de las funciones de conversin binaria, de bajo nivel. - * Estas funciones convierten entre un valor numrico en Harbour y una - * representacin de cadena de un valor numrico dado. - * L2BIN() toma un valor numrico y lo convierte en cuatro bytes de - * un entero largo con signo, codificado en 32 bits. - * - * Ud podra preguntarse cual es la necesidad de este tipo de funciones, - * bueno, primero de todo esta permite leer/escribir informacin desde/ - * hacia un archivo binario (como extraer informacin de la cabecera de - * un archivo DBF), es tambien una forma til de compartir informacin - * desde otra fuente distinta a Harbour (lenguaje C por ejemplo). - * L2BIN() es la inversa de BIN2L() - * $STATUS$ - * R - * $COMPLIANCE$ - * L2BIN() funciona exactamente como la funcin de CA-Cl*pper, L2BIN() - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * BIN2I(),BIN2L(),BIN2U(),BIN2L(),W2BIN(),WORD()*,U2BIN(),FWRITE() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * U2BIN() - * $CATEGORY$ - * Conversin binaria - * $ONELINER$ - * Convierte un nmero en 4 bytes de un entero largo sin signo - * $SYNTAX$ - * U2BIN( ) --> cBuffer - * $ARGUMENTS$ - * es un valor numrico a convertir (los digitos decimales - * son ignorados). - * $RETURNS$ - * U2BIN() retorna una cadena de caracteres de cuatro bytes que - * contienen un entero largo sin signo, codificado en 32 bits (byte - * menos significativo primero). - * $DESCRIPTION$ - * U2BIN() es una de las funciones de conversin binaria, de bajo nivel. - * Estas funciones convierten entre un valor numrico en Harbour y una - * representacin de cadena de un valor numrico dado. - * U2BIN() toma un valor numrico y lo convierte en cuatro bytes de - * un entero largo sin signo, codificado en 32 bits. - * - * Ud podra preguntarse cual es la necesidad de este tipo de funciones, - * bueno, primero de todo esta permite leer/escribir informacin desde/ - * hacia un archivo binario (como extraer informacin de la cabecera de - * un archivo DBF), es tambien una forma til de compartir informacin - * desde otra fuente distinta a Harbour (lenguaje C por ejemplo). - * U2BIN() es la inversa de BIN2U() - * $STATUS$ - * R - * $COMPLIANCE$ - * U2BIN() es una funcin de compatibilidad con Xbase++ y no existe como - * una funcin estndar en CA-Cl*pper 5.x - * Esta funcin es solamente visible si el archivo source/rtl/binnum.c - * fue compilado con la bandera HB_COMPAT_XPP. - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * BIN2I(),BIN2L(),BIN2U(),I2BIN(),L2BIN(),W2BIN(),WORD()*,FWRITE() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * WORD()* - * $CATEGORY$ - * Conversin binaria - * $ONELINER$ - * Convierte parmetros de doble precisin del mandato CALL a enteros - * $SYNTAX$ - * WORD( ) --> - * $ARGUMENTS$ - * es un valor numrico de doble precisin. - * $RETURNS$ - * WORD() retorna un entero en el rango: -32767 a +32767 - * $DESCRIPTION$ - * Esta funcin convierte valores de doble precisin a enteros, para - * ser usados con el mandato CALL. - * $EXAMPLES$ - * - * // Utiliza WORD() como argumento del mandato CALL - * CALL INVENT WITH WORD(75300) - * - * - * $STATUS$ - * R - * $COMPLIANCE$ - * La NG de Clipper NG establece que WORD() funcionar solamente cuando - * sea usada en la lista de parmetros del comando CALL, de otra manera - * devolver NIL, en Harbour esta funcionar donde sea. - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * CALL - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/browse.txt b/harbour/examples/hbdoc/examples/es/browse.txt deleted file mode 100644 index 49064c96f2..0000000000 --- a/harbour/examples/hbdoc/examples/es/browse.txt +++ /dev/null @@ -1,400 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2000 Alejandro de Grate - * Documentacin en Espaol de: BROWSE(), DBEDIT(), TBROWSEDB(), DBSKIPPER() - * - * Copyright 1999 Chen Kedem - * Documentacin en Ingls de: BROWSE(), DBEDIT(), TBROWSEDB(), DBSKIPPER() - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * DBEDIT()* - * $CATEGORY$ - * Entrada y salida de datos - * $ONELINER$ - * Despliega registros en una tabla - * $SYNTAX$ - * DBEDIT( [], [], [], [], [], ; - * [], [], ; - * [], ; - * [], [], ; - * [], [] ) --> lExito - * $ARGUMENTS$ - * coordenada para la fila Superior de visualizacin. El rango - * para va de cero a MAXROW(), por defecto es cero. - * - * coordenada para la columna izquierda de visualizacin. El - * rango para va de cero a MAXCOL(), por defecto es cero. - * - * coordenada para la fila inferior de visualizacin. El rango - * para va de cero a MAXROW(), por defecto es MAXROW(). - * - * coordenada para la columna derecha de visualizacin. El rango - * para va de cero a MAXCOL(), por defecto es MAXCOL(). - * - * es un array de expresiones de caracteres que contienen - * los nombres de los campos de la base de datos, expresiones para la - * visualizacin en cada columna. - * Si no es especificada, por defecto es la visualizacin de todos los - * campos de la base de datos en el rea de trabajo actual. - * - * es el nombre de una funcin un bloque de cdigo - * que podra ser llamado cada vez que una tecla no reconocida ha sido - * presionada cuando no hay ms teclas para ser procesadas y DBEDIT() - * va al modo inactivo. Si es una cadena de caracteres - * sta debe contener el nombre de una funcin de usuario definida, que - * sea vlida y sin parntesis. - * Ambos la funcin definida por el usuario el bloque de cdigo - * debern aceptar dos parmetros: nModo y nActualColumna. - * Ambos deberan devolver un valor numrico que corresponda a uno de - * los cdigos de retorno esperados. - * (Vea la tabla ms abajo con la lista de nModo y los cdigos de - * retorno). - * - * es un molde (picture) opcional. - * Si es una cadena de caracteres, todas las - * columnas pueden usar el mismo valor como cadena de molde (picture). - * Si es un array, cada elemento debe ser una - * cadena de caracteres que corresponde a la cadena (picture) usada de - * molde para la columna con el mismo ndice. Vea la ayuda para @...SAY - * para tener ms informacin acerca de los valores de molde (picture). - * - * contiene los ttulos de cabecera para cada columna - * si ste es una cadena de caracteres, todas las columnas tendrn el - * mismo encabezado, si ste es un array, cada elemento es una cadena - * de caracteres que contienen el titulo de cabecera para cada campo. - * La cabecera puede ser dividido en ms de una lnea al poner un punto - * y coma (;) en los lugares donde Ud. desea romper la lnea. - * Si es omitida el valor por defecto para cada cabecera de columna es - * tomado de el nombre del campo de la base de datos, si - * no fue especificado - * - * es un array que contiene caracteres que dibujan - * las lneas que separan las cabeceras y los datos de los campos . - * En lugar de un array Ud. puede usar una cadena de caracteres que - * podra ser usada para la visualizacin de la misma lnea para todos - * los campos. - * El valor por defecto es una lnea doble. - * - * es un array que contiene caracteres que dibujan - * las lneas que separan las columnas visualizadas. En lugar de un - * array Ud. puede usar una cadena de caracteres que podria ser usada - * para la visualizacin de la misma lnea para todos los campos. - * El valor por defecto es una lnea simple. - * - * es un array que contiene caracteres que dibujan - * las lneas que separan el rea de datos de los campos y el pie. - * En lugar de un array Ud. puede usar una cadena de caracteres que - * podra ser usada para la visualizacin de la misma lnea para todos - * los campos. El valor por defecto es ningn separador de pie. - * - * contiene el pie para ser visualizado al final de - * cada columna, si este es una cadena de caracteres, todas las columnas - * tendrn el mismo pie, si este es un array, cada elemento es una - * cadena de caracteres que contienen el pie para cada campo. El pie - * puede ser dividido en ms de una lnea al poner un punto y coma (;) - * en los lugares donde Ud. desea romper la lnea. Si es omitido, ningn - * pie es visualizado. - * $RETURNS$ - * DBEDIT() retorna .F. si no hay una base de datos abierta en ese rea - * de trabajo, si el nmero de columnas para la visualizacin es cero, - * en caso contrario DBEDIT() devuelve .T. - * $DESCRIPTION$ - * DBEDIT() visualiza y permite editar registros de una ms reas de - * trabajo en una grilla en pantalla. Cada columna es definida por los - * elementos de y es el equivalente de un campo. - * Cada fila es el equivalente de un registro de la base de datos. - * - * - * A Continuacin estan las teclas manejadas por DBEDIT(): - * ------------------------------------------------------- - * - * Tecla Significado - * - * Izquierda Mueve una columna a la izquierda (campo previo) - * Derecha Mueve una columna a la derecha (proximo campo) - * Arriba Mueve arriba una fila (registro previo) - * Abajo Mueve abajo una fila (proximo registro) - * Pag-Arriba Mueve a la pantalla previa - * Pag-Abajo Mueve a la pantalla prxima - * Ctrl Pag-Arriba Mueve al inicio del archivo - * Ctrl Pag-Abajo Mueve al final del archivo - * Inicio Mueve a la columna visible ms a la izquierda - * Fin Mueve a la columna visible ms a la derecha - * Ctrl Izquierda Desplaza una columna a la izquierda - * Ctrl Derecha Desplaza una columna a la deecha - * Ctrl Inicio Mueve a la columna ms a la izquierda - * Ctrl Fin Mueve a la columna ms a la derecha - * - * - * Cuando es omitida, dos teclas ms estan activas: - * - * Tecla significado - * - * Esc Termina BROWSE() - * Enter Termina BROWSE() - * - * - * Cuando DBEDIT() ejecuta le pasa los siguientes - * argumentos: - * nModo y el ndice del registro actual en . - * Si es omitido, el nmero de ndice es nmero de FIELD() - * de la estructura de la base de datos abierta. - * - * - * Valores de los Modos en DBEDIT() : - * --------------------------------- - * - * Dbedit.ch Valor Significado - * - * DE_IDLE 0 DBEDIT() esta inactivo, todas la teclas de - * movimiento han sido procesadas. - * DE_HITTOP 1 Intento de mover el cursor ms alla de la parte - * superior del archivo - * DE_HITBOTTOM 2 Intento de mover el cursor despues del final - * del archivo. - * DE_EMPTY 3 No hay registros en el rea de trabajo, la base - * de datos est vacia. - * DE_EXCEPT 4 Interrupcin de teclado - * - * - * - * La funcin definida por el usuario el bloque de cdigo debe - * retornar un valor que le indique a DBEDIT() que hacer a continuacin. - * - * - * Cdigos de retorno de la Funcin del Usuario: - * -------------------------------------------- - * - * Dbedit.ch Valor Significado - * - * DE_ABORT 0 Aborta DBEDIT(). - * DE_CONT 1 Continua DBEDIT() como ahora. - * DE_REFRESH 2 Fueza relectura/revisualizacin en pantalla de - * todas las filas de datos - * - * - * La funcin del usuario es llamada una vez en cada uno de los - * siguientes casos: - * - La base de datos esta vaca. - * - El usuario trata de mover ms alla de la parte superior de la - * parte inferior del archivo. - * - Interrupcin de teclado, el usuario ha presionado una tecla que no - * puede ser manejada por DBEDIT(). - * - El buffer de teclado esta vaco un refresco de pantalla acaba - * de ocurrir. - * - * Nota Importante: - * --------------- - * DBEDIT() es una funcin de compatibilidad, esta fu superada por la - * clase TBrowse y no es recomendada para nuevas aplicaciones. - * $EXAMPLES$ - * - * // Despliega un archivo DBF usando valores por defecto - * USE Test - * DBEDIT() - * - * - * $STATUS$ - * S - * $COMPLIANCE$ - * puede ser tambin un bloque de cdigo, esta es una - * extensin de Harbour. - * - * CA-Cl*pper lanzar un error si no hay una base de datos abierta - * Harbour puede retornar .F. - * - * Clipper es inconsistente y lanzar un error si el nmero de columnas - * es cero. Harbour puede retornar .F. - * Las NG de CA-Cl*pper 5.2 indican que el valor devuelto es NIL, - * esto es errneo y debera ser un valor lgico. - * - * Hay un cdigo de retorno (3) indocumentado para las funciones - * definidas por el usuario en Clipper (ambos 87 and 5.x). este es un - * Modo de agregado (Append) el cual: - * "Divide la pantalla para permitir ms que datos sean agregados en el - * rea de la ventana". - * Este modo no es soportado por Harbour. - * $FILES$ - * Los archivos de cabecera son dbedit.ch, inkey.ch - * La librera es rtl - * $SEEALSO$ - * @...SAY,BROWSE(),TBrowse class,TRANSFORM() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * BROWSE()* - * $CATEGORY$ - * Entrada y salida de datos - * $ONELINER$ - * Despliega un archivo de base de datos - * $SYNTAX$ - * BROWSE( [, , , ] ) --> lExito - * $ARGUMENTS$ - * coordenada de la fila Superior de visualizacin. - * - * coordenada de la columna izquierda de visualizacin. - * - * coordenada de la fila inferior de visualizacin. - * - * coordenada de la columna derecha de visualizacin. - * $RETURNS$ - * BROWSE() retorna .F. si no hay una base de datos abierta en ese rea - * de trabajo, en caso contrario devuelve .T. - * $DESCRIPTION$ - * BROWSE() es un visualizador de bases de datos de propsito general, - * sin demasiado trabajo ud. puede desplegar un archivo DBF con las - * siguientes teclas: - * - * - * Tecla Significado - * - * Izquierda Mueve una columna a la izquierda (campo previo) - * Derecha Mueve una columna a la derecha (proximo campo) - * Arriba Mueve arriba una fila (registro previo) - * Abajo Mueve abajo una fila (proximo registro) - * Pag-Arriba Mueve a la pantalla previa - * Pag-Abajo Mueve a la pantalla proxima - * Ctrl Pag-Arriba Mueve al inicio del archivo - * Ctrl Pag-Abajo Mueve al final del archivo - * Inicio Mueve a la columna visible ms a la izquierda - * Fin Mueve a la columna visible ms a la derecha - * Ctrl Izquierda Desplaza una columna a la izquierda - * Ctrl Derecha Desplaza una columna a la deecha - * Ctrl Inicio Mueve a la columna ms a la izquierda - * Ctrl Fin Mueve a la columna ms a la derecha - * Esc Termina el BROWSE() - * - * - * - * En la parte superior de la pantalla ud. ve una lnea de estado con - * la siguiente indicacin: - * - * - * Registro ###/### Nmero registro actual / Nmero Total de registros. - * No hay registros, el archivo esta vacio. - * Ud.esta en modo de Agregado al final del archivo. - * El registro actual esta borrado. - * Ud. esta en el comienzo del archivo. - * - * - * Ud. debera pasar las cuatro coordenadas validas, si menos de cuatro - * parmetros son pasados al BROWSE() las coordenadas por defecto son: - * 1, 0, MAXROW(), MAXCOL(). - * $EXAMPLES$ - * - * // muestra como desplegar una base de datos - * USE Test - * BROWSE() - * - * $STATUS$ - * S - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * DBEDIT()*,TBrowse class - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * TBrowseDB() - * $CATEGORY$ - * Clase TBrowse - * $ONELINER$ - * Crea un nuevo objeto TBrowse para ser usado con una base de datos. - * $SYNTAX$ - * TBrowseDB( [], [], [], [] ) --> oBrowse - * $ARGUMENTS$ - * coordenada de la fila superior de visualizacin. - * - * coordenada de la columna izquierda de visualizacin. - * - * coordenada de la fila inferior de visualizacin. - * - * coordenada de la columna derecha de visualizacin. - * $RETURNS$ - * TBrowseDB() retorna un nuevo objeto TBrowse con unas coordenadas - * especficas y un :SkipBlock, :GoTopBlock y :GoBottomBlock por defecto - * para desplegar una base de datos. - * $DESCRIPTION$ - * TBrowseDB() es una forma rpida de crear un objeto TBrowse junto con - * el soporte mnimo para desplegar una base de datos. - * Note que el objeto TBrowse devuelto no contiene objetos TBColumn y - * Ud. necesita agregar una columna para cada campo por Ud. mismo - * $EXAMPLES$ - * - * Para un buen ejemplo, mire en el cdigo fuente de la funcin BROWSE() - * en el subdirectorio ../source/rtl/browse.prg - * - * $STATUS$ - * S - * $COMPLIANCE$ - * TBrowseDB() funciona exactamente como la funcin de CA-Cl*pper - * TBrowseDB(). - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * BROWSE()*,TBColumn class,TBrowse class,TBrowseNew() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * dbSkipper() - * $CATEGORY$ - * Base de datos - * $ONELINER$ - * Funcin para ayudar a saltar registros en la base de datos - * $SYNTAX$ - * dbSkipper( ) --> nSkipped - * $ARGUMENTS$ - * es el nmero de registros a saltar relativos al registro - * actual. Nmeros positivos tratan de mover el puntero de registro - * hacia adelante y Nmeros negativos tratan de mover el puntero de - * registro hacia atrs registros. - * $RETURNS$ - * dbSkipper() retorna el nmero actual de registros saltados. - * $DESCRIPTION$ - * dbSkipper() es una funcin de ayuda usada en el mecanismo de - * despliegue para saltar un nmero de registros mientras le da al - * llamador una indicacin del nmero actual de registros saltados. - * $EXAMPLES$ - * - * // Abre un archivo y chequea si tenemos suficientes registros en el - * USE ventas - * IF dbSkipper( 100 ) == 100 - * ? "Buen trabajo!, debes irte de fiesta" - * ELSE - * ? "Muy mal, Ud. debera realmente trabajar ms duro" - * ENDIF - * CLOSE - * - * $STATUS$ - * R - * $COMPLIANCE$ - * dbSkipper() es una funcin de compatibilidad con Xbase++ y no existe - * como una funcin estndar en CA-Cl*pper 5.x - * Esta funcin es solamente visible si el archivo: - * ../source/rtl/browdb.prg fue compilado con la bandera HB_COMPAT_XPP. - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * DBSKIP(),SKIP - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/clipper.txt b/harbour/examples/hbdoc/examples/es/clipper.txt deleted file mode 100644 index cb9ab5e19e..0000000000 --- a/harbour/examples/hbdoc/examples/es/clipper.txt +++ /dev/null @@ -1,90 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2001 Ron Pinkas - * Documentacin en Ingls - * - * Copyright 2001 Alejandro de Grate - * Traduccin al Espaol de clipper.txt - * - * Vea COPYING por los trminos de la licencia. - * - */ - - - Este documento intenta describir las caractersticas que separan - Harbour de Clipper. - -/* TODO: @FuncPointer(), y todas las otras extensiones de Harbour. */ - - - El Compilador de Macros de Harbour - ---------------------------------- - El Compilador de Macros de Harbour ofrece dos capas adicionales de - funcionalidad por medio de la funcin HB_SETMACRO()*, no disponible - en Clipper. - - HB_SETMACRO( HB_SM_HARBOUR, TRUE ) habilitar compilacin de macros - y evaluacin de expresiones complejas, no soportadas por Clipper como: - - - exp++, exp--, var += exp, (exp), etc.. - - bloques de cdigo (codeblocks) anidados. - - Expresiones ms largas de 254 caracteres. - - - HB_SETMACRO( HB_SM_XBASE, TRUE ) habilitar compilacin de macros - y evaluacin de listas separadas por comas, en todos los contextos - donde las listas son aceptadas por Clipper*, incluyendo: - - - { &cMacro } // Literal de la lista de elementos de un array. - - SomeArray[ &cMacro ]// Lista de indices de un array. - - SomeFun( &cMacro ) // Lista de Argumentos de una funcin. - - ( &cMacro ) // Lista de expresiones parentizada. - - *Clipper slo soporta lista de macros dentro del contexto de bloques - de cdigo (codeblocks). - - Ambas capas extras estan activadas por defecto. - - * Vea tambin el switch -k del Compilador - - - Comando LIST - ------------ - - LIST &cMacro - - LIST en clipper soporta [superficialmente] macros de listas de - expresiones. - Ningn error ser producido, y todas las expresiones en la lista sern - evaluadas, pero *solamente* la *ltima* expresion ser visualizada. - Esto no est documentado ni en el comando LIST, ni en la descripcin - del operador Macro (&), pero es el comportamiento por defecto en - todas las versiones de Clipper 5.x - - Harbour en su lugar, no slo evala todas las expresiones en esa - lista de macros, sino que tambin visualiza todos aquellos valores. - Este comportamiento por defecto de Harbour, puede ser deshabilitado - HB_SETMACRO( HB_SM_XBASE, .F. )* - - * Vea tambin el switch -k del Compilador - - - INIT/EXIT y procedimientos de inicio - ------------------------------------ - - En Clipper el procedimiento de inicio es siempre el primer procedimiento - /funcin del modulo principal, an si ese smbolo es el smbolo INIT - EXIT. En tal caso el programa nunca ejecutar el smbolo "main". - En Harbour el primer smbolo que no sea INIT/EXIT, ser ejecutado como - el smbolo "main" despus que todos los procedimientos INIT hayan sido - ejecutados. - - - - diff --git a/harbour/examples/hbdoc/examples/es/cmdline.txt b/harbour/examples/hbdoc/examples/es/cmdline.txt deleted file mode 100644 index 47bab4d512..0000000000 --- a/harbour/examples/hbdoc/examples/es/cmdline.txt +++ /dev/null @@ -1,142 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2001 - * Documentacin en Ingls de: cmdline.txt - * - * Copyright 2002 Alejandro de Grate - * Documentacin en Espaol de: cmdline.txt - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * Linea de Comandos - * $CATEGORY$ - * Documento - * $ONELINER$ - * Opciones del Compilador - * $DESCRIPTION$ - * Esta especificacin sirve para CLIPPERCMD, HARBOURCMD, el compilador - * Harbour y las directivas #pragma en el cdigo fuente. - * - * La lnea de comando siempre predomina sobre las variables de entorno. - * - * Note que algunos switches no son aceptados en variables de entorno, - * y algunos otros en #pragmas. - * - * Primero el analizador (parser) debera comenzar saltando a travs - * de todos los tokens en la cadena separadas por espacios en blanco. - * ( solo ir a travs de todos los argv[]) - * - * 1.) Si el token comienza con "-", este debe ser tratado como un - * un nuevo estilo de switch . - * - * Uno ms caracteres switch pueden seguir a ste. El signo "-" - * dentro del token apaga el switch. - * - * Si el switch tiene un argumento, todos los caracteres siguientes son - * tratados como parte del argumento: - * - * El signo "/" n tiene significado especial aqui. - * - * - * Switch Opcin resultante - * - * -wn ( W N ) - * -w-n ( !W N ) - * -wi/harbour/include/ ( W I=/harbour/include/ ) - * -wi/harbour/include/n ( W I=/harbour/include/n ) - * -wes0n ( W ES=0 N ) - * -wen ( W [invalid switch: e] N ) - * -wesn ( W ES=default(0) N ) - * -wses ( W S ES=default(0) ) - * -wess ( W ES=default(0) S ) - * - ( [invalid switch] ) - * -w-n-p ( !W !N P ) - * -w-n-p- ( !W !N !P ) - * -w- -w -w- ( finally: !W ) - *
- * - * - * 2.) Si el token comienza con "/", este debe ser tratado como un - * switch de compatibilidad. - * - * El analizador revisa el token por el prximo signo "/", o EOS - * (End Of String = fin de linea) y trata la cadena resultante - * como un slo switch. - * - * Esto significa que si un switch con un argumento conteniendo el - * signo "/" tiene algunas limitaciones. - * Esto puede ser resuelto permitiendo el uso de caracteres comillas. - * Esto es mayormente un problema en sistemas que usan "/" como un - * separador de path. - * - * - * El signo "-" n tiene significado especial aqu, ste no puede ser - * usado para deshabilitar un switch. - * - * - * Switch Opcin resultante - * - * /w/n ( W N ) - * /wo/n ( [invalid switch: wo] N ) - * /ihello/world/ ( I=hello [invalid switch: world] - * [invalid switch: /] ) - * /i"hello/world/"/w ( I=hello/world/ W ) - * /ihello\world\ ( I=hello\world\ ) - *
- * - * - * 3.) Si el token comienza con otra cosa, ste debera ser saltado. - * - * Los switches de Harbour son siempre insensibles a las maysculas. - * - * En la lnea de comandos de Harbour los dos estilos pueden ser usados - * conjuntamente: - * - * harbour -wnes2 /gc0/q0 -iC:\hello - * - * Excepciones: - * - * - El manejo del switch indocumentado /CREDIT en la lnea de comandos - * de Harbour es inusual, revise el cdigo actual por esto. - * - * - El analisis de los parmetros en la lnea de comandos de CLIPPER, - * HARBOUR y aplicaciones de Harbour, son cosas distintas, vea - * cmdarg.c por una nota. - * - * Notas: - * - * - En toda ocurrencia donde el path es aceptado, Harbour debera - * manejar el caracter doble comillas (") para especificar un path - * conteniendo espacios, signo negativo, barras u otros caracteres - * con un significado especial. - * - * /i"C:/hello/" - * -i"C:/hello-n" - * /i"C:/Program Files/" - * -i"C:/Program Files/" - * - * - * Slo algunos ejemplos para las varias formas aceptadas: - * //F20 == /F20 == F20 == F:20 == F20X - * //TMPPATH:C:\hello - * F20//TMPPATH:/temp///F:30000000 NOIDLE - * F0NOIDLEX10 - * SQUAWKNOIDLE - * - * "//" siempre deberan ser usados en la lnea de comandos. - * $SEEALSO$ - * Opciones Compilador - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/codebloc.txt b/harbour/examples/hbdoc/examples/es/codebloc.txt deleted file mode 100644 index ff0b786191..0000000000 --- a/harbour/examples/hbdoc/examples/es/codebloc.txt +++ /dev/null @@ -1,183 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2001 Ryszard Glab - * Documentacin en Ingls de codeblock.txt - * - * Copyright 2001 Alejandro de Grate - * Traduccin al Espaol de codeblock.txt - * - * Vea COPYING por los trminos de la licencia. - * - */ - -Implementacin de Harbour de codeblocks (bloques de cdigo) -=========================================================== - -Compilacin de un codeblock - Durante el tiempo de Compilacin, el codeblock es almacenado en la - siguiente forma: - - la cabecera - - la ristra de bytes de pcodes - -La cabecera almacena informacin acerca de variables locales -referenciadas. -+0: el byte pcode para _PUSHBLOCK -+1: el nmero de bytes que definen a un codeblock -+3: el nmero de parmetros codeblock (declarados entre || en el codeblock) -+5: nmero de variables locales usadas declaradas en el procedimiento / - funcin donde el codeblock es creado. -+7: La lista de las posiciones de variables locales de los procedimientos / - funciones, en la pila eval del procedimiento / funcin. Cada variable - local usada en un codeblock usa 2 bytes en esta lista. Cuando son - usados codeblocks anidados, entonces esta lista es creada solamente - en el codeblock ms externo. -+x: La ristra de bytes pcode, siguiendo a la cabecera. -+y: El byte pcode para _ENDBLOCK - - -Creacin de un codeblock -======================== - Cuando el opcode HB_P_PUSHBLOCK es ejecutado entonces la estructura -HB_ITEM es creada y puesta en la pila de evaluacin. El tipo de item -es IT_BLOCK. -El valor de este item es un puntero a la estructura HB_CODEBLOCK. -Adicionalmente este item almacena la base de las variables estticas -definidas para el procedimiento/funcin actual. - esto es usado durante -la evaluacin de un codeblock cuando la evaluacin es llamada desde -cdigo desde otro mdulo PRG. Tambin el nmero de parmetros esperados -es almacenado. - - La estructura HB_CODEBLOCK almacena un puntero a la ristra (stream) -de pcodes que es ejecutada durante la evaluacin de un codeblock. -Este almacena tambin el puntero a la tabla con referencia a variables -locales. Valores de todas las variables locales definidas en un -procedimiento y usadas en un codeblock son reemplazadas con una -referencia a un valor almacenado en un pool de variables de memoria -global. Esto permite el correcto acceso a variables locales aisladas -en un codeblock devuelto desde sta funcin (sea directamente en una -sentencia RETURN indirectamente por asignarlo ste a una variable -esttica MEMVAR). -Este reemplazo automtico e incondicional es requerido porque no hay -un mtodo seguro de encontrar si un codeblock ser accedido desde -fuera de una funcin dnde ste es creado. - -Cuando son usados codeblocks anidados, solamente el codeblock ms -externo crea la tabla - todo codeblock interno usa esta tabla. -Esto permite compartir la tabla entre codeblocks anidados - , la -tabla es borrada si no hay ms referencias a ella. -Esto es causado por el hecho que un codeblock interno puede ser -creado durante la evaluacin del codeblock exterior cuando las -variables locales no existen como en este ejemplo: - -PROCEDURE MAIN() -PRIVATE foo, bar - - Test() - EVAL( foo ) - EVAL( bar ) - -RETURN - -PROCEDURE Test() -LOCAL a:='FOO', b:='BAR' - - foo ={ || a + ( bar:=EVAL( {|| b} ) ) } - -RETURN - - -Evaluacin de un codeblock -========================== -Los parmetros pasados a un codeblock son puestos en la pila de -evaluacin antes de la evaluacin del codeblock. Ellos son accedidos -exactamente igual que cualquier parmetro de funcin. Cuando un -parmetro de codeblock es referenciado, entonces su posicin en -la pila de evaluacin es usada. -Cuando una variable local de un procedimiento es referenciada -entonces el ndice dentro de la tabla de posiciones de variables -locales (copiada de la cabecera) es usada. El valor negativo es -usado como un ndice para distinguirlo de la referencia a un -parmetro del codeblock. - - -Incompatibilidad con Clipper -============================ - -1) Variables locales aisladas pasadas por referencia - ------------------------------------------------- -Hay una pequea diferencia entre el manejo de las variables pasadas -por referencia en un codeblock. -El siguiente cdigo lo explica (gracias a David G. Holm) - -Function Main() -Local nTest -Local bBlock1 := MakeBlock() -Local bBlock2 := {|| DoThing( @nTest ), qout("From Main: ", nTest ) } - - eval( bBlock1 ) - eval( bBlock2 ) - -Return( NIL ) - -Function MakeBlock() -Local nTest -Return( {|| DoThing( @nTest ), qout("From MakeBlock: ", nTest ) } ) - - -Function DoThing( n ) - n := 42 -Return( NIL ) - - - En Clipper esto produce: -Desde MakeBlock = NIL -Desde Main = 42 - -En Harbour esta produce: (esta es la salida correcta, en mi opinin ) -Desde MakeBlock = 42 -Desde Main = 42 - - -2) Alcance de variables sin declarar - --------------------------------- -Considere el siguiente cdigo: - -PROCEDURE MAIN() -LOCAL cb - cb :=Detach() - ? EVAL( cb, 10 ) - -RETURN - -FUNCTION Detach() -LOCAL b:={|x| x+a} -LOCAL a:=0 -RETURN b - -En Clipper la variable 'a' en un codeblock tiene alcance *local* , -sin embargo en Harbour la variable 'a' tiene un alcance *privado*. -Como resultado de ello, en Clipper este cdigo imprimir 10 y en -Harbour este producir "error de argumento" en la operacin '+'. -Esto ser cierto cuando la variable 'a' sea declarada como PRIVATE. - -PROCEDURE MAIN() -LOCAL cb -PRIVATE a - cb := Detach() - ? EVAL( cb, 10 ) -RETURN - -El cdigo de arriba tambin produce 10 en Clipper (an si es -compilado con el switch -a -v). - - - - - - diff --git a/harbour/examples/hbdoc/examples/es/codestyl.txt b/harbour/examples/hbdoc/examples/es/codestyl.txt deleted file mode 100644 index 92701b4d3a..0000000000 --- a/harbour/examples/hbdoc/examples/es/codestyl.txt +++ /dev/null @@ -1,225 +0,0 @@ -/* - * $Id$ - */ - -/* Note los siguientes comentarios que podemos usar en cualquier lugar - - NOTE: Notas - TODO: Algo que debera ser agregado aqu - TOFIX: Algo que necesita ser corregido - OBSOLETE: Algo que podra ser removido de aqu - QUESTION: Yo tuve algunas dudas en este punto pero Yo podra no tener - una respuesta. - OPT: Algo es comentado para mejorar la performance - - como un ejemplo: */ - - -Estndar de Codificacin de Harbour -=================================== -(basado mayormente en los estndares de codificacin de PHP) - - -Implementacin de Cdigo ------------------------- - -[0] Documente su cdigo en los archivos fuentes y en los archivos de texto - que van a constituir el manual. [tm] - -[1] Funciones que reciben punteros a recursos no deberan liberar a stos. - por ejemplo, la funcin int mail( char *to, char *from) NO debera - liberar la memoria a la que apuntan los punteros "to" y "from". - Excepciones: - - - Las funciones diseadas para liberar aquel recurso. - por ejemplo, hb_xfree() - - - La funcin que recibe un argumento booleano, que controla cuando la - funcin puede liberar sus argumentos (si es cierto - la funcin - debe liberar sus argumentos, si es falso - no debe hacerlo). - -[2] Funciones que estn estrechamente ligadas integradas con otras - funciones dentro del mismo mdulo, y confan en ese comportamiento - poco trivial entre una y otra, deberan ser documentadas como tal y - declaradas 'static'. Ellas deberan ser evitadas de ser posible. - -[3] Use definciones y macros cuando sea posible, as estas constantes - tienen nombres significativos y pueden ser fcilmente manipulados. - Use TRUE en lugar de 1 (en un contexto booleano) - Use FALSE en lugar de 0 (en un contexto booleano) - Use NULL en lugar de 0 (en un contexto de un puntero) - Siempre use el prefijo 'HB_' para definiciones de nuevos tipos - de datos y macros. - Use bin el prefijo 'PHB_' el sufijo '_PTR' para tipos de datos - que son punteros. - - por ejemplo: - HB_ITEM - PHB_ITEM - HB_ITEM_PTR - -[4] Cuando escriba funciones que traten con cadenas, asegrese de recordar - que Harbour mantiene la propiedad del tamao de cada cadena, y que - esta no debera ser calculada con strlen(). Escriba sus funciones de - forma tal que estas tomen ventaja de la propiedad tamao longitud, - tanto por eficiencia, como para que sean seguras en el tratamiento - de cadenas binarias. - Funciones que cambien cadenas y obtengan sus nuevas longitudes mientras - hacen esto, deberan devolver esa nueva longitud, as no tienen que - recalcularlas con strlen(). - -[5] NUNCA USE strncat(). Si Ud. est absolutamente seguro de lo que est - haciendo, chequee este documento de nuevo, y recin entonces considere - usarlo, y an as trate de evitarlo. - -[6] Use assert(). No solamente buenos assert encuentran errores, sino - que tambin ayuda con la legibilidad del cdigo fuente. - - No use assert para el manejo de errores. Use assert solamente para - la condicin que debe ser siempre cierta. - - No use asignaciones en condiciones assert. Si Ud. asigna dentro - de una condicin assert, Ud. se arriesga a un evasivo error que - podra ser muy difcil de encontrar en una contruccion de depuracin - debido al efecto lateral de la asignacin. - Llamadas a funciones en condiciones assert tambin pueden causar - este problema, si ellos modifican uno de sus argumentos variables - globales. - -[7] Cuando desee inactivar cdigo comentndolo, utilice una sentencia #if - y NO utilice #if 0 solamente. En su lugar use "_0" - Por ejemplo #if FOO_0, donde FOO es su nombre de usuario del CVS. - Esto permite un seguimiento ms fcil del por qu el cdigo fu anulado - al ser comentado, especialmente en libreras empaquetadas. - -[8] Use hb_xgrab()/hb_xalloc(), hb_xfree(), hb_xrealloc(), hb_xsize() - para manejar la asignacin de memoria. Estas funciones implementan - un mecanismo interno "safety-net" que asegura la des-asignacin de - cualquier memoria no liberada al final de la aplicacin. - Ellas proveen tambin valiosa informacin sobre asignacin y - desbordamiento, mientras se ejecutan en modo depuracin (debug mode). - - -Convencin para los Nombres ---------------------------- - -[1] Los nombres de funciones para nivel-de-usuario definidas en el cdigo - fuente en C deberan ser encerradas dentro de la macro HB_FUNC(). - Ellas deberan estar en maysculas. - El nombre debera ser prefijado con HB_' si esta funcin es una extensin - al conjunto de funciones definidas en Clipper. - Las abreviaturas en el nombre no deberan ser usadas cuando ellas - disminuyan la legibilidad el significado de la funcin. - -[2] Los nombres de variables deben ser significativos. Los nombres de - variables de una letra deben ser evitados, excepto para lugares donde - la variable no tiene un real significado tiene un significado trivial - (por ej. for (i=0; i<100; i++) ...). - -[3] Los nombres de variables deberan usar la as llamada notacin Hngara. - Use letras en minsculas y no use el guin inferior '_' (underscore) - para separar entre palabras. - - Bien: - pMemoryPtr - - Mal: - p_memory_ptr - -[4] Variables estticas deben ser prefijadas con 's_' - -[5] Variables Globales (variables compartidas entre mdulos) deberan ser - prefijadas con 'hb_' por ej. hb_vm_bDebug, hb_gc_pStart - - -Sintaxis e Indentacin ----------------------- - -[1] Nunca use comentarios estilo C++ (por ej. // comentario). - Siempre use comentarios estilo C en su lugar. - Harbour est escrito en C, y el propsito es compilarlo bajo cualquier - compilador ANSI-C compatible. Aunque piense que muchos compiladores - aceptan comentarios estilo C++ el cdigo C, Ud. tiene que asegurarse - que su cdigo pueda compilarse en otros compiladores tambin. - -[2] No use el estilo K&R (Kerningham y Ritchie). por supuesto nosotros no - podemos y no queremos forzar a nadie a usar un estilo que el/ella no - use, pero al final, cuando su cdigo vaya dentro de la parte principal - de Harbour de uno de sus mdulos estndares, por favor no use el - estilo K&R. Esto se aplica a todo, comenzando con los estilos de - indentacin y comentarios hasta la sintaxis de la declaracin de la - funcin. - - Vea tambin - http://www.tuxedo.org/~esr/jargon/html/entry/indent-style.html - -[3] Sea generoso con los espacios en blanco y las llaves. - Siempre es preferible: - - if( cualquier_cosa ) - { - bar; - } - - a esto: - - if(cualquier_cosa)bar; - - y a esto: - - if( cualquier_cosa ) - bar; - - Mantenga una lnea vaca entre la seccin de declaracin de variables y - las sentencias de un block, as como tambin entre grupos de sentencias - de un block. - -[4] Cuando indente, use tres espacios (NO use tabs). Es importante mantener - consistencia en la indentacin as las definiciones, comentarios y - estructuras de control permanecen correctamente alineados. - - -Documentacin -------------- - -[1] Siempre que le sea posible documente Ud. mismo las funciones que - desarrolle. - Generalmente es difcil entender el cdigo escrito por otra persona, - ms an cuando involucra algoritmos fuera de lo cmun, atributos - y variables del sistema datos que el documentador no dispone. - Esto es particularmente evidente en funciones de bajo nivel. - -[2] Transcurrido un cierto tiempo, se dificulta la tarea de Documentacin - debido a que es necesario leer y releer el cdigo varias veces (aunque - la tarea la haga el propio desarrollador). Esto es evidente cuando no - se utilizan variables con un nombre adecuado para la tarea que realizan - (slo se utilizan letras). - Por eso se pide encarecidamente que NO se dejen funciones - procedimientos sin documentar. - -[3] Si la funcin procedimiento que se est tratando de documentar, hace - a su vez llamados a funciones no documentadas del sistema y el - desarrollador original no est disponible, podra ser muy difcil tal - vez imposible de documentar. - -[4] Rastrear cuales funciones estn documentadas y cuales no y si estn - total parcialmente documentadas es un malgasto de recursos adicional - en tiempo y en gente. - -[5] Si Ud. es el desarrollador de la funcin, No se preocupe por la - narrativa. Es ms importante saber qu hace la funcin qu argumentos - recibe, para qu sirven y especialmente qu dato/s se devuelven. - -[6] Si Ud. es el desarrollador de la funcin, y utiliza variables - funciones no documentadas del sistema, por favor expliquelas tanto como - sea posible. - Si utiliza algn algoritmo raro, explique brevemente qu hace y como - funciona. - -[7] Las aclaraciones explicaciones que ponga en el cuerpo de la funcin - encirrelas entre el par /* */ por favor no utilice la doble barra // - para comentarios porque disminuye su portabilidad. - -[8] Recuerde... el proceso de documentacin consume mucho tiempo, usualmente - lleva ms tiempo escribir la documentacin de una funcin que la funcin - propiamente dicha. - - diff --git a/harbour/examples/hbdoc/examples/es/command.txt b/harbour/examples/hbdoc/examples/es/command.txt deleted file mode 100644 index 090db29794..0000000000 --- a/harbour/examples/hbdoc/examples/es/command.txt +++ /dev/null @@ -1,765 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2000 Alejandro de Grate - * Documentacin en Espaol de los comandos OOP - * - * Copyright 2000 Brian Hays - * Documentacin en Ingls de los comandos OOP - * - * Vea COPYING por los trminos de la licencia. - * - */ - - -/* $DOC$ - * $COMMANDNAME$ - * CLASS - * $CATEGORY$ - * Comando OOP - * $ONELINER$ - * Define una Clase para la Programacion Orientada a Objetos (OOP). - * $SYNTAX$ - * CLASS [ ] - * $ARGUMENTS$ - * Nombre de la clase a definir. Por tradicin, las - * clases en Harbour comienzan con "T" (algo comn en el - * mundo OOP) para evitar colisiones con clases creadas - * por el usuario. - * La clase padre para usar la herencia. - * $DESCRIPTION$ - * CLASS crea una clase desde la cual se pueden crear objetos. - * Cada clase es definida en un archivo.prg separado para este propsito - * No se puede crear ms de una clase en un archivo.prg - * Despus del mandato CLASS comienza la definicin, luego los elementos - * DATA (tambien conocidos como variables de instancia) y luego - * los METHODS de la clase (el equivalente a las funciones en la - * Programacion tradicional) - * - * Las Clases pueden heredar desde una clase sola , pero la - * cadena de herencia puede extenderse a muchos niveles - * - * Un program usa una clase llamando al Constructor de la clase, el - * mtodo New() para crear el objeto. Ese objeto es usualmente asignado - * a una variable, la cual es usada para acceder a los elementos DATA - * y a los mtodos - * $EXAMPLES$ - * - * CLASS TBColumn - * - * DATA Block // Codeblock para recuperar datos para la Columna - * DATA Cargo // Variable definida por el usuario - * DATA ColorBlock // Codeblock que determina el color de los items - * DATA ColSep // Caracter separador de la Columna - * DATA DefColor // Array de ndices numricos a la tabla de color - * DATA Footing // Pie de Columna - * DATA FootSep // Caracter separador del Pie - * DATA Heading // Encabezado de la Columna - * DATA HeadSep // Caracter separador de la cabecera - * DATA Width // Ancho de la Columna - * DATA ColPos // Posicin temporaria de la columna en pantalla - * - * METHOD New() // Constructor - * - * ENDCLASS - * - * $STATUS$ - * R - * $COMPLIANCE$ - * CLASS es una extensin de Harbour. - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * HBClass(),Programacion Orientada a Objeto,DATA,METHOD - * $END$ - */ - -/* $DOC$ - * $COMMANDNAME$ - * DATA - * $CATEGORY$ - * Comando OOP - * $ONELINER$ - * Define una variable de instance DATA, para los objetos de la clase - * $SYNTAX$ - * DATA [,] [ AS ] [ INIT ] - * $ARGUMENTS$ - * Nombre de DATA - * - * Especificacin Opcional del tipo de datos, de uno de - * los siguientes (especificacin en ingls): - * Character, Numeric, Date, Logical, Codeblock, Nil - * - * Valor opcional inicial cuando se crea un nuevo objeto - * $DESCRIPTION$ - * Los elementos DATA tambien pueden ser pensados como "propiedades" - * "atributos" de un objeto. ellos pueden ser de cualquier tipo - * incluyendo bloques de codigo. - * Una vez que el objeto ha sido creado, los elementos DATA son refe- - * renciados con dos puntos (:) como en MyObject:Heading := "Nombre". - * Usualmente una clase tambin define mtodos para manipular los DATA. - * - * Se puede usar la clausula "AS " para reforzar que DATA es - * perteneciente a un cierto tipo. De otra manera este tomar el tipo - * de cualquier valor que le sea asignado. - * - * Use la clausula "INIT " para inicializar ese DATA a - * siempre que un nuevo objeto es creado. - * $EXAMPLES$ - * - * CLASS TBColumn - * - * DATA Block // Codeblock para recuperar datos para la Columna - * DATA Cargo // Variable definida por el usuario - * DATA ColorBlock // Codeblock que determina el color de los items - * DATA ColSep // Caracter separador de la Columna - * DATA DefColor // Array de ndices numricos a la tabla de color - * DATA Footing // Pie de Columna - * DATA FootSep // Caracter separador del Pie - * DATA Heading // Encabezado de la Columna - * DATA HeadSep // Caracter separador de la cabecera - * DATA Width // Ancho de la Columna - * DATA ColPos // Posicin temporaria de la columna en pantalla - * - * METHOD New() // Constructor - * - * ENDCLASS - * - * $STATUS$ - * R - * $COMPLIANCE$ - * DATA es una extensin de Harbour. - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * Programacion Orientada a Objeto,CLASS,METHOD,CLASSDATA - * $END$ - */ - -/* $DOC$ - * $COMMANDNAME$ - * CLASSDATA - * $CATEGORY$ - * Comando OOP - * $ONELINER$ - * Define una variable CLASSDATA para una clase (NO para un Objeto !) - * $SYNTAX$ - * CLASSDATA [,] [ AS ] [ INIT ] - * $ARGUMENTS$ - * Nombre de DATA - * - * Especificacin opcional del tipo de datos de uno de - * los siguientes (Original en ingls): - * Character, Numeric, Date, Logical, Codeblock, Nil - * - * Valor opcional inicial cuando se inicia el programa - * $DESCRIPTION$ - * Las variables CLASSDATA pueden se pensadas como "propiedades" de un - * clase entera. Cada CLASSDATA existe slo una vez, no importa cuntos - * objetos sean creados. Un uso comun es para un contador que es - * incrementado siempre que un objeto es creado y decrementado cuando - * alguno es destruido, as se puede monitorear el nmero de objetos - * en existencia para esta clase. - * - * Se puede usar la clausula "AS " para reforzar que CLASSDATA es - * perteneciente a un cierto tipo. De otra manera este tomar el tipo - * de cualquier valor que le sea asignado. - * Use la clausula "INIT " para inicializar ese DATA a - * siempre que un nuevo objeto es creado. - * $EXAMPLES$ - * - * CLASS TWindow - * DATA hWnd, nOldProc - * CLASSDATA lRegistered AS LOGICAL - * ENDCLASS - * - * $STATUS$ - * R - * $COMPLIANCE$ - * CLASSDATA es una extensin de Harbour. - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * Programacion Orientada a Objeto,CLASS,METHOD,DATA - * $END$ - */ - -/* $DOC$ - * $COMMANDNAME$ - * METHOD - * $CATEGORY$ - * Comando OOP - * $ONELINER$ - * Declara un METHOD para una clase en la cabecera de la clase - * $SYNTAX$ - * METHOD ( []) [ CONSTRUCTOR ] - * METHOD ( []) INLINE - * METHOD ( []) BLOCK - * METHOD ( []) EXTERN ([]) - * METHOD ( []) SETGET - * METHOD ( []) VIRTUAL - * METHOD ( [] ) OPERATOR - * METHOD ( []) CLASS - * $ARGUMENTS$ - * Nombre del mtodo a definir - * - * Lista opcional de parametros - * $DESCRIPTION$ - * Los Mtodos son "funciones de clase" y hacen el trabajo de la clase. - * Todos los mtodos pueden ser definidos en la cabecera entre los - * comandos CLASS y ENDCLASS. Si el cuerpo de un mtodo no esta - * totalmente definido aqui, el cuerpo completo es escrito debajo del - * comando ENDCLASS usando esta sintaxis: - * - * METHOD ( [] ) CLASS - * - * Los Mtodos pueden referenciar al objeto actual usando la palabra - * clave "Self:" su versin ms corta "::" - * - * CLAUSULAS: - * - * CONSTRUCTOR Define un mtodo especial de la clase: el mtodo - * Constructor, usado para crear objetos. Este es - * usualmente el mtodo New(). - * Los constructores siempre retornan el objeto New(). - * - * INLINE Rpido y fcil de codificar, INLINE le permite definir - * el cdigo para el mtodo inmediatamente despus de la - * definicin de la clase. Cualquier mtodo no declarado - * INLINE BLOCK debe ser completamente definido despus - * del comando ENDCLASS. - * El siguiente a INLINE recibe un parametro - * de Self. Si se necesita recibir ms parmetros, use - * la clusula BLOCK en su lugar. - * - * BLOCK Use esta clusula cuando desee declarar rpidos mtodos - * 'inline' que necesiten parmetros. El primer parmetro - * a debe ser Self, como en: - * - * METHOD BLOCK {|Self,,,...,|...} - * - * EXTERN Si una funcin externa hace lo que el mtodo necesita, - * use esta clusula para hacer una llamada optimizada a - * esa funcin directamente. - * - * SETGET Para datos calculados. El nombre del mtodo puede ser - * manipulado como un elemento de DATA para establecer - * (Set) u obtener (Get) un valor. - * - * VIRTUAL Mtodos que no hacen nada. Utiles para Clases de Base - * donde la Clase hija definir el comportamiento del - * mtodo, cuando Ud. esta creando y probando una Clase. - * - * OPERATOR Operador de Sobrecarga para las Clases. - * Vea el ejemplo ../Tests/TestOp.prg para detalles - * - * CLASS - * Use esta sintaxis solamente para definir un mtodo - * completo despus del comando ENDCLASS. - * $EXAMPLES$ - * - * CLASS TWindow - * DATA hWnd, nOldProc - * METHOD New( ) CONSTRUCTOR - * METHOD Capture() INLINE SetCapture( ::hWnd ) - * METHOD End() BLOCK { | Self, lEnd | If( lEnd := ::lValid(),; - * ::PostMsg( WM_CLOSE ),), lEnd } - * METHOD EraseBkGnd( hDC ) - * METHOD cTitle( cNewTitle ) SETGET - * METHOD Close() VIRTUAL - * ENDCLASS - * - * METHOD New( ) CLASS TWindow - * local nVar, cStr - * ... ... - * ... ... - * RETURN Self - * - * $TESTS$ - * - * TestOp.prg - * - * $STATUS$ - * R - * $COMPLIANCE$ - * METHOD es una extensin de Harbour. - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * HBClass(),Programacion Orientada a Objeto,DATA,CLASS - * $END$ - */ - -/* $DOC$ - * $COMMANDNAME$ - * MESSAGE - * $CATEGORY$ - * Comando OOP - * $ONELINER$ - * Reenva la llamada de un mtodo a otro mtodo. - * $SYNTAX$ - * MESSAGE METHOD ( [] ) - * MESSAGE () METHOD ( [] ) - * $ARGUMENTS$ - * El nombre del pseudo-mtodo a definir. - * - * El mtodo a crear y llamar cuando - * es invocado. - * Lista de parmetros opcionales para el mtodo - * $DESCRIPTION$ - * El comando MESSAGE es una caracterstica rara vez usada, que permite - * re-enviar una llamada a un mtodo con un nombre diferente. Esto puede - * ser necesario si el nombre de un mtodo entra en conflicto con una - * funcin pblica que necesita ser llamada desde adentro de un mtodo - * de la Clase. - * - * Por ejemplo, se puede tener una funcin pblica llamda BeginPaint() - * que es usada para pintar las ventanas. Podra ser natural tambin - * tener un mtodo de la Clase Ventana, llamado :BeginPaint() que la - * aplicacin pueda llamar. - * Pero dentro del mtodo de la Clase uno podra no estar habilitado - * para llamar a la funcin pblica porque, los mtodos internos estn - * basados en funciones estticas (las que ocultan funciones pblicas - * con el mismo nombre) - * - * El comando MESSAGE permite crear el verdadero mtodo con un nombre - * diferente (::xBeginPaint()) y an permitir la sintaxis ::BeginPaint() - * para llamar a ::xBeginPaint(). Este entonces es libre de llamar a - * la funcin publica BeginPaint(). - * $EXAMPLES$ - * - * CLASS TWindow - * DATA hWnd, nOldProc - * METHOD New( ) CONSTRUCTOR - * MESSAGE BeginPaint METHOD xBeginPaint() - * ENDCLASS - * - * $STATUS$ - * R - * $COMPLIANCE$ - * MESSAGE es una extensin de Harbour. - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * METHOD,DATA,CLASS,Programacion Orientada a Objeto - * $END$ - */ - -/* $DOC$ - * $COMMANDNAME$ - * ERROR HANDLER - * $CATEGORY$ - * Comando OOP - * $ONELINER$ - * Designa un mtodo como manejador de error para la Clase. - * $SYNTAX$ - * ERROR HANDLER ( [] ) - * $ARGUMENTS$ - * Nombre del mtodo a definir - * - * Lista de parametros opcionales - * $DESCRIPTION$ - * ERROR HANDLER nombra al mtodo que deberia manejar los errores para - * la Clase que esta siendo definida. - * $EXAMPLES$ - * - * CLASS TWindow - * ERROR HANDLER MyErrHandler() - * ENDCLASS - * - * $STATUS$ - * R - * $COMPLIANCE$ - * ERROR HANDLER es una extensin de Harbour. - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * Programacion Orientada a Objeto,ON ERROR,CLASS,METHOD,DATA - * $END$ - */ - -/* $DOC$ - * $COMMANDNAME$ - * ON ERROR - * $CATEGORY$ - * Comando OOP - * $ONELINER$ - * Designa un mtodo como manejador de error para la Clase. - * $SYNTAX$ - * ON ERROR ( [] ) - * $ARGUMENTS$ - * Nombre del mtodo a definir - * - * Lista de parametros opcionales - * $DESCRIPTION$ - * ON ERROR es un sinnimo para ERROR HANDLER. - * Este nombra al mtodo que debera manejar los errores para la - * Clase que esta siendo definida. - * $EXAMPLES$ - * - * CLASS TWindow - * ON ERROR MyErrHandler() - * ENDCLASS - * - * $STATUS$ - * R - * $COMPLIANCE$ - * ON ERROR es una extensin de Harbour. - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * Programacion Orientada a Objeto,ERROR HANDLER,CLASS,METHOD,DATA - * $END$ - */ - -/* $DOC$ - * $COMMANDNAME$ - * ENDCLASS - * $CATEGORY$ - * Comando OOP - * $ONELINER$ - * Termina la declaracin de una Clase. - * $SYNTAX$ - * ENDCLASS - * $DESCRIPTION$ - * ENDCLASS marca el fin de la declaracin de una Clase. - * Este es usualmente seguido por el mtodo de la Clase que no es - * INLINE. - * $EXAMPLES$ - * - * CLASS TWindow - * DATA hWnd, nOldProc - * ENDCLASS - * - * $STATUS$ - * R - * $COMPLIANCE$ - * ON ERROR es una extensin de Harbour. - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * Programacion Orientada a Objeto,CLASS,METHOD,DATA - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * Programacion Orientada a Objeto - * $CATEGORY$ - * Documento - * $ONELINER$ - * Programacion Orientada a Objeto - * $DESCRIPTION$ - * Programacin Orientada a Objeto (OOP) - * - * INTRODUCCION - * - * Esta es una breve introducin al mundo OOP, no pretende ser ms que - * un ayuda memoria de algunos puntos. - * El Objetivo de la OOP de Harbour es alcanzar la mxima compatibilidad - * posible con otros programas que provean de funcionalidad OOP a - * Clipper donde este no la tenia. - * Algunos de ellos son Class(y), FiveWin Objects, TopClass y Visual - * Object. - * - * - * OBJETOS - * - * Tradicionalmente la implementacin de objetos, ha sido basado en - * lo que se conoce como "estructuras", un tipo de datos habitual en - * lenguaje "C" (struct) y (record) en Pascal y Delphi. - * Tanto en Clipper como en Harbour los objetos se implementan sobre - * arrays. - * Un objeto puede contener a la vez variables y funciones. - * Mientras ese objeto-array se conserve se puede pasar como parmetro - * modificarlo, ejecutar las funciones contenidas en l, etc. - * Uno vive rodeado de objetos. Podemos considerar Arbol como una clase - * particular de objeto. Entonces podremos tener Pino, Roble, Acacia - * todos ellos son instancias de Arbol. En otras palabras ellos son - * objetos de la clase Arbol. - * - * - * CLASE - * - * Es un trmino que describe una especificacin para un conjunto de - * objetos con propiedades comunes. - * Desde el punto de vista de la programacin Ud. define que debe - * tener una clase para que le sea til a Ud., qu atributos satisfacen - * sus necesidades. - * Esto es llamado Abstraccin de datos en la jerga de OOP, - * Programacion Orientada a Objetos porque Ud. solamente abstrae los - * atributos que Ud. desea usar, de un montn de posibilidades para un - * objeto modelo. - * - * - * INSTANCIA - * - * Una instancia de una clase es un trmino tcnico para un objeto de - * esa clase. - * - * - * CLASES DE OBJETOS - * - * Una definicion de una clase lista todos los parametros que se - * necesitan para definir un objeto de esa clase en particular. - * La cantidad de datos necesarios para definir una clase depende - * de que es lo que Ud. vaya a hacer con ese objeto, pero siempre - * habr un mnimo que impida que una clase sea ambigua incompleta. - * - * La clase Arbol por ejemplo podra contener dos parametros en la - * definicin. El nombre del Arbol como cadena de caracteres, Si es - * perenne (si conserva las hojas en invierno) como una variable logica - * Los parametros que definen un objeto son denominados variables - * de instancia atributos de una clase. - * Las variables de instancia pueden ser tipos basicos de datos como - * CHARACTER, NUMERIC LOGIC, aunque tambien puede ser otros objetos - * como la Hoja y definida esta como de la Clase Hoja. - * - * - * OPERANDO CON OBJETOS - * - * Una de las limitaciones basicas sobre que puede hacer con los - * objetos dependen del tipo de datos sobre los cuales estan basados - * as por ejmplo Ud. no puede hacer operaciones matematicas con el - * atributo de la clase Arbol, pero s puede compararlo con - * otro, etc. - * Las unicas operaciones que se pueden hacer sobre una instancia de una - * clase particular son aquellas definidas dentro de la clase. - * Por lo tanto, la utilidad y flexibilidad de una clase depende de - * cuanto esfuerzo e ingenio haya puesto al establecer su definicin. - * Estas operaciones se llaman METODOS en la jerga OOP que no son - * ni ms ni menos que nuestros conocidos procedimientos y funciones. - * - * - * ENCAPSULAMIENTO - * - * Se refiere al hecho de ocultar items de datos y metodos dentro de - * una clase al declararlos como Private en la definicin de la - * clase. Esto protege las partes internas de la clase de ser cambiadas - * usadas incorrectamente. - * Esta habilidad de ocultar la Implementacin de la clase - * permitiendo un acceso limitado a los miembros de una clase, le da la - * posibilidad de cambiar las partes internas de esa clase cuando sea - * necesario. Mientras las caracteristicas de los metodos que pueden ser - * llamados desde afuera permanezcan sin cambios, la codificacin - * interna puede ser cambiada como se desee. - * - * - * HERENCIA - * - * Muchos de los objetos que se definen en una clase pueden ser - * subdivididos en conjuntos ms especializados que tambin pueden ser - * representados por clases. - * En nuestro ejemplo de la clase Arbol, Conifera podra ser una - * subclase de la clase Arbol, esta podra tener todas las variables de - * instancia y mtodos de la clase Arbol, ms algunas variables de - * instancia adicionales y metodos que la definan como Conifera. - * Podemos referirnos a la clase conifera como una Subclase de - * la clase Arbol y a la clase Arbol como una Superclase - * Clase Padre de la clase Conifera. - * - * - * POLIMORFISMO - * - * Es la habilidad de asumir diferentes formas contornos. - * Practicamente significa la habilidad de una nica variable de llamar - * a diferentes mtodos, dependiendo de lo que contiene la variable. - * El polimorfismo involucra dos cosas: - * 1) Usar una variable de un tipo especifico, gralmente una variable - * de una clase base, para almacenar objetos de alguna de las clases - * derivadas. - * 2) El uso automatico del objeto almacenado en la variable de la clase - * base para seleccionar un mtodo de entre todos los mtodos de las - * clases derivadas. - * El tipo del objeto almacenado no es conocido hasta que el - * programa se ejecuta, por tanto la eleccin de cual mtodo de clase - * a ejecutar es hecha dinamicamente. - * - * - * ATRIBUTOS - * - * Los atributos de un objeto, a menudo son llamados Miembros de - * Clase y se declaran utilizando la palabra clave DATA. - * Por ejemplo: - * DATA cFile INIT "*.txt" - * En Harbour se utiliza la clausula INIT para inicializar las variables - * - * - * CONSTRUCTOR - * - * Declarar una variable para soportar un objeto no crea al objeto en - * s mismo, la variable solo mantiene una referencia al objeto. - * para crear un objeto se debe usar la palabra clave New. - * Este es seguido por una lista de argumentos opcionales entre - * parentesis y luego por el objeto de la clase a la que pertenecen. - * - * Un constructor es la funcin que crea al objeto e inicializa las - * variables. Como las funciones en el lenguaje OOP se llaman - * mtodos el constuctor siempre se declara como METHOD New(..) - * - * METHOD New( cFile ) CLASS TNortonGuide - * - * IF VALTYPE( cFile ) <> NIL .AND. VALTYPE( cFile ) == "C" - * Self:cFile := LOWER( cFile ) - * Self:nHandle := FCREATE( Self:cFile ) - * ENDIF - * - * RETURN Self - * - * Cuando se crea un objeto, el objeto contendr todas las variables que - * fueron incluidas en la definicin de la clase. Sin embargo no todas - * las variables son iguales. Hay dos tipos: - * Un tipo de variable de clase que es asociada con cada objeto - * univocamente, cada instancia de la clase tendr su propia copia de - * estas variables con su propio valor asignado. Estas diferencian un - * objeto de otro, dndole a un objeto su individualidad por ello se - * llaman Variables de Instancia. - * - * El otro tipo de variable de clase es asociada con la clase y es - * compartida con todos los objetos de la clase. Hay solo una copia - * de este tipo de variables, no importa cuantos objetos sean creados. - * Este ltimo tipo se llama Variables de Clase, ellas existen - * an si ningn objeto de esta clase ha sido creado. Ellas pertenecen - * a la clase, pero son incluidas como parte de cada objeto de la clase. - * Si el valor de una variable de clase es cambiado, el nuevo valor est - * disponible en todos los objetos de la clase. - * Una variable de clase debe ser definida usando la palabra clave - * CLASSDATA (es equivalente a STATIC en el mundo OOP) precediendo a su - * nombre. - * - * Al igual que con las variables existen dos tipos de Mtodos: - * Metodos de Clase Ud. puede ejecutar Metodos de Clase, an - * si ningn objeto de esta clase ha sido creado. Al igual que con las - * variables de clase son precedidos del identificador STATIC en la - * mayoria de los lenguajes OOP. - * - * Mientras que los Metodos de Instancia solamente pueden ser - * ejecutados en relacin a un objeto particular, as que si no existe - * el objeto, NO hay mtodo de instancia a ser ejecutado. - * - * Debe tenerse en cuenta que no se puede hacer referencia a ninguna - * variable de instancia dentro de una clase dentro un mtodo Static - * Estto se debe a que su mtodo Static puede ser ejecutado cuando - * todava ningn objeto de la clase a sido creado y por lo tanto NO - * existen variables de instancia. - * - * - * SELF - * - * Habitualmente los mtodos de una clase, devuelven una referencia al - * objeto sobre el cual actan y esa referencia se denomina - * - * - * DEFINIENDO UNA CLASE - * - * Una clase se define con la palabra clave CLASS seguida de un nombre - * que identifica a la clase. Para indicar que termina una clase se - * utiliza la palabra clave ENDCLASS - * Por tradicin, las clases en Harbour comienzan con la letra "T" - * (algo comn en el mundo OOP) para evitar colisiones con clases - * creadas por el usuario. - * - * la por ej. - * METHOD ( [] ) CLASS - * - * Los Mtodos pueden referenciar al objeto actual usando la palabra - * clave "Self:" su versin ms corta "::" - * Vea METHOD para una explicacin de las distintas variantes. - * - * - * VIDA DE UN OBJETO - * - * La vida de un objeto esta determinada por la variable que hace - * referencia a l. Si distintas variables hacen referencia a un - * mismo objeto, el objeto sobrevive mientras todava haya una variable - * que haga referencia a ese objeto. - * Si creamos un objeto - * oNgi := TNortonGuide():new( "Myfile" ) - * y luego hacemos - * oNgi := NIL - * la variable oNgi no apunta ms al objeto, se pierde la referencia y - * si asumimos que no hay ninguna otra variable referenciandolo entonces - * el objeto TNortonGuide al cual ella apunta queda disponible para el - * el recolector de memoria. - * Pero el objeto no desaparece instantneamente, sino que pasa algn - * tiempo hasta que el objeto se vuelve inaccesible para su programa - * (cuando el subsistema de memoria dispone de tiempo de procesamiento), - * se ocupa de l. - * - * - * SOBRECARGA - * Vea testop.prg por un ejemplo - * - * - * CLONANDO OBJETOS - * Algunos lenguajes OOP proveen una mtodo preconstruido para duplicar - * objetos. - * - * Comentario Final - * - * Los programas Orientados a Objetos son escritos usando objetos los - * cuales modelan el problema que esta siendo resuelto. - * Debido a que un objeto incluye los mtodos con los cuales puede - * operar, as como los datos que lo definen, este tipo de programacin - * es menos propensa a errores (segn los especialistas) y debera ser - * ms robusta que la forma de programacin procedural. - * - * Estas caractersticas son las que han facilitado la proliferacin de - * lenguajes como Java y Python. Pero una de las desventajas ms notables - * es la dificultad muchas veces para intercambiar la informacin - * almacenada en esos objetos con otros programas y la conservacin de - * esos objetos en un medio magnetico (Serializacin) en un - * formato compatible, algo que segn los expertos promete XML y que ya - * est disponible con Harbour. - * - * $EXAMPLES$ - * CLASS Circle - * - * CLASS TNortonGuide - * - * DATA cFile // Nombre archivo - * DATA nHandle // file handle - * METHOD New( cFile ) // constructor, funcion que crea archivo - * METHOD CLOSE() // funcion que cierra archivo - * METHOD WriteParBold( cPar ) - * METHOD WriteTitle( cTopic, cTitle ) - * - * ENDCLASS - * - * METHOD new( cFile ) CLASS TNortonGuide - * - * IF VALTYPE( cFile ) <> NIL .AND. VALTYPE( cFile ) == "C" - * Self:cFile := LOWER( cFile ) - * Self:nHandle := FCREATE( Self:cFile ) - * ENDIF - * - * RETURN Self - * - * - * $STATUS$ - * R - * $COMPLIANCE$ - * La sintaxis Orientada a Objetos en Harbour es compatible con - * CA-Cl*pper. - * Pero Clipper solamente permite la creacin de objetos a partir - * de unas pocas clases estandares, y NO le permite al programador - * crear nuevas clases. - * En Harbour, Ud. puede crear sus propias clases completamente con - * Mtodos, Variables de Instancia, Variables de Clase y Herencia. - * Aplicaciones enteras pueden ser designadas y codificadas en el - * estilo Orientado a Objetos. - * $PLATFORMS$ - * Todas - * $FILES$ - * $SEEALSO$ - * __objHasData(),CLASS,METHOD - * $END$ - */ - - - diff --git a/harbour/examples/hbdoc/examples/es/compiler.txt b/harbour/examples/hbdoc/examples/es/compiler.txt deleted file mode 100644 index 10a3791c06..0000000000 --- a/harbour/examples/hbdoc/examples/es/compiler.txt +++ /dev/null @@ -1,342 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2000 Alejandro de Grate - * Documentacin en Espaol de: Opciones del Compilador - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * Opciones Compilador - * $CATEGORY$ - * Documento - * $ONELINER$ - * Opciones del Compilador - * $DESCRIPTION$ - * - * Invocando al compilador Harbour: - * =============================== - * - * harbour [opciones] - * o - * harbour [opciones] - * o - * harbour [opciones] [opciones] - * - * - * Las opciones de la lnea de comandos debe ser separada, al menos por - * un espacio en blanco. - * Las opciones pueden comenzar con el carcter '/' '-', - * - * - * Opciones de la lnea de comandos de: - * ==================================== - * - * /a Declaracin Automtica de memvar - * ---------------- - * Esto causa que todas las variables declaradas por las sentencias - * PARAMETER, PRIVATE PUBLIC sean automticamente declaradas como - * variables MEMVAR. - * - * /b Informacin de depuracin (Bug) - * ---------------- - * El compilador genera toda la informacin requerida para - * depuracin - * - * /d[=] #define - * ---------------- - * - * /es[] Establece la Severidad de la salida (Exit Severity) - * ---------------- - * - * /es or /es0 - Todas las advertencias son ignoradas y el cdigo - * de salida retornado por el compilador (accedido por - * el comando de DOS ERRORLEVEL) es igual a cero si - * no hay errores en el archivo fuente compilado. - * /es1 - Cualquier advertencia genera un cdigo de salida - * distinto de cero, pero la salida es an creada. - * /es2 - Cualquier advertencia es tratada como error y - * ningn archivo de salida es creado. El cdigo de - * salida es establecido a un valor distinto de cero. - * - * /g Generacin del tipo de archivo de salida - * ---------------- - * - * /gc tipo de salida: fuente de lenguaje C (.c) (defecto) - * /gf tipo de salida: Windows/DOS OBJ32 (.obj) - * /gh tipo de salida: Objeto Portable de Harbour (.hrb) - * /gj tipo de salida: fuente de Java (.java) - * /gp tipo de salida: fuente de Pascal (.pas) - * /gr tipo de salida: recursos de Windows (.rc) - * - * /i Agrega la ruta de bsqueda de archivos #include - * ---------------- - * - * /l Suprime la informacin del nmero de Lnea - * ---------------- - * El compilador no genera el nmero de lnea del cdigo fuente - * en el archivo de salida. La funcin PROCLINE() retornar cero - * para los mdulos compilados usando esta opcin. - * - * /m Compilar el Mdulo actual solamente - * ---------------- - * - * /n Sin procedimiento de inicio implcito - * ---------------- - * El compilador no crea un procedimiento con el mismo nombre - * que el del archivo compilado. Esto significa que algunas - * declaraciones puestas antes de la primera sentencia de - * PROCEDURE FUNCTION tienen el alcance del archivo y pueden ser - * accedidas/usadas en todas las funciones/procedimientos definidos - * en el archivo fuente compilado. Todas las sentencias ejecutables - * puestas al principio del archivo y antes de la primera sentencia - * de PROCEDURE FUNCTION son ignoradas. - * - * /o Unidad de disco y/o ruta para el archivo de salida - * ---------------- - * - * /p Genera un archivo de salida Pre-procesada (.ppo) - * ---------------- - * El compilador solamente crea el archivo que contiene el - * resultado del archivo fuente pre-procesado. - * - * /q Quieto - * ---------------- - * El compilador no imprime ningn mensaje durante la compilacin - * (excepto la informacin del copyright). - * - * /q0 que permanezca realmente Quieto y no muestre ni - * siquiera la informacin del copyright. - * - * /r[] Solicita al linker Revisar por la ( - * ---------------- ninguna) - * Actualmente no soportado en Harbour. - * - * /s Solo chequeo de Sintaxis. - * ---------------- - * El compilador chequea la sintaxis solamente. Ningn archivo de - * salida es generado. - * - * /t Ruta para la creacin de un archivo Temporario - * ---------------- - * Actualmente no usado en harbour (El compilador de harbour no - * crea ningn archivo temporal) - * - * /u[] Usar la definicin de comando establecido en el - * ( ninguno) - * ---------------- - * An no soportado. - * - * /v Las Variables son asumidas como M-> - * ---------------- - * Todas las variables sin declarar unaliased son asumidas como - * variables MEMVAR (variables privadas pblicas). si este switch - * no es usado entones el alcance de estas variables es chequeado - * en tiempo de ejecucin. - * - * /w[] Establece el nmero de nivel de las advertencias - * ---------------- (Warnings) (0..4, por defecto es 1) - * - * /w0 - sin advertencias - * /w or /w1 - advertencias compatibles con Clipper - * /w2 - algunas advertencias tiles ausentes en Clipper - * /w3 - advertencias generadas para extensiones al lenguaje - * hechas en Harbour. Tambin habilita el chequeo de - * sintaxis fuertemente tipeada pero slo advierte - * contra los tipos declarados, o los tipos que pueden - * ser calculados en tiempo de compilacin. - * /w4 - habilita advertencias acerca de operaciones que son - * sospechosas, lo cual significa que si se mezclan - * tipos sin declarar tipos que no pueden ser - * calculados en tiempo de compilacin, junto con los - * tipos ya declarados, una advertencia ser generada. - * - * /x[] Establece el smbolo del prefijo agregado al nombre - * de funcin (para archivo.c solamente) - * ---------------- - * Establece el smbolo del prefijo agregado al nombre de funcin - * de inicio (en la salida de lenguaje C, actualmente). - * Esta funcin es generada automticamente para cada mdulo de PRG - * compilado. - * Este prefijo adicional puede ser usado para suprimir problemas - * con smbolos duplicados durante el enlazado de una aplicacin - * (linking) con alguna librera de terceros. - * - * /y Seguimiento de la actividad de Lex & Yacc - * ---------------- - * El compilador Harbour usa las utilidades FLEX y YACC para - * analizar el cdigo fuente y generar el archivo de salida - * requerido. - * Esta opcin sigue la actividad de esas utilidades. - * - * /z Suprime el cortocircuito lgico (.AND. y .OR.) - * ---------------- - * - * /10 restringe la longitud de smbolos a 10 caracteres. - * ---------------- - * Todos los nombres de variables y de funciones son truncados a - * un mximo de 10 caracteres. - * - * - * Compilacin en modo lote (batch). - * ================================ - * - * @ Compila la lista de mdulos en el - * ----------------- - * No soportado an. - * - * - * - * Conocidas incompatibilidades entre compiladores harbour y clipper - * ================================================================= - * - * NOTA: - * Si desea libreras de compilacin y ejecucin 100 % compatibles, - * entonces Ud. debe definir: HARBOUR_STRICT_CLIPPER_COMPATIBILITY. - * Esta opcin debe ser definida en el archvivo ../include/hbsetup.h - * (en efecto esta opcin es puesta en un comentario por defecto - Ud. - * necesita remover los caracteres /* */ solamente. Este cambio debe - * ser realizado antes de invocar la utilidad make. - * - * - * Manejo de variables sin declarar - * -------------------------------- - * Cuando un valor es asignado a una variable no declarada y la opcin - * -v de la lnea de comandos no es usada, entonces el compilador - * Clipper asume que la variable es una variable PRIVATE PUBLIC y - * genera un opcode POPM (pop memvar). - * - * Cuando el valor de una variable no declarada es accedido y la opcin - * -v de la lnea de comandos no es usada, el compilador Harbour genera - * un opcode PUSHV (push variable) para determinar el tipo de variable - * en tiempo de ejecucin - - * Si un campo con el nombre requerido existe en el area de trabajo - * actual, entonces este valor es usado. Si no existe el campo, entonces - * una variable PRIVATE PUBLIC es usada (si existe). - * - * El compilador Harbour genera un opcode para determinar el tipo de - * variable en tiempo de ejecucin (POPVARIABLE or PUSHVARIABLE) en - * ambos casos (asignacin y acceso). - * - * La diferencia puede ser chequeada por el siguiente cdigo: - * - * PROCEDURE MAIN() - * PRIVATE myname - * - * DBCREATE( "TEST", { { "MYNAME", "C", 10, 0} } ) - * USE test NEW - * SELECT test - * APPEND BLANK - * - * FIELD->myname := "FIELD" - * MEMVAR->myname := "MEMVAR" - * - * myname := myname + " assigned" - * - * // In Clipper: "FIELD", In Harbour: "FIELD assigned" - * ? FIELD->myname - * - * // In Clipper: "MEMVAR assigned", In Harbour: "MEMVAR" - * ? MEMVAR->myname - * - * USE - * - * RETURN - * - * - * - * Pasando por referencia una variable no declarada - * ------------------------------------------------- - * El compilador Harbour usa un opcode especial PUSHP para pasar una - * referencia a una variable no declarada ( el operador '@' ). El tipo - * de la variable pasada es chequeada en tiempo de ejecucin (field or - * memvar). Sin embargo las variables de campo no pueden ser pasadas - * por referencia. Esto significa que Clipper chequea slo la variable - * memvar y no mira por una de campo. - * Esta es la razn por la cual el compilador Harbour usa el opcode - * habitual PUSHMEMVARREF en estos casos. Ntese que el comportamiento - * en tiempo de ejecucin es el mismo en Clipper y en Harbour - slo - * los opcodes generados son diferentes. - * - * - * Manejo de mensajes a objetos - * ---------------------------- - * - * El seteo de HARBOUR_STRICT_CLIPPER_COMPATIBILITY determina - * la forma en que el envo encadenado de mensajes es manejado - * - * Por ejemplo, el siguiente cdigo: - * - * a:b( COUNT() ):c += 1 - * - * ser manejado como: - * - * a:b( COUNT() ):c := a:b( COUNT() ):c + 1 - * en modo de compatibilidad estricta y - * - * temp := a:b( COUNT() ), temp:c += 1 - * en modo no-estricto. - * - * En la prctica, Clipper llamar a la funcin COUNT() dos veces: - * La primera vez antes de la adicin y la segunda despus de la - * adicin. - * En Harbour, COUNT() ser llamada slo una vez, antes de la adicin. - * - * El mtodo Harbour (no-estricto) es: - * 1) Ms rpido - * 2) Garantiza que la misma variable de instancia del mismo - * objeto ser cambiada. - * - * (Ver tambin: ../source/compiler/expropt.c) - * - * - * Inicializacin de variables estticas - * ------------------------------------- - * - * Hay una diferencia en la inicializacin de las variables estticas - * que son inicializadas con un bloque de cdigo que refiere a una - * variable local. Por ejemplo: - * - * PROCEDURE TEST() - * - * LOCAL MyLocalVar - * STATIC MyStaticVar := {|| MyLocalVar } - * - * MyLocalVar :=0 - * ? EVAL( MyStaticVar ) - * - * RETURN - * - * El cdigo de arriba compila bien en Clipper, pero ste genera un - * error de ejecucin: - * Error/BASE 1132 Bound error: array access - * Called from (b)STATICS$(0) - * - * En Harbour este cdigo genera un error en tiempo de compilacin: - * Error E0009 Illegal variable (b) initializer: 'MyLocalVar' - * - * Ambos Clipper y Harbour estan manejando todas las variables locales - * usadas en una forma especial: ellas son separadas de la pila (stack) - * local de la funcin / procedimiento donde ellas son declaradas. - * Esto permite acceder a estas variables despues de la salida de una - * funcin / procedimiento. Sin embargo todas las variables estticas - * son inicializadas en un procedimiento separado ('STATICS$' en - * Clipper y '(_INITSTATICS)' en Harbour) antes del procedimiento - * principal y antes de todos los procedimientos INIT. Las variables - * locales no existen en la pila de evaluacin (eval stack) donde las - * variables estticas son inicializadas, as ellas no pueden ser - * separadas. - * - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/datetime.txt b/harbour/examples/hbdoc/examples/es/datetime.txt deleted file mode 100644 index eb1d153697..0000000000 --- a/harbour/examples/hbdoc/examples/es/datetime.txt +++ /dev/null @@ -1,564 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2000 Alejandro de Grate - * Documentacin en Espaol de: - * CDOW(),CMONTH(),DATE(),CTOD(),DAY(),DAYS(), DOW(),DTOS(), - * DTOC(),ELAPTIME(),MONTH(),SECONDS(),SECS(),TIME(),YEAR() - * - * Copyright 2000 Luiz Rafael Culik - * Documentation en Ingls de: - * CDOW(),CMONTH(),DATE(),CTOD(),DAY(),DAYS(), DOW(),DTOS(), - * DTOC(),ELAPTIME(),MONTH(),SECONDS(),SECS(),TIME(),YEAR() - * - * Vea COPYING por los trminos de la licencia. - * - */ - - -/* $DOC$ - * $FUNCNAME$ - * CDOW() - * $CATEGORY$ - * Fecha - * $ONELINER$ - * Convierte una fecha al Nombre del da de la semana - * $SYNTAX$ - * CDOW() --> cDia - * $ARGUMENTS$ - * Cualquier expresin de fecha. - * $RETURNS$ - * El da actual de la semana. - * $DESCRIPTION$ - * Esta funcin devuelve una cadena de caracteres con el da de la - * semana de una expresin de fecha pasada (DOW=day of week en - * ingls). Si una fecha NULL es pasada a la funcin, el valor de la - * funcin serun byte NULL. - * $EXAMPLES$ - * ? CDOW(DATE()) - * - * IF CDOW( DATE() + 10) == "SUNDAY" - * ? "Este es un da para el descanso." - * ENDIF - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es totalmente compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * DAY(),DOW(),DATE(),CMONTH() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * CMONTH() - * $CATEGORY$ - * Fecha - * $ONELINER$ - * Retorna una cadena de caracteres con el nombre del mes - * $SYNTAX$ - * CMONTH() --> cMes - * $ARGUMENTS$ - * Cualquier expresin de fecha. - * $RETURNS$ - * el nombre actual del mes - * $DESCRIPTION$ - * Esta funcin retorna el nombre del mes (Enero, Febrero, etc.) de una - * expresin de fecha pasada a ella. - * Si una fecha NULL es pasada a la funcin, el valor de la funcin ser - * un byte NULL. - * Nota: El valor devuelto depende del mdulo de lenguaje en uso. - * $EXAMPLES$ - * ? CMONTH( DATE()) // resultado: Noviembre - * - * IF CMONTH( DATE() + 35) =="Diciembre" - * ? "Ha hecho compras para las fiestas ?" - * ENDIF - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es totalmente compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * CDOW(),DATE(),MONTH(),YEAR(),DOW(),DTOC() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * DATE() - * $CATEGORY$ - * Fecha - * $ONELINER$ - * Retorna la fecha actual del sistema operativo - * $SYNTAX$ - * DATE() --> dFechaActual - * $ARGUMENTS$ - * Ninguno - * $RETURNS$ - * , la fecha actual del sistema. - * $DESCRIPTION$ - * Esta funcin devuelve la fecha actual del sistema. - * $EXAMPLES$ - * ? DATE() - * $TESTS$ - * ? "Hoy es ",DAY( DATE())," de ",CMONTH( DATE())," de ",YEAR( DATE()) - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es totalmente compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * CTOD(),DTOS(),DTOC(),DAY(),MONTH(),CMONTH() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * CTOD() - * $CATEGORY$ - * Fecha - * $ONELINER$ - * Convierte una cadena de caracteres a una expresin de fecha - * $SYNTAX$ - * CTOD() --> dFecha - * $ARGUMENTS$ - * Un fecha en el formato 'mm/dd/yy' - * $RETURNS$ - * Una expresin de fecha. - * $DESCRIPTION$ - * Esta funcin convierte una fecha que ha sido aportada como una - * expresin de caracteres a una expresin de fecha. La expresin de - * caracteres sera en la forma MM/DD/YY" (basada en el valor por defecto - * en SET DATE) o en el formato apropiado especificado por el comado - * SET DATE TO. Si una impropia cadena de caracteres es pasada a la - * funcin, un valor de fecha vaca ser retornado. - * $EXAMPLES$ - * ? CTOD('12/21/00') - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es totalmente compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * SET DATE,DATE(),DTOS() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * DAY() - * $CATEGORY$ - * Fecha - * $ONELINER$ - * Retorna el nmero de da del mes en el rango de 0 a 31 - * $SYNTAX$ - * DAY() --> nMes - * $ARGUMENTS$ - * Cualquier expresin vlida de fecha. - * $RETURNS$ - * Retorna , el valor numrico del da del mes. - * $DESCRIPTION$ - * Esta funcin retorna el valor numrico del da del mes de una fecha. - * $EXAMPLES$ - * ? DAY( CTOD("06/06/1944") ) // Resultado: 6 - * ? DAY( DATE() + 6325) - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es totalmente compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * CTOD(),DTOS(),DTOC(),DATE(),MONTH(),CMONTH() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * DAYS() - * $CATEGORY$ - * Fecha - * $ONELINER$ - * Convierte los segundos transcurridos a das. - * $SYNTAX$ - * DAYS( ) --> nDia - * $ARGUMENTS$ - * el nmero de segundos. - * $RETURNS$ - * Retorna el nmero de das transcurridos - * $DESCRIPTION$ - * Esta funcin convierte al nmero equivalente de das; - * 86399 segundos representan un da, cero segundos es medianoche. - * $EXAMPLES$ - * ? DAYS( 2434234) - * ? "Han transcurrido ", DAYS(63251) - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es totalmente compatible con CA-Cl*pper. - * Nota: No esta documentada en las NG, ni en el manual en espaol de - * CA-Cl*pper - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * SECONDS(),SECS(),ELAPTIME() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * DOW() - * $CATEGORY$ - * Fecha - * $ONELINER$ - * Convierte una fecha al nmero del dia de la semana (1-7) - * $SYNTAX$ - * DOW() --> nDia - * $ARGUMENTS$ - * Cualquier expresin vlida de fecha. - * $RETURNS$ - * DOW() retorna el dia de la semana en la forma numrica - * $DESCRIPTION$ - * Esta funcin convierte un valor de fecha en un nmero representando - * el dia de la semana. En el rango de 1 al 7, siendo 1 el dia Domingo - * y 7 el dia Sbado. - * $EXAMPLES$ - * ? DOW( DATE()) - * ? DOW( DATE() - 6584) - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es totalmente compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * DTOC(),CDOW(),DATE(),DTOS(),DAY() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * DTOC() - * $CATEGORY$ - * Fecha - * $ONELINER$ - * Convierte un valor de fecha a una cadena de caracteres - * $SYNTAX$ - * DTOC() --> cFecha - * $ARGUMENTS$ - * Cualquier expresin vlida de fecha. - * $RETURNS$ - * Retorna la cadena de caracteres representando la fecha - * $DESCRIPTION$ - * Esta funcin convierte una expresin de fecha (sea un campo una - * variable) expresada como a una expresin de caracteres en el - * formato por defecto "MM/DD/YY". El formato de fecha devuelto por esta - * funcin es controlado por el formato especificado por el comando - * SET DATE y es variable a diferencia del devuelto por la funcin - * DTOS(). - * $EXAMPLES$ - * ? DTOC( DATE()) - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es totalmente compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * SET DATE,DATE(),DTOS() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * DTOS() - * $CATEGORY$ - * Fecha - * $ONELINER$ - * Convierte un valor de fecha a una cadena en el formato AAAAMMDD - * $SYNTAX$ - * DTOS() --> cFecha - * $ARGUMENTS$ - * Cualquier expresin vlida de fecha. - * $RETURNS$ - * DTOS() retorna - * $DESCRIPTION$ - * Esta funcin convierte un valor de fecha a una cadena de 8 caracteres - * en el formato AAAAMMDD (no contiene separadores). Si el valor de - * es una fecha vaca, esta funcin retorna una cadena de - * caracteres de 8 espacios en blanco. - * $EXAMPLES$ - * ? DTOS( DATE()) - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es totalmente compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * DTOC(),DATE(),DTOS() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * ELAPTIME() - * $CATEGORY$ - * Hora - * $ONELINER$ - * Calcula el tiempo transcurrido. - * $SYNTAX$ - * ELAPTIME(,) --> cTranscurrido - * $ARGUMENTS$ - * Hora de inicio en el formato de cadena HH:MM:SS - * Hora de finalizacin en el formato de cadena HH:MM:SS - * $RETURNS$ - * Diferencia entre tiempos - * $DESCRIPTION$ - * Esta funcin devuelve una cadena que muestra la diferencia entre la - * hora inicial representada por y la hora final - * representada por . Si la hora de inicio es mayor que la - * de finalizacin, la funcin asume que la fecha a cambiado una vez. - * $EXAMPLES$ - * // Muestra el tiempo que se uso el programa parecido a como lo - * // haca el viejo Norton Utilities - * STATIC cHoraIni // al inicio del programa - * cHoraIni := TIME() - * - * // A la salida del programa - * ? "Ud. ha usado el programa durante: ", ELAPTIME( cHoraIni, TIME()) - * QUIT - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es totalmente compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * SECS(),SECONDS(),TIME(),DAY() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * MONTH() - * $CATEGORY$ - * Fecha - * $ONELINER$ - * Extrae el mes como valor numrico de un valor de fecha dado - * $SYNTAX$ - * MONTH() --> nMes - * $ARGUMENTS$ - * Cualquier expresin vlida de fecha. - * $RETURNS$ - * MONTH() retorna , nmero correspondiente al mes del ao, en el - * rango de 0 a 12. - * $DESCRIPTION$ - * Esta funcin devuelve el valor numrico del mes contenido en . - * Este valor esta en el formato de cuatro dgitos y no es afectado - * por el seteo de los comandos SET CENTURY y SET DATE. - * Si se pasa una fecha vaca CTOD("") a esta funcin devuelve el valor - * cero. - * $EXAMPLES$ - * ? Month(DATE()) - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es totalmente compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * CDOW(),DOW(),YEAR(),CMONTH() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * SECONDS() - * $CATEGORY$ - * Hora - * $ONELINER$ - * Retorna el nmero de segundos transcurridos desde medianoche. - * $SYNTAX$ - * SECONDS() --> nSegundos - * $ARGUMENTS$ - * Ninguno - * $RETURNS$ - * SECONDS() retorna desde la medianoche. - * $DESCRIPTION$ - * Esta funcin devuelve un valor numrico representando el nmero de - * segundos transcurridos desde la medianoche del da actual, basado en - * la hora actual del sistema operativo. - * SECONDS() se inicializa en cero (medianoche) y continua hasta 86399 - * segundos (23:59:59). El valor que devuelve es expresado como segundos - * y centsimas de segundo. - * $EXAMPLES$ - * // Muestra el tiempo que estuvo en ejecucin una rutina - * nArranque = SECONDS() - * - * // Aca va la llamada a la rutina - * // : : - * ? "Tard: ", SECONDS()- nArranque ," segundos" - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es totalmente compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * TIME() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * SECS() - * $CATEGORY$ - * Hora - * $ONELINER$ - * Retorna el nmero de segundos de la hora del sistema. - * $SYNTAX$ - * SECS( ) --> nSegundos - * $ARGUMENTS$ - * Expresin de caracteres en el formato de tiempo HH:MM:SS - * $RETURNS$ - * SECS() retorna Numbero de segundos - * $DESCRIPTION$ - * Esta funcin devuelve un valor numrico que es el nmero de segundos - * transcurridos desde medianoche, basados en una cadena de hora dado - * como . - * $EXAMPLES$ - * ? SECS( TIME()) - * ? SECS( TIME() - 10) - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es totalmente compatible con CA-Cl*pper. - * Nota: No esta documentada en las NG, ni en el manual en espaol de - * CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * SECONDS(),ELAPTIME(),TIME() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * TIME() - * $CATEGORY$ - * Hora - * $ONELINER$ - * Retorna la hora del sistema como una cadena de caracteres - * $SYNTAX$ - * TIME() --> cHora - * $ARGUMENTS$ - * Ninguno - * $RETURNS$ - * TIME() retorna la cadena de caracteres representando la hora - * $DESCRIPTION$ - * Esta funcin devuelve la hora del sistema representada como una - * expresin de caracteres en el formato HH:MM:SS, para calculos de - * tiempo conviene usar SECONDS(). - * $EXAMPLES$ - * ? TIME() // Resultado: 21:34:12 - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es totalmente compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * DATE(),SECONDS() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * YEAR() - * $CATEGORY$ - * Fecha - * $ONELINER$ - * Extrae el ao como valor numrico de un valor de fecha dado - * $SYNTAX$ - * YEAR() --> nAno - * $ARGUMENTS$ - * Cualquier expresin vlida de fecha. - * $RETURNS$ - * YEAR() retorna la porcin de ao de una fecha. - * $DESCRIPTION$ - * Esta funcin devuelve el valor numrico del ao contenido en - * Este valor esta en el formato de cuatro dgitos y no es afectado - * por el seteo de los comandos SET CENTURY y SET DATE. - * Si se pasa una fecha vaca CTOD("") a esta funcin devuelve el valor - * cero. - * $EXAMPLES$ - * ? YEAR( DATE()) // Resultado: 2000 - * ? YEAR( CTOD("01/31/1982")) // Resultado: 1982 - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es totalmente compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * DAY(),MONTH() - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/dbdelim.txt b/harbour/examples/hbdoc/examples/es/dbdelim.txt deleted file mode 100644 index 9512b75906..0000000000 --- a/harbour/examples/hbdoc/examples/es/dbdelim.txt +++ /dev/null @@ -1,101 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2001-2002 David G. Holm - * Documentacin en Ingls de: __dbDelim() - * - * Copyright 2001 Alejandro de Grate - * Documentacin en Espaol de: __dbDelim() - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * __dbDelim() - * $CATEGORY$ - * Conversin - * $ONELINER$ - * Copia el contenido de una base de datos a un archivo de texto - * delimitado agrega el contenido de un archivo de texto - * delimitado a una base de datos. - * $SYNTAX$ - * __dbDelim( , , [], [], - * [], [], [], [], ) --> NIL - * $ARGUMENTS$ - * Si es puesto a .T. copia registros A un archivo - * delimitado. - * Si es .F. agrega registros DESDE un archivo delimitado. - * - * es el nombre del archivo de texto del cual se va a - * copiar al que se va agregar datos. - * Si no es especificada una extensin. ".txt" es usada por defecto. - * - * Cualquiera de los caracteres a usar como delimitadores - * de campo (slo el primer caracter es usado). "BLANK" (en maysculas - * minsculas), el cual elimina los caracteres delimitadores de campo - * y establece el separador de campo a un solo espacio en lugar de una - * coma. - * - * Un array con los nombres de los campos a los que se limita - * el proceso. Si no es especificado, si est vaco, entonces todos - * los campos son procesados. - * - * Un bloque de cdigo opcional conteniendo una expresin FOR - * que reducir el nmero de registros a ser procesados. - * - * Un bloque de cdigo opcional conteniendo una expresin - * WHILE que reducir el nmero de registros a ser procesados. - * - * Si est presente, pero no est presente, - * especifica procesar este nmero de registros, empezando con el - * registro actual. Un valor de cero significa no procesar registros. - * - * Si est presente, especifica el nico registro a - * procesar un valor de cero significa no procesar ningn registro. - * Predomina sobre y . - * - * Si es .T., y es establecido en .T. y - * no hay argumentos , , entonces - * procesa todos los registros, desde el actual hasta el ltimo. - * $RETURNS$ - * NIL - * $DESCRIPTION$ - * __dbDelim() copia todo el contenido seleccionado, desde una tabla - * de base de datos a un archivo de texto SDF , agrega todo el - * contenido seleccionado desde un archivo de texto SDF a una tabla de - * base de datos. - * $EXAMPLES$ - * // Copia cuentas delinquentes dentro de un archivo de texto - * // delimitado - * USE cuentas NEW - * COPY TO deudas DELIMITED FOR !EMPTY( cuentas->vencidas ) ; - * .AND. DATE() - cuentas->vencidas > 30 - * - * // Importa nuevos registros de clientes - * USE clientes NEW - * APPEND FROM clientes DELIMITED - * $TESTS$ - * - * $STATUS$ - * S - * $COMPLIANCE$ - * Es intencin que __dbDelim() sea totalmente compatible con la funcin - * de CA-Cl*pper del mismo nombre y es la implementacin subyacente de - * los comandos: APPEND FROM DELIMITED y COPY TO DELIMITED. - * $PLATFORMS$ - * Todas - * $FILES$ - * - * $SEEALSO$ - * __dbSDF(), APPEND FROM, COPY TO - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/dbsdf.txt b/harbour/examples/hbdoc/examples/es/dbsdf.txt deleted file mode 100644 index a024e82db0..0000000000 --- a/harbour/examples/hbdoc/examples/es/dbsdf.txt +++ /dev/null @@ -1,93 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2001-2002 David G. Holm - * Documentacin en Ingls de: __dbSDF() - * - * Copyright 2001 Alejandro de Grate - * Documentacin en Espaol de: __dbSDF() - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * __dbSDF() - * $CATEGORY$ - * Conversin - * $ONELINER$ - * Copia el contenido de una base de datos a un archivo de texto SDF - * agrega el contenido de un archivo de texto SDF a una base de - * datos. - * $SYNTAX$ - * __dbSDF( , , [], - * [], [], [], [], ) --> NIL - * $ARGUMENTS$ - * Si es puesto a .T. copia registros A un archivo SDF. - * Si es .F. agrega registros DESDE un archivo SDF. - * - * es el nombre del archivo de texto del cual se va a - * copiar al que se va agregar datos. - * Si no es especificada una extensin. ".txt" es usada por defecto. - * - * Un array con los nombres de los campos a los que se limita - * el proceso. Si no es especificado, si est vaco, entonces todos - * los campos son procesados. - * - * Un bloque de cdigo opcional conteniendo una expresin FOR - * que reducir el nmero de registros a ser procesados. - * - * Un bloque de cdigo opcional conteniendo una expresin - * WHILE que reducir el nmero de registros a ser procesados. - * - * Si est presente, pero no est presente, - * especifica procesar este nmero de registros, empezando con el - * registro actual. Un valor de cero significa no procesar registros. - * - * Si est presente, especifica el nico registro a - * procesar un valor de cero significa no procesar ningn registro. - * Predomina sobre y . - * - * Si es .T., y es establecido en .T. y - * no hay argumentos , , entonces - * procesa todos los registros, desde el actual hasta el ltimo. - * $RETURNS$ - * NIL - * $DESCRIPTION$ - * __dbSDF() copia todo el contenido seleccionado, desde una tabla - * de base de datos a un archivo de texto SDF , agrega todo el - * contenido seleccionado desde un archivo de texto SDF a una tabla de - * base de datos. - * $EXAMPLES$ - * // Copia cuentas deudoras dentro de un archivo de texto SDF - * USE cuentas NEW - * COPY TO deudas SDF FOR !EMPTY( cuentas->vencidas ) ; - * .AND. DATE() - cuentas->vencidas > 30 - * - * // Importa nuevos registros de clientes - * USE clientes NEW - * APPEND FROM clientes SDF - * $TESTS$ - * - * $STATUS$ - * S - * $COMPLIANCE$ - * Es intencin que __dbSDF() sea totalmente compatible con la funcin - * de CA-Cl*pper del mismo nombre y es la implementacin subyacente de - * los comandos: APPEND FROM SDF y COPY TO SDF. - * $PLATFORMS$ - * Todas - * $FILES$ - * - * $SEEALSO$ - * __dbDelim(), APPEND FROM, COPY TO - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/dbstrux.txt b/harbour/examples/hbdoc/examples/es/dbstrux.txt deleted file mode 100644 index e1877c063c..0000000000 --- a/harbour/examples/hbdoc/examples/es/dbstrux.txt +++ /dev/null @@ -1,747 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2000 Chen Kedem - * Documentation for: __dbCopyStruct(), COPY STRUCTURE, __dbCopyXStruct(), - * COPY STRUCTURE EXTENDED, __dbCreate(), CREATE, - * CREATE FROM, __FLEDIT(), __dbStructFilter() - * - * Copyright 2000 Alejandro de Grate - * Documentacin en Espaol de: - * __dbCopyStruct(), COPY STRUCTURE, __dbCopyXStruct(), - * COPY STRUCTURE EXTENDED, __dbCreate(), CREATE, - * CREATE FROM, __FLEDIT(), __dbStructFilter() - * - * Vea COPYING por los trminos de la licencia. - * - */ - - -/* $DOC$ - * $FUNCNAME$ - * __dbCopyStruct() - * $CATEGORY$ - * Base de Datos - * $ONELINER$ - * Crea otra base de datos basada en la estructura actual del DBF - * $SYNTAX$ - * __dbCopyStruct( , [] ) --> NIL - * $ARGUMENTS$ - * es el nombre de una nueva base de datos a crear. - * (.dbf) es la extensin por defecto si ninguna es especificada. - * - * es un array donde cada elemento es un nombre de - * campo. - * Los nombres pueden ser especificados en maysculas minsculas. - * $RETURNS$ - * __dbCopyStruct() siempre retorna NIL. - * $DESCRIPTION$ - * La funcin __dbCopyStruct() crea una nueva base de datos vaca, - * con una estructura que esta basada en la base de datos actualmente - * abierta en este rea de trabajo. Si esta vaca, - * el archivo recientemente creado podra tener la misma estructura - * que la base de datos actualmente abierta. De otro modo el nuevo - * archivo podra contener slo campos que coincidan exactamente - * con . - * - * __dbCopyStruct() puede ser usada para crear un subconjunto de - * la base de datos actualmente abierta, basada en una lista dada - * de campos. - * - * El comando COPY STRUCTURE es pre-procesado en la funcin - * __dbCopyStruct() durante el tiempo de compilacin. - * $EXAMPLES$ - * // Crea un nuevo archivo que contiene la misma estructura. - * USE TEST - * __dbCopyStruct( "mycopy.dbf" ) - * - * // Crea un nuevo archivo que contiene parte de la estructura - * // original - * LOCAL aLista - * USE TEST - * aLista := { "NOMBRE" } - * __dbCopyStruct( "nombre.dbf", aLista ) - * $STATUS$ - * R - * $COMPLIANCE$ - * __dbCopyStruct() trabaja exactamente como la funcin de CA-Cl*pper, - * __dbCopyStruct(). - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera es rdd - * $SEEALSO$ - * COPY STRUCTURE,COPY STRUCTURE EXTENDED,DBCREATE(),DBSTRUCT(),__dbCopyXStruct(),__dbCreate(),__dbStructFilter() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * COPY STRUCTURE - * $CATEGORY$ - * Comando - * $ONELINER$ - * Crea otra base de datos basada en la estructura actual del DBF - * $SYNTAX$ - * COPY STRUCTURE TO [FIELDS ] - * $ARGUMENTS$ - * TO es el nombre del nuevo archivo de - * base de datos a crear. (.dbf) es la extensin por defecto si - * ninguna es dada. - * - * Esta puede ser especificada como un literal de nombre de archivo - * como una expresin de caracteres encerrada entre parntesis. - * - * FIELDS es una lista opcional de nombres de - * campos a copiar desde la base de datos actualmente abierta en - * el orden especificado, por defecto son todos los campos. - * Los nombres pueden ser especificados en maysculas minsculas. - * $DESCRIPTION$ - * COPY STRUCTURE crea una nueva base de datos vaca con una estructura - * que esta basada en la base de datos actualmente abierta en este - * rea de trabajo. - * - * COPY STRUCTURE puede ser usada para crear un subconjunto de la base - * de datos actualmente abierta, basada en una lista dada de campos. - * - * El comando COPY STRUCTURE es pre-procesado en la funcin - * __dbCopyStruct() durante el tiempo de compilacin. - * $EXAMPLES$ - * // Crea un nuevo archivo que contiene la misma estructura. - * USE TEST - * COPY STRUCTURE TO MiCopia - * - * // Crea un nuevo archivo que tiene parte de la estructura original - * USE TEST - * COPY STRUCTURE TO UnaParte FIELDS nombre, direccion - * $STATUS$ - * R - * $COMPLIANCE$ - * COPY STRUCTURE trabaja exactamente como en CA-Cl*pper - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * COPY STRUCTURE EXTENDED,DBCREATE(),DBSTRUCT(),__dbCopyStruct(),__dbCopyXStruct(),__dbCreate(),__dbStructFilter() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * __dbCopyXStruct() - * $CATEGORY$ - * Base de Datos - * $ONELINER$ - * Copia la estructura actual de la base a un archivo de definicin. - * $SYNTAX$ - * __dbCopyXStruct( ) --> lExito - * $ARGUMENTS$ - * es el nombre del archivo de definicin de destino - * a crear, (*.dbf) es la extensin por defecto si ninguna es dada. - * $RETURNS$ - * __dbCopyXStruct() retorna (.F.) si ninguna base de datos est en - * uso en el rea actual de trabajo, (.T.) si el proceso fu exitoso, - * un error en tiempo de ejecucin si la operacin de creacin del - * archivo ha fallado. - * $DESCRIPTION$ - * La funcin __dbCopyXStruct() crea una nueva base de datos llamada - * con una estructura predefinida (tambin llamado - * "archivo de estructura extendida"): - * - * - * Nombre Campo Tipo Tamao Decimales - * - * FIELD_NAME C 10 0 - * FIELD_TYPE C 1 0 - * FIELD_LEN N 3 0 - * FIELD_DEC N 3 0 - *
- * - * Cada registro en el nuevo archivo contiene informacin acerca de - * un campo en el archivo original. CREATE FROM podra ser usado para - * crear la base de datos desde el archivo de estructura extendida. - * - * Por razones prehistricas de compatibilidad, los campos de - * caracteres mayores de 255 caracteres son tratados en una forma - * especial al escribir parte de la longitud en el campo FIELD_DEC - * de acuerdo a la siguiente frmula (Esto es hecho internamente): - * - * - * FIELD->FIELD_DEC := int( nLength / 256 ) - * FIELD->FIELD_LEN := ( nLength % 256 ) - * - * - * Luego si se desea calcular la longitud de un campo, se puede usar - * la siguiente frmula: - * - * - * nLength := IIF( FIELD->FIELD_TYPE == "C", ; - * FIELD->FIELD_DEC * 256 + FIELD->FIELD_LEN, ; - * FIELD->FIELD_LEN ) - * - * - * El comando COPY STRUCTURE EXTENDED es pre-procesado en la funcin - * __dbCopyXStruct() durante el tiempo de compilacin. - * $EXAMPLES$ - * // Abre la base de datos, y copia su estructura a un nuevo archivo. - * USE Test - * __dbCopyXStruct( "TestEstr" ) - * - * // Abre el nuevo archivo y lista todos sus registros - * USE TestEstr - * LIST - * - * $TESTS$ - * $STATUS$ - * R - * $COMPLIANCE$ - * __dbCopyXStruct() trabaja exactamente como la funcin de CA-Cl*pper, - * __dbCopyXStruct(). - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera es rdd - * $SEEALSO$ - * COPY STRUCTURE,COPY STRUCTURE EXTENDED,CREATE,CREATE FROM,DBCREATE(),DBSTRUCT(),__dbCopyStruct(),__dbCreate() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * COPY STRUCTURE EXTENDED - * $CATEGORY$ - * Comando - * $ONELINER$ - * Copia la estructura actual de la base a un archivo de definicin. - * $SYNTAX$ - * COPY STRUCTURE EXTENDED TO - * $ARGUMENTS$ - * TO es el nombre del nuevo archivo de base - * de datos a crear, (.dbf) es la extensin por defecto si ninguna - * es dada. - * Esta puede ser especificada como un literal de nombre de archivo - * como una expresin de caracteres encerrada entre parntesis. - * $DESCRIPTION$ - * COPY STRUCTURE EXTENDED crea una nueva base de datos llamada - * con una estructura predefinida (tambin llamada - * "archivo de estructura extendida"): - * - * - * Nombre Campo Tipo Tamao Decimales - * - * FIELD_NAME C 10 0 - * FIELD_TYPE C 1 0 - * FIELD_LEN N 3 0 - * FIELD_DEC N 3 0 - *
- * - * - * - * Cada registro en el nuevo archivo contiene informacin acerca de - * un campo en el archivo original. CREATE FROM podra ser usado para - * crear la base de datos desde el "archivo de estructura extendida". - * - * Por razones prehistricas de compatibilidad, los campos de - * caracteres mayores de 255 caracteres son tratados en una forma - * especial al escribir parte de la longitud en el campo FIELD_DEC - * de acuerdo a la siguiente frmula (Esto es hecho internamente): - * - * - * FIELD->FIELD_DEC := int( nLength / 256 ) - * FIELD->FIELD_LEN := ( nLength % 256 ) - * - * - * Luego si se desea calcular la longitud de un campo, se puede usar - * la siguiente frmula: - * - * - * nLength := IIF( FIELD->FIELD_TYPE == "C", ; - * FIELD->FIELD_DEC * 256 + FIELD->FIELD_LEN, ; - * FIELD->FIELD_LEN ) - * - * - * El comando COPY STRUCTURE EXTENDED es pre-procesado en la funcin - * __dbCopyXStruct() durante el tiempo de compilacin. - - * $EXAMPLES$ - * // Abre la base de datos, y copia su estructura a un nuevo archivo. - * USE Test - * __dbCopyXStruct( "TestEstr" ) - * - * // Abre el nuevo archivo y lista todos sus registros - * USE TestEstr - * LIST - * - * $STATUS$ - * R - * $COMPLIANCE$ - * COPY STRUCTURE EXTENDED trabaja exactamente como en CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * COPY STRUCTURE,CREATE,CREATE FROM,DBCREATE(),DBSTRUCT(),__dbCopyStruct(),__dbCopyXStruct(),__dbCreate() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * __dbCreate() - * $CATEGORY$ - * Base de Datos - * $ONELINER$ - * Crea una estructura extendida usa una para crear otro archivo - * $SYNTAX$ - * __dbCreate( , [], [], - * [], [] ) --> lUsado - * $ARGUMENTS$ - * es el nombre del archivo destino a crear y luego - * abrir, (.dbf) es la extensin por defecto si ninguna es - * especificada. - * - * es el nombre de una estructura extendida opcional - * desde la cual el archivo destino va a ser - * construido. - * Si es omitida, un nuevo archivo de estructura extendida vaca con - * el nombre es creado y abierto, en el rea de - * trabajo actual. - * - * es el nombre del RDD para crear el archivo destino, - * Si es omitido, es usado el RDD por defecto. - * - * es una expresin lgica opcional, (.T.) abre el nombre - * del archivo de destino en la prxima rea - * disponible sin uso y hace de esta el rea actual. (.F.) abre el - * archivo de destino en el rea de trabajo actual. - * El valor por defecto es (.F.). El valor de es ignorado si - * no es especificado. - * - * es un alias opcional para usar el archivo de destino con - * el comando USE. Si no es especificado, alias esta basado en el - * nombre . - * $RETURNS$ - * __dbCreate() retorna (.T.) si hay una base de datos usada en el - * rea actual de trabajo (esta podra ser la nueva area de trabajo - * elegida), (.F.) si no hay ninguna base de datos usada. - * Note que si hubo xito debera ser devuelto (.F.), pero si hay - * alguna falla probablemente se termine con un error en tiempo de - * ejecucin y no con un valor de (.F.) - * $DESCRIPTION$ - * La funcin __dbCreate() funciona en dos modos dependiendo del valor - * de : - * - * 1) Si est vaco o no est especificado, un - * nuevo archivo de estructura extendida vaca, con el nombre - * es creado y luego abierto, en el rea actual de - * trabajo ( es ignorado). - * El nuevo archivo tiene la siguiente estructura: - * - * - * Nombre Campo Tipo Tamao Decimales - * - * FIELD_NAME C 10 0 - * FIELD_TYPE C 1 0 - * FIELD_LEN N 3 0 - * FIELD_DEC N 3 0 - *
- * - * El comando CREATE es pre-procesado en la funcin __dbCopyStruct() - * durante el tiempo de compilacin y usa este modo. - * - * 2) Si es especificado, este es abierto y se - * asume como un archivo de estructura extendida donde cada registro - * contiene al menos los siguientes campos (en cualquier orden): - * FIELD_NAME, FIELD_TYPE, FIELD_LEN y FIELD_DEC. Cualquier otro campo - * es ignorado. Con esta informacin el archivo es - * creado y abierto en el nuevo area de trabajo (de acuerdo a ) - * si esta es una nueva rea de trabajo, esta se vuelve la actual. - * - * Por razones prehistricas de compatibilidad, los campos de - * caracteres del archivo de estructura extendida los cuales sean - * mayores de 255 caracteres deberan ser tratados en una forma - * especial al escribir parte de la longitud en el campo FIELD_DEC - * de acuerdo a la siguiente frmula: - * - * - * FIELD->FIELD_DEC := int( nLength / 256 ) - * FIELD->FIELD_LEN := ( nLength % 256 ) - * - * - * El comando CREATE FROM es pre-procesado en la funcin - * __dbCopyStruct() durante el tiempo de compilacin. - * - * $EXAMPLES$ - * // Crea un nuevo archivo de estructura extendida, agrega algunos - * // registros y luego crea un nueva base de datos desde este - * // archivo (CREATE FROM) - * - * __dbCreate( "molde" ) - * DBAPPEND() - * FIELD->FIELD_NAME := "CANAL" - * FIELD->FIELD_TYPE := "N" - * FIELD->FIELD_LEN := 2 - * FIELD->FIELD_DEC := 0 - * DBAPPEND() - * FIELD->FIELD_NAME := "PROGRAMA" - * FIELD->FIELD_TYPE := "C" - * FIELD->FIELD_LEN := 20 - * FIELD->FIELD_DEC := 0 - * DBAPPEND() - * FIELD->FIELD_NAME := "RESUMEN" - * FIELD->FIELD_TYPE := "C" // este campo es de 1000 char longitud - * FIELD->FIELD_LEN := 232 // 1000 % 256 = 232 - * FIELD->FIELD_DEC := 3 // 1000 / 256 = 3 - * DBCLOSEAREA() - * __dbCreate( "tv_guia", "molde" ) - * $STATUS$ - * R - * $COMPLIANCE$ - * __dbCreate() trabaja exactamente como en CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera es rdd - * $SEEALSO$ - * COPY STRUCTURE,COPY STRUCTURE EXTENDED,CREATE,CREATE FROM,DBCREATE(),DBSTRUCT(),__dbCopyStruct(),__dbCopyXStruct() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * CREATE - * $CATEGORY$ - * Comando - * $ONELINER$ - * Crea un archivo de estructura extendida vaco. - * $SYNTAX$ - * CREATE [VIA ] [ALIAS ] - * $ARGUMENTS$ - * es el nombre del archivo de de destino a crear - * y abrir, (*.dbf) es la extensin por defecto si ninguna es dada. - * Este puede ser especificada un literal de nombre de archivo - * como una expresion de caracteres encerrada entre parntesis. - * - * VIA es el nombre del RDD con el cual se va - * a crear el archivo de destino. Si es omitido, el RDD por defecto - * es usado. - * Este puede ser especificado como un literal de nombre de archivo - * como una expresin de caracteres encerrada entre parntesis. - * - * es un alias opcional para usar el archivo de destino con - * el comando USE. Si no es especificado, alias esta basado en el - * nombre . - * $DESCRIPTION$ - * El comando CREATE, crea un nuevo archivo de estructura extendida - * vaco y luego lo abre en el rea actual de trabajo. - * El nuevo archivo tiene la siguiente estructura: - * - * - * Nombre Campo Tipo Tamao Decimales - * - * FIELD_NAME C 10 0 - * FIELD_TYPE C 1 0 - * FIELD_LEN N 3 0 - * FIELD_DEC N 3 0 - *
- * - * El comando CREATE es pre-procesado en la funcin __dbCopyStruct() - * durante el tiempo de compilacin y usa este modo. - * $EXAMPLES$ - * // Crea un nuevo archivo de estructura extendida, agrega algunos - * // registros y luego crea un nueva base de datos desde este archivo - * // (CREATE FROM) - * - * CREATE molde - * APPEND BLANK - * FIELD->FIELD_NAME := "CANAL" - * FIELD->FIELD_TYPE := "N" - * FIELD->FIELD_LEN := 2 - * FIELD->FIELD_DEC := 0 - * APPEND BLANK - * FIELD->FIELD_NAME := "PROGRAMA" - * FIELD->FIELD_TYPE := "C" - * FIELD->FIELD_LEN := 20 - * FIELD->FIELD_DEC := 0 - * APPEND BLANK - * FIELD->FIELD_NAME := "RESUMEN" - * FIELD->FIELD_TYPE := "C" // este campo es de 1000 char longitud - * FIELD->FIELD_LEN := 232 // 1000 % 256 = 232 - * FIELD->FIELD_DEC := 3 // 1000 / 256 = 3 - * CLOSE - * CREATE tv_Guia FROM molde - * $STATUS$ - * R - * $COMPLIANCE$ - * CREATE trabaja exactamente como en CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * COPY STRUCTURE,COPY STRUCTURE EXTENDED,CREATE FROM,DBCREATE(),DBSTRUCT(),__dbCopyStruct(),__dbCopyXStruct(),__dbCreate() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * CREATE FROM - * $CATEGORY$ - * Comando - * $ONELINER$ - * Crea una base de datos desde un archivo de estructura extendida - * $SYNTAX$ - * CREATE FROM [VIA ] - * [NEW] [ALIAS ] - * $ARGUMENTS$ - * es el nombre del archivo de de destino a crear - * y abrir, (*.dbf) es la extensin por defecto si ninguna es dada. - * Este puede ser especificada un literal de nombre de archivo - * como una expresin de caracteres encerrada entre parntesis. - * - * FROM es el nombre del archivo de estructura - * extendida desde la cual el archivo de destino va a ser construido. - * Este puede ser especificado como un literal de nombre de archivo - * como una expresin de caracteres encerrada entre parntesis. - * - * VIA es el nombre del RDD con el cual se va - * a crear el archivo de destino. Si es omitido, el RDD por defecto - * es usado. - * Este puede ser especificado como un literal de nombre de archivo - * como una expresin de caracteres encerrada entre parntesis. - * - * NEW abre el nombre del archivo de destino en - * la prxima rea disponible sin uso y hace de sta el rea actual. - * Si es omitido, abre el archivo de destino en el rea de trabajo - * actual. - * - * ALIAS es el alias opcional del archivo de destino - * para usar con el comando USE. Si ninguno es especificado el alias - * esta basado en el nombre . - * $DESCRIPTION$ - * El comando CREATE FROM abre un archivo de estructura extendida - * donde cada registro contiene al menos los - * siguientes campos (en cualquier orden): - * FIELD_NAME, FIELD_TYPE, FIELD_LEN y FIELD_DEC. Cualquier otro campo - * es ignorado. Con esta informacin el archivo es - * creado y abierto en el nuevo area de trabajo (de acuerdo a la - * clusula NEW) si sta es una nueva rea de trabajo, esta se vuelve - * la actual. - * - * Por razones prehistricas de compatibilidad, los campos de - * caracteres del archivo de estructura extendida los cuales sean - * mayores de 255 caracteres deberan ser tratados en una forma - * especial al escribir parte de la longitud en el campo FIELD_DEC - * de acuerdo a la siguiente frmula: - * - * - * FIELD->FIELD_DEC := int( nTamano / 256 ) - * FIELD->FIELD_LEN := ( nTamano % 256 ) - * - * - * El comando CREATE FROM es preprocesado en la funcin __dbCopyStruct() - * durante el tiempo de compilacin y usa este modo. - * $EXAMPLES$ - * Vea el ejemplo del comado CREATE. - * $STATUS$ - * R - * $COMPLIANCE$ - * CREATE FROM trabaja exactamente como en CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * COPY STRUCTURE,COPY STRUCTURE EXTENDED,CREATE,DBCREATE(),DBSTRUCT(),__dbCopyStruct(),__dbCopyXStruct(),__dbCreate() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * __FLEDIT()* - * $CATEGORY$ - * Base de Datos - * $ONELINER$ - * Filtra un array con estructura de base de datos. - * $SYNTAX$ - * __FLEDIT( , [] ) --> aEstructuraFiltrada - * $ARGUMENTS$ - * es un array multidimensional con la estructura de los - * campos de la base de datos, la cual es usualmente la salida de - * DBSTRUCT(), donde cada elemento del array tiene la siguiente - * estructura: - * - * - * Posicin Descripcin dbstruct.ch - * - * 1 cNombreCampo DBS_NAME - * 2 cTipoCampo DBS_TYPE - * 3 nTamaoCampo DBS_LEN - * 4 nDecimales DBS_DEC - *
- * - * es un array donde cada elemento es un nombre de - * campo. Los nombres pueden ser especificados en maysculas o en - * minsculas. - * $RETURNS$ - * __FLEDIT() retorna un nuevo array multidimensional donde cada - * elemento esta en la misma estructura que el original , - * pero el array es construido de acuerdo a la lista de campos en - * . - * Si esta vaco, __FLEDIT() retorna una referencia al - * array original . - * $DESCRIPTION$ - * __FLEDIT() puede ser usado para crear un subconjunto de la - * estructura de la base de datos, basada en una lista de campos dadas. - * - * Note que los nombres de campos en DEBEN ser - * especificados en maysculas de lo contrario podra no encontrarse - * coincidencia. - * - * SET EXACT no tiene efecto en el valor retornado. - * - * __FLEDIT() es una funcin de compatibilidad y es un sinnimo para - * __dbStructFilter() la cual hace exactamente lo mismo. - * $EXAMPLES$ - * LOCAL aEstructura, aLista, aRet - * aEstructura := {{ "CODIGO", "N", 4, 0 }, ; - * { "NOMBRE", "C", 10, 0 }, ; - * { "TELEF", "C", 13, 0 }, ; - * { "IQ" , "N", 3, 0 } } - * aLista := { "IQ", "NOMBRE" } - * aRet := __FLEDIT( aEstructura, aLista ) - * // { { "IQ", "N", 3, 0 }, { "NAME", "C", 10, 0 } } - * - * aRet := __FLEDIT( aEstructura, {} ) - * ? aRet == aEstructura // .T. - * - * aLista := { "iq", "NOTEXIST" } - * aRet := __FLEDIT( aEstruct, aLista ) - * // { { "IQ", "N", 3, 0 } } - * - * aLista := { "NOTEXIST" } - * aRet := __FLEDIT( aEstruct, aLista ) // {} - * - * - * // Crea un nuevo archivo que contiene parte de la estructura - * // original - * LOCAL aEstructura, aLista, aRet - * USE TEST - * aEstructura := DBSTRUCT() - * aLista := { "NOMBRE" } - * DBCREATE( "elnombre.dbf", __FLEDIT( aEstructura, aLista ) ) - * $STATUS$ - * R - * $COMPLIANCE$ - * CA-Cl*pper tiene una funcin interna no documentada llamada - * __FLEDIT(), en Harbour nosotros la llamamos __dbStructFilter(). - * El nuevo nombre da una mejor descripcin de qu es lo que la funcin - * hace. En Harbour __FLEDIT(), simplemente llama a __dbStructFilter() - * y por tanto la segunda es la funcin recomendada. - * - * Esta funcin es slo visible si ../source/rdd/dbstrux.prg fu - * compilado con la bandera HB_CLP_UNDOC. - * $PLATFORMS$ - * Todas - * $FILES$ - * El archivo de cabecera es dbstruct.ch - * La librera es rdd - * $SEEALSO$ - * DBCREATE(),DBSTRUCT(),__dbCopyStruct(),__dbStructFilter() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * __dbStructFilter() - * $CATEGORY$ - * Base de Datos - * $ONELINER$ - * Filtra un array con estructura de base de datos. - * $SYNTAX$ - * __dbStructFilter( , [] ) - * --> aEstructuraFiltrada - * $ARGUMENTS$ - * es un array multidimensional con la estructura de - * los campos de la base de datos, la cual es usualmente la salida - * de DBSTRUCT(), donde cada elemento del array tiene la siguiente - * estructura: - * - * - * Posicin Descripcin dbstruct.ch - * - * 1 cNombreCampo DBS_NAME - * 2 cTipoCampo DBS_TYPE - * 3 nTamaoCampo DBS_LEN - * 4 nDecimales DBS_DEC - *
- * - * es un array donde cada elemento es un nombre de - * campo. - * Los nombres pueden ser especificados en maysculas o en minsculas. - * $RETURNS$ - * __dbStructFilter() retorna un nuevo array multidimensional donde - * cada elemento esta en la misma estructura que el original - * , pero el array es construido de acuerdo a la lista de - * campos en el array . Si esta vaco, - * __dbStructFilter() retorna una referencia al array original - * . - * $DESCRIPTION$ - * __dbStructFilter() puede ser usado para crear un subconjunto de la - * estructura de la base de datos, basada en una lista de campos dadas. - * - * Note que los nombres de campos en DEBEN ser - * especificados en maysculas de lo contrario podra no encontrarse - * coincidencia. - * - * SET EXACT no tiene efecto en el valor retornado. - * $EXAMPLES$ - * LOCAL aEstructura, aLista, aRet - * aEstructura := { { "CODIGO", "N", 4, 0 }, ; - * { "NOMBRE", "C", 10, 0 }, ; - * { "TELEF", "C", 13, 0 }, ; - * { "IQ" , "N", 3, 0 } } - * aLista := { "IQ", "NOMBRE" } - * aRet := __dbStructFilter( aEstructura, aLista ) - * // { { "IQ", "N", 3, 0 }, { "NAME", "C", 10, 0 } } - * - * aRet := __dbStructFilter( aEstructura, {} ) - * ? aRet == aEstruct // .T. - * - * aLista := { "iq", "NOTEXIST" } - * aRet := __dbStructFilter( aEstructura, aLista ) - * // { { "IQ", "N", 3, 0 } } - * - * aLista := { "NOTEXIST" } - * aRet := __dbStructFilter( aEstruct, aLista ) // {} - * - * - * // Crea un nuevo archivo que contiene parte de la estructura - * // original - * LOCAL aEstruct, aLista, aRet - * USE TEST - * aEstruct := DBSTRUCT() - * aLista := { "NOMBRE" } - * DBCREATE( "elnombre.dbf", __dbStructFilter( aEstruct, aLista ) ) - * $STATUS$ - * R - * $COMPLIANCE$ - * __dbStructFilter() es una extensin de Harbour. CA-Cl*pper tiene - * una funcin interna no documentada llamada __FLEDIT(), que hace lo - * mismo. El nuevo nombre da una mejor descripcin de que es lo que - * la funcin hace. - * $PLATFORMS$ - * Todas - * $FILES$ - * El archivo de cabecera es dbstruct.ch - * La librera es rdd - * $SEEALSO$ - * DBCREATE(),DBSTRUCT(),__dbCopyStruct(),__FLEDIT()* - * $END$ - */ diff --git a/harbour/examples/hbdoc/examples/es/dir.txt b/harbour/examples/hbdoc/examples/es/dir.txt deleted file mode 100644 index b801ab11db..0000000000 --- a/harbour/examples/hbdoc/examples/es/dir.txt +++ /dev/null @@ -1,243 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2000 Alejandro de Grate - * Documentacin en Espaol de: __DIR(), DIR, ADIR() - * - * Copyright 1999 Chen Kedem - * Documentacin en Ingls de: __DIR(), DIR, ADIR() - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * __Dir()* - * $CATEGORY$ - * Manejo de Archivos - * $ONELINER$ - * Muestra por pantalla el listado de archivos. - * $SYNTAX$ - * __Dir( [] ) --> NIL - * $ARGUMENTS$ - * Mscara de archivos para incluir en el retorno de la - * funcin. Esta podra contener subdirectorios (path) y caracteres - * estndar usados como comodines, segun sean soportados por el sistema - * operativo (como * y ?). Si no contiene la ruta al archivo - * entonces SET DEFAULT es usado para mostrar archivos en la mscara. - * $RETURNS$ - * __Dir() siempre retorna NIL. - * $DESCRIPTION$ - * Si ninguna es dada, __Dir() muestra informacin acerca de - * todos los *.dbf en la ruta SET DEFAULT. Esta informacin contiene: - * - Nombre del archivo - * - Numero de registros - * - Fecha de la ultima actualizacin - * - Tamao de cada archivo. - * - * Si es dada, __Dir() lista todos los archivos que - * coinciden con la mscara en los siguientes detalles: Nombre, - * Extensin, Tamao, Fecha. - * - * El comando DIR es pre-procesado en la funcin __Dir() durante el - * tiempo de compilacin. - * - * __Dir() es una funcin de compatibilidad, esta fu superada por - * DIRECTORY(), la cual devuelve toda la informacin en un arreglo - * multidimensional. - * $EXAMPLES$ - * - * __Dir() // Informacin de todos los DBF en el directorio actual - * - * __Dir( "*.dbf" ) // Lista todos los DBF en el directorio actual - * - * // Lista todos los PRG de la librera de ejecucin (RTL) de Harbour - * // para sistemas operativos compatibles con DOS - * __Dir( "C:\harbour\source\rtl\*.prg" ) - * - * // Lista todos los archivos de la seccin pblica sobre una mquina - * // tipo Unix - * __Dir( "/pub" ) - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Informacin de DBF: CA-Cl*pper muestra nombres de archivos en el - * formato 8.3, Harbour muestra los primeros 15 caracteres si un nombre - * largo de archivo esta disponible. - * - * Listado de archivos: para formatear los nombres mostrados usamos algo - * as como: - * PADR( Nombre, 8 ) + " " + PADR( Ext, 3 ) - * CA-Cl*pper usa nombres de archivo 8.3, con Harbour probablemente se - * podra cortar los nombres largos de archivo para llenar este molde. - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * ADIR()*,DIRECTORY(),SET DEFAULT,DIR - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * DIR - * $CATEGORY$ - * Comando - * $ONELINER$ - * Muestra el listado de archivos - * $SYNTAX$ - * DIR [] - * $ARGUMENTS$ - * Mscara de archivos para incluir en el retorno de la - * funcin. Esta podra contener subdirectorios (path) y caracteres - * estndar usados como comdines, segun sean soportados por el sistema - * operativo (como * y ?). Si no contiene la ruta al archivo - * entonces SET DEFAULT es usado para mostrar archivos en la mscara. - * $DESCRIPTION$ - * Si ninguna es dada, __Dir() muestra informacin acerca de - * todos los *.dbf en la ruta SET DEFAULT. esta informacin contiene: - * - Nombre del archivo - * - Nmero de registros - * - Fecha de la ultima actualizacin - * - Tamao de cada archivo. - * - * Si es dada,__Dir() lista todos los archivos que coinciden - * con la mscara en los siguientes detalles: Nombre, Extensin, Tamao, - * Fecha. - * - * El comando DIR es pre-procesado en la funcin __Dir() durante el - * tiempo de compilacin. - * - * __Dir() es una funcin de compatibilidad, esta fu superada por - * DIRECTORY(), la cual devuelve toda la informacin en un arreglo - * multidimensional. - * $EXAMPLES$ - * - * __Dir() // Informacin de todos los DBF en el directorio actual - * - * __Dir( "*.dbf" ) // Lista todos los DBF en el directorio actual - * - * // Lista todos los PRG de la librera de ejecucin (RTL) de Harbour - * // para sistemas operativos compatibles con DOS - * __Dir( "C:\harbour\source\rtl\*.prg" ) - * - * // Lista todos los archivos de la seccin pblica sobre una mquina - * // tipo Unix - * __Dir( "/pub" ) - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Informacin de DBF: CA-Cl*pper muestra nombres de archivos en el - * formato 8.3, Harbour muestra los primeros 15 caracteres si un nombre - * largo de archivo est disponible. - * - * Listado de archivos: para formatear los nombres mostrados usamos algo - * as como: - * PADR( Nombre, 8 ) + " " + PADR( Ext, 3 ) - * CA-Cl*pper usa nombres de archivo 8.3, con Harbour probablemente se - * podra cortar los nombres largos de archivo para llenar este molde. - * $SEEALSO$ - * ADIR()*,DIRECTORY(),SET DEFAULT,__DIR()* - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * ADIR()* - * $CATEGORY$ - * ARRAY - * $ONELINER$ - * Llena arrays pre-definidos con informacin de archivo / directorio - * $SYNTAX$ - * ADIR( [], [], [], [], - * [], [] ) -> nEntradasDirectorio - * $ARGUMENTS$ - * Mscara de archivos para incluir en el retorno de la - * funcin. Esta podria contener subdirectorios (path) y caracteres - * estandar usados como comodines, segun sean soportados por el sistema - * operativo (como * y ?). Si no contiene la ruta al archivo - * entonces SET DEFAULT es usado para mostrar archivos en la mscara. - * - * Array para llenar con el Nombre de los archivos que cumplen - * con . Cada elemento es una cadena de caracteres que - * incluye el Nombre y Extensin del archivo sin la ruta de acceso. - * Nombre es el nombre largo de archivo como es reportado por el sistema - * operativo y no necesariamente en el formato maysculas 8.3 del D.O.S. - * - * Array para llenar con el Tamao de los archivos que - * cumplen con . Cada elemento es un nmero entero con el - * tamao del archivo en bytes. - * Los Directorios siempre tienen un tamao cero. - * - * Array para llenar con la Fecha de la ultima modificacin del - * archivo que cumplen con . Cada elemento es del tipo "Date" - * - * Array para llenar con la Hora de la ultima modificacin del - * archivo que cumplen con . Cada elemento es una cadena de - * caracteres en el formato: HH:MM:SS. - * - * Array para llenar con los atributos de los archivos que - * cumplen con . Cada elemento es una cadena de caracteres, - * Vea DIRECTORY() por informacin sobre los valores de los atributos. - * Si Ud. pasa un array a , la funcin va a devolver archivos - * con los atributos Normal, Oculto (H), sistema (S) y directorio (D) - * Si no es especificado o es distinto de un array solo - * archivos con atributo normal porian ser devueltos. - * - * Nota: Al momento de escribir esta documentacin todavia no haba - * informacin sobre el comportamiento de esta funcin con los - * atributos que poseen las maquinas tipo Unix. - * $RETURNS$ - * ADIR() retorna el nmero de entradas de archivo que cumplen con la - * condicin establecida en la mscara . - * $DESCRIPTION$ - * ADIR() retorna el nmero de archivos y/o directorios que cumplen con - * un formato especificado, este tambien llena una serie de arrays con - * Nombre, Tamao, Fecha, Hora y Atributo de estos archivos. - * El array pasado debe ser pre-inicializado al tamao apropiado, vea el - * ejemplo ms abajo. - * Con motivo de incluir los atributos Oculto (H), sistema (S) o de - * directorio (D) debe ser especificado. - * - * ADIR() es una funcin de compatibilidad, esta fue superada por - * DIRECTORY(), la cual devuelve toda la informacin en un arreglo - * multidimensional. - * $EXAMPLES$ - * - * LOCAL aNombre, aTamano, aFecha, aHora, aAtrib, nLen, i - * nLen := ADIR( "*.jpg" ) // Nro de archivos JPG files en directorio - * - * IF nLen > 0 - * aNombre := Array( nLen ) // hace lugar para guardar la informac. - * aTamano := Array( nLen ) - * aFecha := Array( nLen ) - * aHora := Array( nLen ) - * aAtrib := Array( nLen ) - * - * FOR i = 1 TO nLen - * ? aNombre[i], aTamano[i], aFecha[i], aHora[i], aAtrib[i] - * NEXT - * ELSE - * ? "Este directorio no tiene ni pelusa" - * ENDIF - * - * $STATUS$ - * R - * $COMPLIANCE$ - * esta yendo a ser llenado con nombres largos de archivo y - * no necesariamente con el formato maysculas 8.3 del D.O.S. - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * ARRAY(),DIRECTORY(),SET DEFAULT - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/dirstruc.txt b/harbour/examples/hbdoc/examples/es/dirstruc.txt deleted file mode 100644 index 315b386f1c..0000000000 --- a/harbour/examples/hbdoc/examples/es/dirstruc.txt +++ /dev/null @@ -1,240 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2002 Chen Kedem - * Documentacin en Ingls de: dirstruc.txt - * - * Copyright 2002 Alejandro de Grate - * Documentacin en Espaol de: dirstruc.txt - * - * Vea COPYING por los trminos de la licencia. - * - */ - - -Estructura de directorios de Harbour -==================================== - -Siguiendo estan los directorios que existen bajo el arbol de -Harbour. -Bajo cada directorio existente en esta lista hay tambi'n un -directorio especial, llamado CVS, el que debera normalmente -ser ignorado dado que ste es usado por el CVS para mantener -la pista de todos los archivos (lea las FAQ, si Ud. no sabe -qu' es el CVS). Note que el rbol puede contener otros -directorios vacos. -Ellos podran ser obsoletos pero no hay una forma sencilla de -removerlos completamente (Ud. puede usar cvs update -d en -busca de remover directorios vacos) - - - - Directorio principal de Harbour -| Contiene todos los archivos make y Changelog -| (cambios histricos) -| -+---bin - Ejecutables y batch de construccin -| debera contener harbour.exe y otros ejecutables (*) -| -+---config - Archivos de Config. (.mk) para the GNU Make system -| | -| +---bsd - Archivos de Configuracin especficos para FreeBSD -| | -| +---dos - Archivos de Configuracin especficos -| | para DOS. -| +---linux - Archivos de Config. especficos para GNU/Linux. -| | -| +---os2 - Archivos de Configuracin especficos para OS/2. -| | -| +---win - Archivos de Config. especficos para Windows. -| -| -+---contrib - Archivos Miscelaneos de contribucin. -| | No son parte del proyecto oficial Harbour -| | -| +---apollo - funciones para driver de base de datos Apollo -| | | -| | | -| | +---test - Programas de Testeo -| | -| +---directx - Implementacin de DirectDraw para Windows -| | | -| | +---lib - -| | | | -| | | +---vc - -| | | -| | +---media - -| | | -| | +---samples - ejemplos de DirectDraw -| | -| +---dot - Pre-Processor/Dot prompt environment. -| | -| +---hbclip - Harbour Compatibility Lib. (HCL) para Clipper 5.x -| | -| +---hbzlib - Interface para 'zlib' libreria de compresion -| | | para trabajar con archivos ZIP -| | | -| | +---doc - Documentos para las funciones ZIP -| | -| +---hb_struc - Clase Base Class para manejo interno de creacin -| | de clases como estructuras -| | -| +---hgf - Entorno grfico (GUI) de Harbour -| | | -| | +---gtk - Implementacin para entorno GTK+ -| | | -| | +---tests - Programas de Testeo -| | | -| | +---hbgfwin - Implementacin para entorno Windows -| | -| +---htmllib - HTMLLIB (HTML classes) para Harbour -| | -| +---libct - CA-T**ls Compatible Library para Harbour. -| | | -| | +---alt - version altenativa de funciones CT -| | | -| | +---tests - Programas de Testeo -| | -| +---libgt - GT library port to Harbour. -| | | -| | +---doc - Documentos para la librera GT -| | | -| | +---en - Documentacin en Ingls. -| | -| +---libmisc - Contribucin Miscelnea -| | | -| | +---doc - Documentos de contribucin -| | | | -| | | +---en - Documentacin en Ingls. -| | | -| | +---tests - Programas de Testeo -| | -| +---libnf - Libreria Nanforum para Harbour. -| | -| +---msql - clases Harbour de acceso a mSQL -| | -| +---mysql - clases Harbour de acceso a MySQL -| | -| +---odbc - Demostracin de clases de acceso a ODBC -| | -| +---pdflib - API PDF de bajo nivel para HBDOC para -| | PDFlib. -| | -| +---rdd_ads - RDD para Advantage Database Server. -| | | -| | +---doc - Documents para Advantage Database Server RDD. -| | | -| | +---en - Documentacin en Ingls. -| | -| +---runjava - JAVA runner para Harbour Portable Object (#3) -| | -| +---samples - Archivos de contribucin miscelaneos -| | -| +---tprepro - Clases PreProcessor basadas en la -| libreria de Ejecucin del Preprocessor -| -+---doc - Documentacin y notas -| | -| +---en - Documentacin en Ingls. -| | -| +---es - Documentacin en Espaol. -| -+---include - Archivos Include para ambos Harbour y C -| -+---lib - Librerias de ejecucin para cada plataforma (*) -| -+---samples - Archivos de ejemplo y pequeas aplicaciones -| | -| +---guestbk - Libro de visitantes de Harbour para web -| | -| +---hscript - Harbour Script. -| | -| +---misc - unos humildes ejemplos -| | -| +---pe - Editor -| -| -+---source - Todos los archivos fuentes residen bajo este -| | directorio -| | -| +---common - Funciones Comunes y Optimizador de Expresiones -| | -| +---compiler - Mdulo del Compilador de Harbour -| | -| +---debug - Depurador. -| | -| +---lang - archivos de mensajes para distintos idiomas -| | -| +---macro - Macro compilador -| | -| +---pp - Preprocesesador de Harbour -| | -| +---rdd - Replaceable Database Driver (RDD) -| | | Manejador reemplazable de base de datos -| | | -| | +---dbfcdx - DBFCDX RDD. -| | | -| | +---dbfntx - DBFNTX RDD. -| | | -| | +---nulsys - NULL RDD. -| | -| +---rtl - Funciones de la librera de ejecucin (RTL) -| | | y varias implementaciones de Terminales (GT) -| | | -| | +---gtcgi - GT subsistema para aplicaciones cgi -| | | -| | +---gtcrs - Subsistema GT basado en ncurses (unix) (#1) -| | | -| | +---gtdos - Subsistema GT para compiladores de DOS -| | | -| | +---gtos2 - Subsistema GT para compiladores de OS/2 -| | | -| | +---gtpca - Subsistema GT para terminales ANSI -| | | -| | +---gtsln - Subsistema GT basado en slang (unix) (#1) -| | | -| | +---gtstd - Subsistema GT para ANSI C stream IO. -| | | -| | +---gtwin - Subsistema GT para compiladores Windows -| | | -| | +---gt_tpl - Subsistema GT modelo base -| | -| +---vm - Funciones de la Maquina Virtual (VM) e -| internas de la librera de ejecucin (RTL) -| -+---tests - Programas de Testeo de Harbour -| -+---utils - Utilidades y herramientas que son parte de Harbour - | - +---hbdoc - Herramienta generadora de Documentacin - | - +---hbextern - generador de hbextern.ch - | - +---hbmk - Utilidad Make de Harbour - | - +---hbpp - Preprocesador de Harbour como mdulo aislado - | - +---hbrun - Ejecutor de archivos de Objetos Portables de - | Harbour (#3) - +---hbtest - Test de Regresin para la libreria RTL - - -Leyenda: -======= -(*) Debera existir en una construccin final si lo -construye Ud. mismo, en una distribucin normal de CVS este -directorio est vaco no contiene todos los archivos. - -(#1) Aunque hoy en da existen ports a otros sistemas operativos - sus races estan en unix. - -(#2) Directorio temporal donde se ponen los archivos objeto - .obj u otro (dependiendo de la plataforma) a medida - que se construyen los ejecutables y las libreras. - si Ud. construye el compilador Harbour. - -(#3) (.hrb), Archivos de formato Harbour Portable Object diff --git a/harbour/examples/hbdoc/examples/es/diskspac.txt b/harbour/examples/hbdoc/examples/es/diskspac.txt deleted file mode 100644 index b3de5acead..0000000000 --- a/harbour/examples/hbdoc/examples/es/diskspac.txt +++ /dev/null @@ -1,80 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2000 Alejandro de Grate - * Documentacin en Espaol de: DISKSPACE() - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * DISKSPACE() - * $CATEGORY$ - * Bajo Nivel - * $ONELINER$ - * Obtiene la cantidad de espacio disponible en el disco - * $SYNTAX$ - * DISKSPACE( [] [, ] ) --> nDiskbytes - * $ARGUMENTS$ - * es el nmero de disco del que esta solicitando informacin - * donde 1 = A, 2 = B, etc, Si se especifica cero ningn - * parametro DISKPACE() trabaja sobre la unidad actual de disco - * Por defecto es cero. - * - * es el tipo de espacio que est siendo requerido. Por defecto - * es HB_DISK_AVAIL. - * $RETURNS$ - * es el nmero de bytes en la unidad especificada que - * coincide con el tipo requerido. - * $DESCRIPTION$ - * Por defecto esta funcin retorna el nmero de bytes de espacio libre - * en el disco actual que esta disponible para el usuario que solicita - * la informacin. - * - * Hay 4 tipos de informacin disponible: - * - * HB_FS_AVAIL La cantidad de espacio disponible para el usuario que - * hace la solicitud. Este valor podra ser menor que - * HB_FS_FREE si las asignaciones de espacio en disco - * (quotas) son soportadas por el sistema operativo al - * tiempo de ejecucin y estas quotas estn asignadas. - * De otro modo el valor ser igual al retornado por - * HB_FS_FREE. - * - * HB_FS_FREE La cantidad actual de espacio libre en el disco. - * - * HB_FS_USED El nmero de bytes en uso en el en el disco. - * - * HB_FS_TOTAL La cantidad total de espacio asignado para el usuario - * si las quotas estan asignadas. De otro modo el tamao - * actual del disco. - * - * Si la informacin es requerida sobre un disco que no esta disponible - * un error de ejecucin 2018 ser establecido. - * $EXAMPLES$ - * ? "Ud. tiene diponible: " + STR( DISKSPACE() ) + " bytes " +; - * "sobre un total de " + STR( DISKSPACE( 0, HB_FS_TOTAL) ) - * - * Note: Ver ..\tests\tstdspac.prg por otros ejemplos. - * $STATUS$ - * S - * $COMPLIANCE$ - * CA-Cl*pper retorna un valor entero cuya utilidad esta limitada a - * discos menores de 2 gigabytes. La versin de Harbour retorna un valor - * de punto flotante con 0 decimales si el disco es > 2 gigabytes. - * es una extensin de Harbour. - * $PLATFORMS$ - * Dos, Windows, OS/2, Unix - * $FILES$ - * El cdigo fuente est en diskspac.c - * La librera asociada es rtl - * El archivo de cabecera es fileio.ch - * $END$ - */ diff --git a/harbour/examples/hbdoc/examples/es/errsys.txt b/harbour/examples/hbdoc/examples/es/errsys.txt deleted file mode 100644 index efb875812b..0000000000 --- a/harbour/examples/hbdoc/examples/es/errsys.txt +++ /dev/null @@ -1,47 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2000 Alejandro de Grate - * Documentacin en Espaol de: ERRORSYS() - * - * Vea COPYING por los trminos de la licencia. - * - */ - - -/* $DOC$ - * $FUNCNAME$ - * ERRORSYS() - * $CATEGORY$ - * Recuperacion de Errores - * $ONELINER$ - * Instala el manejador de errores por defecto - * $SYNTAX$ - * ERRORSYS() --> NIL - * $ARGUMENTS$ - * Ninguno. - * $RETURNS$ - * ERRORSYS() siempre retorna NIL. - * $DESCRIPTION$ - * ERRORSYS() es llamado en el inicio por Harbour e instala el manejador - * de errores por defecto. Normalmente no se debe llamar a esta funcin - * directamente. En su lugar use ERRORBLOCK() para instalar su propio - * manejador de errores. - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es 100 % Clipper compatible - * $FILES$ - * El cdigo fuente est en errorsys.c - * La librera asociada es rtl - * $SEEALSO$ - * ERRORBLOCK(),Error class - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/eval.txt b/harbour/examples/hbdoc/examples/es/eval.txt deleted file mode 100644 index 22c69c046e..0000000000 --- a/harbour/examples/hbdoc/examples/es/eval.txt +++ /dev/null @@ -1,84 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2000 Alejandro de Grate - * Documentacin en Espaol de: EVAL() - * - * Copyright 2000 Luiz Rafael Culik - * Documentacin en Ingls de: EVAL() - * - * Vea COPYING por los trminos de la licencia. - * - */ - - -/* $DOC$ - * $FUNCNAME$ - * EVAL() - * $CATEGORY$ - * Bloque de cdigo - * $ONELINER$ - * Evala un bloque de cdigo (codeblock) - * $SYNTAX$ - * EVAL( [, [,...]]) --> xExpresion - * $ARGUMENTS$ - * Bloque de cdigo a ser evaluado. - * - * Argumento para ser pasado al bloque de cdigo. - * - * Lista de argumentos para ser pasados al bloque de cdigo. - * $RETURNS$ - * EVAL() retorna , el valor de la ltima expresin dentro - * del bloque. El valor devuelto puede ser de cualquier tipo vlido. - * $DESCRIPTION$ - * Esta funcin evala el bloque de cdigo expresado como al - * ejecutarlo y pasarle los parmetros como argumentos ,luego retorna su - * valor evaluado. Si hay mltiples expresiones dentro del bloque de - * cdigo, la ltima expresin ser el valor de esta funcin. - * - * Si el bloque de cdigo requiere parmetros para ser pasados a ste, - * ellos son especificados en la lista de parmetros . - * Cada parmetro es separado por una coma dentro de la lista de - * parmetros y cada expresin es separada por comas dentro de la lista - * de expresiones. - * - * Nota: Un bloque de cdigo es un valor de datos especial que hace - * referencia a cdigo de programa compilado (contiene cdigo - * ejecutable), puede incluso contener funciones y el hecho que - * permite exportar variables estticas y locales dentro de l, - * la da una gran versatilidad. - * Aunque las macros y los bloques de cdigo son similares, las - * Las macros son cadenas de caracteres que se compilan durante - * la ejecucin de un programa y se ejecutan a continuacin. - * Los bloques de cdigo se compilan junto con los otros PRG - * durante la compilacin del programa. Por esto son ms rpidos, - * Es posible compilar un bloque de cdigo en tiempo de ejecucin - * desde una cadena de caracteres usando el operador de macros (&). - * Un bloque de cdigo esta compuesto por: - * { || } - * Los separadores verticales deben estar presentes aunque el - * bloque no reciba argumentos. - * $EXAMPLES$ - * bBloque = {|arg1, arg2| QOUT( arg1+arg2) } - * EVAL( bBloque, "Harbour", " es fabuloso") - * $TESTS$ - * Ver ejemplos. - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es 100 % compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera es vm - * $SEEALSO$ - * AEVAL(),DBEVAL() - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/file.txt b/harbour/examples/hbdoc/examples/es/file.txt deleted file mode 100644 index 41a13fa177..0000000000 --- a/harbour/examples/hbdoc/examples/es/file.txt +++ /dev/null @@ -1,1290 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2000 Chen Kedem - * Documentacin en Ingls de: __TYPEFILE(), TYPE - * - * Copyright 2000 Luiz Rafael Culik - * Documentacin en Ingls de: - * FOPEN(), FCLOSE(), FWRITE(), FSEEK(), FREAD(), FILE(), - * FREADSTR(), FRENAME(), FERROR(), RENAME, ERASE, CURDIR(), - * DIRMAKE(),DIRCHANGE(),ISDISK(),DIRREMOVE(),DISKCHANGE(), - * DIRCHANGE() - * - * Copyright 2000 David G. Holm - * Documentacin en Ingls de: HB_FEOF() - * - * Copyright 2003 Alejandro de Grate - * Documentacin en Espaol de: - * FOPEN(), FCREAT(), FREAD(), FWRITE(), FERROR(), FCLOSE(), - * FERASE(), FRENAME(), FSEEK(), FILE(), FREADSTR(), RENAME, - * ERASE, DELETE FILE, __TYPEFILE(), TYPE, CURDIR(), COPY FILE, - * HB_FEOF(), DIRREMOVE(), DIRCHANGE(), MAKEDIR(), ISDISK(), - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * FOPEN() - * $CATEGORY$ - * Bajo Nivel - * $ONELINER$ - * Abre un archivo binario - * $SYNTAX$ - * FOPEN( , [] ) --> nHandle - * $ARGUMENTS$ - * Es el Nombre del archivo a abrir - * - * Modo de apertura del archivo - * $RETURNS$ - * Devuelve , el manejador (handle) del archivo. - * $DESCRIPTION$ - * Esta funcin abre el archivo binario indicado como y - * devuelve un manejador de archivo para ser usado por otras funciones - * de bajo nivel. - * El valor de representa la forma de apertura del archivo, el - * valor por defecto es 0 (cero). - * Los modos de apertura son los siguientes: - * - * - * nModo fileio.ch Significado - * - * 0 FO_READ Solo Lectura (Read only) - * 1 FO_WRITE Solo Escritura (Write only) - * 2 FO_READWRITE Leer/Escribir (Read/write) - * 16 FO_EXCLUSIVE Uso exclusivo, Solo Lectura - * 32 FO_DENYWRITE Evita escritura por otros - * 48 FO_DENYREAD Evita Lectura por otros - * 64 FO_DENYNONE No Evita nada, Otros pueden Leer/Escribir - * 64 FO_SHARED igual que FO_DENYNONE - *
- * - * Si existe un error en la apertura del archivo, la funcin devolver - * -1. El valor del manejador de archivo (handle) puede estar en el - * rango de cero a 65535. - * El estado de los comandos SET DEFAULT TO y SET PATH TO no tiene - * efecto sobre esta funcin. - * Los nombres de directorios y la trayectoria a travs de ellos (path) - * puede ser especificada junto con el nombre del archivo a ser abierto. - * - * Si ocurre un error, consulte el valor que devuelve la funcin - * FERROR(), por las causas posibles del error. - * $EXAMPLES$ - * 1) Abre un archivo para lectura/escritura y en modo compartido - * - * nHandle := FOPEN('x.txt', 66 ) - * - * IF nHandle < 0 - * ? "El archivo no puede ser abierto" - * ENDIF - * - * - * 2) mejor an - * cFile := "x.txt" - * nHandle := FOPEN( cFile, FO_SHARED + FO_READWRITE ) - * - * IF FERROR() != 0 - * ? "El archivo <" + cFile + "> no puede ser abierto, error: ", ; - * FERROR() - * // Tomar la accin apropiada... - * ENDIF - * - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera asociada es rtl - * El archivo de cabecera es fileio.ch - * $SEEALSO$ - * FCREATE(),FERROR(),FCLOSE() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * FCREATE() - * $CATEGORY$ - * Bajo Nivel - * $ONELINER$ - * Crea Trunca un archivo binario. - * $SYNTAX$ - * FCREATE( , [] ) --> nHandle - * $ARGUMENTS$ - * Es el Nombre del archivo a abrir - * - * Cdigo numrico con los atributos del archivo - * $RETURNS$ - * Devuelve el manejador numrico (handle) del archivo para - * ser usado en otras operaciones. - * $DESCRIPTION$ - * Esta funcin crea un nuevo archivo binario con el nombre . - * El valor por defecto de es cero y es usado para - * establecer el byte de atributo del archivo creado por esta funcin. - * El valor de retorno es un manejador de archivo (handle) que es - * asociado con el nuevo archivo. Este nmero estar entre cero y 65535 - * Si ocurre un error, el valor de retorno de esta funcin ser de -1. - * - * Si el archivo ya existe, ese archivo ser truncado a una - * longitud de cero bytes. - * - * Si es especificado, la tabla siguiente muestra los - * valores que puede tomar y su relacin con el archivo que - * est siendo creado por esta funcin. - * - * - * fileio.ch Significado - * - * 0 FC_NORMAL Normal/Por Defecto, Lectura/Escritura - * 1 FC_READONLY Solo Lectura - * 2 FC_HIDDEN Oculto, Excluido de la bsqueda normal DIR - * 4 FC_SYSTEM Sistema, Excluido de la bsqueda normal DIR - *
- * $EXAMPLES$ - * cFile := "test.txt" - * nHandle := FCREATE( cFile ) - * - * IF nHandle < 0 - * ? "No se puede crear el archivo:", cFile - * ENDIF - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es compatible con CA-Cl*pper. - * $FILES$ - * La librera asociada es rtl - * El archivo de cabecera es fileio.ch - * $SEEALSO$ - * FCLOSE(),FOPEN(),FWRITE(),FREAD(),FERROR() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * FREAD() - * $CATEGORY$ - * Bajo Nivel - * $ONELINER$ - * Lee un nmero de bytes especificado desde un archivo binario - * $SYNTAX$ - * FREAD( , @, ) --> nBytesLeidos - * $ARGUMENTS$ - * Manejador de archivo del sistema operativo - * - * Cadena de caracteres usada como buffer temporal y - * pasada por referencia (ntese el operador '@' delante - * del nombre de la variable). - * - * Nmero de bytes a leer - * $RETURNS$ - * Devuelve , el nmero de bytes satisfactoriamente - * ledos desde el archivo. - * $DESCRIPTION$ - * Esta funcin lee caracteres desde un archivo cuyo manejador es - * a una variable de memoria indicada como . - * La funcin retorna el nmero de bytes exitosamente ledos dentro de - * . - * - * El valor de es obtenido de la llamada a la funcin FOPEN() - * bien de la llamada a la funcin FCREATE(). - * - * La expresin es pasada por referencia y debe ser definida - * antes que esta funcin sea llamada. Esta tambin debe tener el - * mismo mayor tamao que , caso contrario se producir un - * error. - * - * es el nmero de bytes a leer, comenzando en la posicin - * actual del puntero del archivo. Si esta funcin tiene xito en la - * lectura de los caracteres del archivo, el nmero real de caracteres - * ledos ser igual a la longitud de , igual al nmero de - * bytes especificado en y ese ser el valor devuelto. - * El puntero actual del archivo avanza tantas posiciones como el nmero - * de bytes ledos. - * - * Esta funcin lee todos los caracteres ASCII de 0-255, incluyendo el - * carcter null / ASC(0) y los caracteres de control. - * Si esta funcin devuelve cero, si el nmero de bytes ledos no - * coincide ni con la longitud de , ni con el valor - * especificado en , es porque se ha alcanzado la condicin - * end-of-file (EOF) fin de archivo. - * - * Si ocurre un error, consulte el valor que devuelve la funcin - * FERROR(), por las causas posibles del error. - * $EXAMPLES$ - * nChunck := 500 - * cBuffer := SPACE( nChunck ) - * - * IF (nHandle := FOPEN('x.txt') ) > 0 - * FREAD( nHandle, @cBuffer, nChunck ) - * ENDIF - * - * FCLOSE( nHandle ) - * - * ? cBuffer - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es compatible con CA-Cl*pper, pero tambin extiende el - * tamao del buffer a cadenas ms grandes que 64 Kb (dependiendo de la - * plataforma). - * $FILES$ - * La librera asociada es rtl - * $SEEALSO$ - * BIN2I(),BIN2L(),BIN2W(),FERROR(),FWRITE() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * FWRITE() - * $CATEGORY$ - * Bajo Nivel - * $ONELINER$ - * Escribe caracteres hacia un archivo binario abierto. - * $SYNTAX$ - * FWRITE( , , [] ) --> nBytesEscritos - * $ARGUMENTS$ - * Manejador de archivo del sistema operativo - * - * Cadena de caracteres a escribirse - * - * El nmero de bytes a escribir - * $RETURNS$ - * el nmero de bytes satisfactoriamente escritos. - * $DESCRIPTION$ - * Esta funcin escribe el contenido de la memoria intermedia - * a un archivo binario designado por su manejador de archivo . - * - * El valor devuelto por esta funcin es el nmero de bytes exitosamente - * escritos en el archivo. - * Si el valor devuelto es cero, un error ha ocurrido, disco lleno, etc. - * - * Una escritura satisfactoria ocurre cuando el nmero de bytes - * retornados por FWRITE() es igual al LEN( ) . - * - * El valor de es el nmero de bytes a escribir al archivo. - * La escritura comienza en la posicin actual del puntero del archivo. - * Si es especificado, este es el nmero de bytes en - * que van a ser escritos. Si esta variable no es usada, el contenido - * completo del buffer es escrito al archivo. - * Para truncar un archivo, una llamada a FWRITE( nHandle, "", 0 ) es - * necesaria. - * - * Si ocurre un error, consulte el valor que devuelve la funcin - * FERROR(), por las causas posibles del error. - * $EXAMPLES$ - * nHandle := FCREATE('x.txt') - * - * FOR x :=1 TO 10 - * FWRITE( nHandle, STR(x) ) - * NEXT - * - * FCLOSE( nHandle ) - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin no es compatible con CA-Cl*pper porque puede escribir - * cadenas de caracteres mayores a 64 Kb. - * $FILES$ - * La librera asociada es rtl - * $SEEALSO$ - * FCLOSE(),FCREATE(),FERROR(),FOPEN(),I2BIN(),L2BIN() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * FERROR() - * $CATEGORY$ - * Bajo Nivel - * $ONELINER$ - * Reporta el estado de error de las funciones de archivo de bajo nivel - * $SYNTAX$ - * FERROR() --> - * $RETURNS$ - * Valor del ltimo error del DOS encontrado por una - * funcin de bajo nivel. - * - * Valores de Retorno de FERROR() - * - * - * Error Significado - * - * 0 Exito, no hubo error - * 2 Archivo no encontrado - * 3 Camino (Path) no encontrado - * 4 Demasiados archivos abiertos - * 5 Acceso denegado - * 6 Manejador (handle) no vlido - * 8 Memoria insuficiente - * 15 Drive especificado no vlido - * 19 Intento de escritura en un disco protegido - * 21 Drive no listo - * 23 Error en CRC de datos - * 29 Error de escritura - * 30 Error de lectura - * 32 Sharing violation - * 33 Violacin de bloqueo - *
- * $DESCRIPTION$ - * Despus de ejecutar una funcin de manipulacin de archivos de bajo - * nivel , esta funcin retornar un valor que provee informacin - * adicional sobre su funcionamiento. - * Si la funcin FERROR() devuelve cero, no se ha detectado ningn - * error. Esta funcin mantiene su valor hasta la prxima ejecucin de - * una funcin de archivo de bajo nivel. - * Ms arriba hay un tabla con algunos valores devueltos por la funcin - * FERROR(). - * Note que esos valores podran ser distintos en otra plataforma - * (sistema operativo) distinta a DOS/Windows. - * $EXAMPLES$ - * #include "fileio.ch" - * // - * nHandle := FCREATE("temp.txt", FC_NORMAL) - * - * IF FERROR() != 0 - * ? "No se puede crear el archivo, DOS error ", FERROR() - * ENDIF - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es compatible con CA-Cl*pper. - * $FILES$ - * La librera asociada es rtl - * $SEEALSO$ - * FCLOSE(),FERASE(),FOPEN(),FWRITE() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * FCLOSE() - * $CATEGORY$ - * Bajo Nivel - * $ONELINER$ - * Cierra un archivo binario abierto - * $SYNTAX$ - * FCLOSE( ) --> - * $ARGUMENTS$ - * Manejador de archivo del sistema operativo - * $RETURNS$ - * Devuelve un valor lgico, es TRUE (.T.) si se cerr con - * xito FALSE (.F.) si no se pudo cerrar. - * $DESCRIPTION$ - * Esta funcin cierra un archivo abierto identificado con el manejador - * de DOS y escribe el contenido del buffer DOS asociado hacia - * el disco. - * El valor es obtenido del llamado a alguna de las - * funciones FCREATE() FOPEN(). - * - * Si ocurre un error, consulte el valor que devuelve la funcin - * FERROR(), por las causas posibles del error. - * $EXAMPLES$ - * nHandle := FOPEN('x.txt') - * - * ? FSEEK( nHandle, 0, 2) - * - * FCLOSE( nHandle ) - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es compatible con CA-Cl*pper. - * $FILES$ - * La librera asociada es rtl - * $SEEALSO$ - * FOPEN(),FCREATE(),FREAD(),FWRITE(),FERROR() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * FERASE() - * $CATEGORY$ - * Bajo Nivel - * $ONELINER$ - * Borra un archivo del disco - * $SYNTAX$ - * FERASE( ) --> nExito - * $ARGUMENTS$ - * Nombre del archivo a borrar - * $RETURNS$ - * Devuelve cero si hubo xito, -1 en caso contrario. - * $DESCRIPTION$ - * Esta funcin borra el archivo especificado en del disco. - * Ninguna extensin es asumida. El disco y el camino (path) pueden ser - * incluidos en ; - * Ninguno de los comandos SET DEFAULT ni SET PATH afectan la ejecucin - * de esta funcin. - * Si el disco el camino no son usados, esta funcin buscar el - * archivo solamente en el directorio actual del disco al cual se - * encuentra loggeado. - * - * Si la funcin es capaz de borrar satisfactoriamente el archivo del - * disco, el valor devuelto por la funcin ser cero -1 si hubo alguna - * falla. Si no fue exitosa la operacin, informacin adicional puede - * ser obtenida llamando a la funcin FERROR(). - * - * Nota: Cualquier archivo a ser removido por FERASE() debe estar - * previamente cerrado. - * $EXAMPLES$ - * IF FERASE("test.txt") == 0 - * ? "El archivo fu exitosamente borrado" - * ELSE - * ? "El archivo no puede ser borrado" - * ENDIF - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es compatible con CA-Cl*pper. - * $FILES$ - * La librera asociada es rtl - * $SEEALSO$ - * FERROR(),FRENAME() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * FRENAME() - * $CATEGORY$ - * File management - * $ONELINER$ - * Renombra un archivo - * $SYNTAX$ - * FRENAME( , ) --> nExito - * $ARGUMENTS$ - * Nombre del archivo a ser cambiado - * - * Nuevo nombre que tomar el archivo - * $RETURNS$ - * Devuelve cero si hubo xito, -1 en caso contrario. - * $DESCRIPTION$ - * Esta funcin renombra el archivo especificado en - * al nuevo nombre: . - * El nombre del archivo junto con el del directorio puede ser - * especificado para cualquier parmetro. - * Sin embargo, si el camino es aportado como parte de - * y este camino es diferente del camino especificado en - * (si ninguno es usado) el disco y directorio actuales, la funcin - * podra no ejecutarse satisfactoriamente. - * - * Ninguno de los comandos SET DEFAULT ni SET PATH afectan la ejecucin - * de esta funcin. - * Al intentar localizar el archivo a ser renombrado, esta funcin - * buscar en el disco y el directorio por defecto, en el disco y - * directorio especificado en . - * No buscar en los directorios mencionados en los comandos SET PATH TO - * SET DEFAULT TO por la sentencia PATH del sistema operativo. - * - * Si el archivo especificado en existe el archivo - * est abierto, la funcin ser incapaz de renombrar el archivo. - * Si la funcin es incapaz de completar su operacin, esta devolver - * el valor -1, y cero si la operacin fue exitosa. - * Si ocurre un error, consulte el valor que devuelve la funcin - * FERROR(), por las causas posibles del error. - * $EXAMPLES$ - * nResult := FRENAME("x.txt", "x1.txt") - * - * IF nResult < 0 - * ? "El archivo no pudo ser renombrado." - * ENDIF - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es compatible con CA-Cl*pper. - * $FILES$ - * La librera asociada es rtl - * $SEEALSO$ - * ERASE,FERASE(),FERROR(),FILE(),RENAME - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * FSEEK() - * $CATEGORY$ - * Bajo Nivel - * $ONELINER$ - * Mueve el puntero de un archivo binario - * $SYNTAX$ - * FSEEK( , , [] ) --> nPosicion - * $ARGUMENTS$ - * Manejador de archivo del sistema operativo - * El valor es obtenido del llamado a alguna de - * las funciones FCREATE() FOPEN(). - * - * Nmero de bytes a mover el puntero del archivo - * - * Posicin inicial del puntero del archivo - * $RETURNS$ - * Devuelve la posicin actual del puntero del archivo con - * respecto al comienzo del archivo. - * $DESCRIPTION$ - * Esta funcin mueve el puntero del archivo, cuyo manejador DOS es - * tantos bytes hacia delante atras segn el contenido de - * , desde la posicin establecida por . - * - * El valor numrico retornado por la funcin es la posicin relativa - * del puntero del archivo al marcador de inicio de archivo una vez que - * la operacin ha sido completada. - * Esta funcin no realiza ninguna lectura, simplemente mueve el puntero - * del archivo. - * - * Si el valor de es positivo el puntero se mover hacia - * delante, si el valor es negativo se mover hacia atrs, desde la - * posicin establecida por . - * - * El valor de establece el punto de inicio desde el cual el - * puntero del archivo va a ser movido, como se muestra en la tabla - * siguiente: - * - * - * fileio.ch Posicin en el archivo - * - * 0 FS_SET Comienzo del archivo - * 1 FS_RELATIVE Actual posicin del puntero del archivo - * 2 FS_END Fin del archivo (EOF) - *
- * - * Si un valor no es provisto para , por defecto es cero y - * el puntero del archivo se mueve desde el comienzo del archivo. - * El puntero del archivo no puede desplazarse ms alla de los lmites - * de inicio de fin de archivo, caso contrario ocurrir un error. - * Si ocurre un error, consulte el valor que devuelve la funcin - * FERROR(), por las causas posibles del error. - * $EXAMPLES$ - * // Funcin que lee una lnea de texto desde un archivo abierto - * - * // nHandle = manejador de archivo obtenido de FOPEN() - * // cB = cadena buffer pasada-por-referencia para poner el resultado - * // nMaxLine = nmero maximo de bytes a leer - * - * #define EOL HB_OSNEWLINE() - * - * FUNCTION FREADln( nHandle, cB, nMaxLine ) - * - * LOCAL cLine, nSavePos, nEol, nNumRead - * - * cLine := SPACE( nMaxLine ) - * cB := '' - * nSavePos := FSEEK( nHandle, 0, FS_RELATIVE ) - * nNumRead := FREAD( nHandle, @cLine, nMaxLine ) - * - * IF ( nEol := AT( EOL, substr( cLine, 1, nNumRead ) ) ) == 0 - * cB := cLine - * ELSE - * cB := SUBSTR( cLine, 1, nEol - 1 ) - * FSEEK( nHandle, nSavePos + nEol + 1, FS_SET ) - * ENDIF - * - * RETURN nNumRead != 0 - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es compatible con CA-Cl*pper. - * $FILES$ - * La librera asociada es rtl - * El archivo de cabecera es fileio.ch - * $SEEALSO$ - * FCREATE(),FERROR(),FOPEN(),FREAD(),FREADSTR(),FWRITE() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * FILE() - * $CATEGORY$ - * File management - * $ONELINER$ - * Verifica la existencia de archivos - * $SYNTAX$ - * FILE( ) --> lExiste - * $ARGUMENTS$ - * Especificacin del archivo, esta puede contener una - * referencia a la unidad de disco y el directorio. - * La extensin debe ser especificada. - * Sigue las reglas bsicas de archivos de DOS. - * $RETURNS$ - * Retorna un valor lgico verdadero (.T.) si el archivo - * existe, falso (.F.) si no es encontrado. - * $DESCRIPTION$ - * Esta funcin busca el archivo como es especificado en - * - * Si el camino no es especificado, FILE() buscar primero en la - * ubicacin indicada por SET DEFAULT, si no lo encuentra seguir luego - * con la/s ubicacin/es contenidas en SET PATH, hasta que el archivo - * sea encontrado hasta que no haya ms caminos para buscar. - * - * El PATH del DOS nunca es examinado y el actual disco y directorio - * es slo examinado si SET DEFAULT est en blanco. - * - * Nota: La utilizacin de caracteres comodines '*' y '?' todava no - * est soportada comletamente. - * $EXAMPLES$ - * ? FILE( "C:\harbour\doc\compiler.txt") - * ? FILE( "C:\harbour\doc\subcodes.txt") - * - * $STATUS$ - * S (el soporte de comodines todava est ausente) - * $COMPLIANCE$ - * Esta funcin es compatible con CA-Cl*pper. - * $FILES$ - * La librera asociada es rtl - * $SEEALSO$ - * SET DEFAULT,SET PATH,SET() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * FREADSTR() - * $CATEGORY$ - * Bajo Nivel - * $ONELINER$ - * Lee una cadena de caracteres desde un archivo binario - * $SYNTAX$ - * FREADSTR( , ) --> cCadena - * $ARGUMENTS$ - * Manejador de archivo del sistema operativo - * El valor es obtenido del llamado a alguna de - * las funciones FCREATE() FOPEN(). - * - * Nmero de bytes a leer - * $RETURNS$ - * Devuelve la cadena de caracteres . - * $DESCRIPTION$ - * Esta es una funcin de bajo nivel que lee caracteres de un archivo - * binario. - * El valor de es el nmero de bytes a leer desde el archivo. - * - * La cadena devuelta ser el nmero de caracteres especificado en - * si no hubo error y el archivo todava contena esa cantidad - * de caracteres. - * Si se encuentra los caracteres ASCII=cero ASCII=26 el tamao de la - * cadena devuelta ser menor que e inclusive puede ser nula. - * - * NOTA: - * Esta funcin es similar a la funcin FREAD(), excepto que detiene la - * lectura si encuentra los caracteres CHR(0) (fin de cadena) CHR(26) - * (fin de archivo). - * Tenga esto en cuenta si no logra el resultado deseado al leer un - * archivo binario, en tal caso la funcin FREAD() debera ser usada en - * lugar de la funcin FREADSTR(). - * $EXAMPLES$ - * - Este ejemplo lee y muestra los primeros 100 caracteres de un - * archivo de texto - * - * IF ( nHandle := FOPEN("x.txt") ) > 0 - * cStr := FREADSTR( nHandle, 100) - * ? cStr - * ENDIF - * - * FCLOSE( nHandle ) - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin no es compatible CA-Cl*pper dado que la versin de - * Harbour, puede leer cadenas mayores que 64 Kb, dependiendo de la - * plataforma. - * $FILES$ - * La librera asociada es rtl - * $SEEALSO$ - * BIN2I(),BIN2L(),BIN2W(),FERROR(),FREAD(),FSEEK() - * $END$ - */ - - -/* HARBOUR COMMANDS */ - -/* $DOC$ - * $FUNCNAME$ - * RENAME - * $CATEGORY$ - * Comando - * $ONELINER$ - * Cambia el nombre del archivo especificado - * $SYNTAX$ - * RENAME TO - * $ARGUMENTS$ - * Nombre del archivo a ser cambiado - * - * Nuevo nombre que tomar el archivo - * $DESCRIPTION$ - * Este comando cambia el nombre de a . - * Ambos archivos y deben incluir la - * extensin del archivo y pueden opcionalmente incluir la unidad de - * disco y el camino, aunque deben especificarse si cualquier archivo - * est en otro directorio distinto al disco y directorio por defecto. - * El nombre de cualquiera de los dos archivos puede ser especificado - * como una cadena literal, como una expresin de caracteres - * encerrada entre parntesis. - * Este comando no es afectado ni por el comando SET PATH TO, ni por el - * comando SET DEFAULT TO. - * - * Si existe previamente si est actualmente abierto - * este comando no realizar la operacin deseada. - * Si ocurre un error, consulte el valor que devuelve la funcin - * FERROR(), por las causas posibles del error. - * $EXAMPLES$ - * RENAME C:\autoexec.bat TO C:\autoexec.old - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Este comando es compatible con CA-Cl*pper. - * $FILES$ - * La librera asociada es rtl - * $SEEALSO$ - * CURDIR(),ERASE,FILE(),FERASE(),FRENAME() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * ERASE - * $CATEGORY$ - * Comando - * $ONELINER$ - * Remueve un archivo del disco - * $SYNTAX$ - * ERASE - * $ARGUMENTS$ - * Nombre del archivo a remover - * $DESCRIPTION$ - * Este comando borra remueve un archivo del disco. - * El nombre de puede especificarse como una cadena literal, - * como una expresin de caracteres. Debe incluir la extensin del - * archivo y puede opcionalmente incluir la unidad de disco y el camino. - * - * El uso de los caracteres comodines '*' y '?' esta permitido. - * - * Los comandos SET DEFAULT y SET PATH no afectan la operatoria de este - * comando. - * El archivo debe ser considerado cerrado por el sistema operativo, - * antes de que ste pueda ser borrado. - * $EXAMPLES$ - * ERASE C:\autoexec.bat // slo es una broma, no lo intente! - * ERASE C:/temp/read.txt - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Este comando es compatible con CA-Cl*pper. - * $SEEALSO$ - * CURDIR(),FILE(),FERASE(),DELETE FILE - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * DELETE FILE - * $CATEGORY$ - * Comando - * $ONELINER$ - * Remueve un archivo del disco - * $SYNTAX$ - * DELETE FILE - * $ARGUMENTS$ - * Nombre del archivo a remover - * $DESCRIPTION$ - * Este comando borra remueve un archivo del disco. - * El nombre de puede especificarse como una cadena literal, - * como una expresin de caracteres. Debe incluir la extensin del - * archivo y puede opcionalmente incluir la unidad de disco y el camino. - * - * El uso de los caracteres comodines '*' y '?' esta permitido. - * - * Los comandos SET DEFAULT y SET PATH no afectan la operatoria de este - * comando. - * El archivo debe ser considerado cerrado por el sistema operativo, - * antes de que ste pueda ser borrado. - * $EXAMPLES$ - * ERASE C:\autoexec.bat // slo es una broma, no lo intente! - * ERASE C:/temp/read.txt - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Este comando es compatible con CA-Cl*pper. - * $SEEALSO$ - * CURDIR(),FILE(),FERASE(),ERASE - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * __TYPEFILE() - * $CATEGORY$ - * Data input and output - * $ONELINER$ - * Muestra el contenido de un archivo en la consola y/o impresora - * $SYNTAX$ - * __TYPEFILE( , [] ) --> NIL - * $ARGUMENTS$ - * Es el nombre del archivo a visualizar. - * Si el archivo tiene una extensin, esta debe ser - * especificada (no hay valor por defecto). - * - * Es un valor lgico opcional que especifica a donde - * debera ir la salida: - * (.F.) salida solamente a la pantalla - * (.T.) salida a pantalla e impresora. - * Por defecto es (.F.). - * $RETURNS$ - * __TYPEFILE() siempre devuelve NIL. - * $DESCRIPTION$ - * La funcin __TYPEFILE() muestra el contenido de un archivo de texto - * en la pantalla, con una opcin para enviar esta informacin tambin - * a la impresora. - * El archivo es visualizado tal como est sin ningn encabezado - * formateo previo. - * - * Si no contiene ningn camino path, __TYPEFILE() tratar - * de encontrar primero el archivo en el directorio indicado por - * SET DEFAULT y luego entonces en todos los directorios indicados por - * SET PATH. - * Si el archivo , no puede ser encontrado ocurrir un error - * en tiempo de ejecucin. - * - * Use SET CONSOLE OFF para suprimir la salida por pantalla. - * Usted puede pausar la salida usando , y pulsando cualquier - * tecla para continuar. - * - * La funcin __TYPEFILE() es usada en el preprocesamiento del comando - * TYPE. - * $EXAMPLES$ - * Los siguientes ejemplos asumen que un archivo con el nombre - * mitexto.dat existe en todos los caminos especificados, un error de - * ejecucin podra ser visualizado de no ser as. - * - * // Visualiza el archivo mitexto.dat en la pantalla - * __TYPEFILE( "mitexto.dat" ) - * - * // Visualiza el archivo mitexto.dat en la pantalla e impresora - * __TYPEFILE( "mitexto.dat", .T. ) - * - * // Visualiza el archivo mitexto.dat en la impresora solamente - * SET CONSOLE OFF - * - * __TYPEFILE( "mitexto.dat", .T. ) - * - * SET CONSOLE ON - * - * $STATUS$ - * R - * $COMPLIANCE$ - * __TYPEFILE() trabaja exactamente como __TYPEFILE() de CA-Cl*pper - * $FILES$ - * La librera asociada es rtl - * $SEEALSO$ - * COPY FILE,SET DEFAULT,SET PATH,SET PRINTER,TYPE - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * TYPE - * $CATEGORY$ - * Comando - * $ONELINER$ - * Visualiza el contenido de un archivo de texto - * $SYNTAX$ - * TYPE [TO PRINTER] [TO FILE ] - * $ARGUMENTS$ - * Es el nombre del archivo a visualizar. - * Si el archivo tiene una extensin, esta debe ser - * especificada (no hay valor por defecto). Esta puede ser - * especificada como literal de nombre de archivo como - * una expresin de caracteres encerrada entre parentesis - * - * TO PRINTER es una clusula opcional que especifica que la salida - * debera ir a la pantalla e impresora. - * - * TO FILE Copia el archivo fuente tambin - * a un archivo. Si ninguna extensin es dada (.txt) es - * agregada al archivo de salida. - * puede ser especificado como literal de - * nombre de archivo como una expresin de caracteres - * encerrada entre parntesis. - * $DESCRIPTION$ - * El comando TYPE muestra el contenido de un archivo de texto en la - * pantalla, con una opcin para enviar esta informacin tambin - * a la impresora a un archivo alternativo. - * El archivo es visualizado tal como est sin ningn encabezado - * formateo previo. - * - * Si no contiene ningn camino path, TYPE tratar - * de encontrar primero el archivo en el directorio indicado por - * SET DEFAULT y luego entonces en todos los directorios indicados por - * SET PATH. - * Si el archivo , no puede ser encontrado ocurrir un error - * en tiempo de ejecucin. - * - * Si no contiene ningn camino path, este es creado en - * directorio indicado en SET DEFAULT. - * - * Use SET CONSOLE OFF para suprimir la salida por pantalla. - * Usted puede pausar la salida usando , y pulsando cualquier - * tecla para continuar. - * $EXAMPLES$ - * Los siguientes ejemplos asumen que un archivo con el nombre - * mitexto.dat existe en todos los caminos especificados, un error de - * ejecucin podra ser visualizado de no ser as. - * - * // Visualiza el archivo mitexto.dat en la pantalla - * TYPE mitexto.dat - * - * // Visualiza el archivo mitexto.dat en la pantalla e impresora - * TYPE mitexto.dat TO PRINTER - * - * // Visualiza el archivo mitexto.dat en la impresora solamente - * SET CONSOLE OFF - * - * TYPE mitexto.dat TO PRINTER - * - * SET CONSOLE ON - * - * // Visualiza el archivo mitexto.dat en la pantalla y lo enva al - * // archivo mireporte.txt - * TYPE mitexto.dat TO FILE MiReporte - * - * $STATUS$ - * R - * $COMPLIANCE$ - * TYPE trabaja exactamente como el comando TYPE de CA-Cl*pper - * $SEEALSO$ - * COPY FILE,SET DEFAULT,SET PATH,SET PRINTER,__TYPEFILE() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * CURDIR() - * $CATEGORY$ - * Bajo Nivel - * $ONELINER$ - * Retorna el nombre del directorio actual del Sistema Operativo - * $SYNTAX$ - * CURDIR( [] ) --> cPath - * $ARGUMENTS$ - * Letra del disco del Sistema Operativo - * $RETURNS$ - * Devuelve , el nombre del directorio actual - * $DESCRIPTION$ - * Esta funcin devuelve el nombre del directorio actual del Sistema - * Operativo para un drive especificado. - * Si no es especificado, el drive al que se encuentra - * actualmente loggeado conectado ser usado. - * - * Esta funcin no debera devolver las barras de separacin de - * directorio que se encuentren por delante y por detrs del directorio, - * sino slo el nombre. - * Si un error ha sido detectado por la funcin, el directorio actual - * del Sistema Operativo es el raiz, el valor de la funcin podra ser - * un byte nulo (NULL). - * $EXAMPLES$ - * ? CURDIR() - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera asociada es rtl - * $SEEALSO$ - * FILE() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * COPY FILE - * $CATEGORY$ - * Comando - * $ONELINER$ - * Copia un archivo a uno nuevo a un dispositivo - * $SYNTAX$ - * COPY FILE TO | - * $ARGUMENTS$ - * es el nombre del archivo fuente de origen - * - * es el nombre del archivo destino - * - * es el nombre del dispositivo al que se va a enviar - * los datos. Si no existe el dispositivo se crea un - * archivo con ese nombre. - * $DESCRIPTION$ - * Este comando realiza una copia exacta del archivo y - * le asigna el nombre . - * Ambos archivos deben tener la extensin incluida, no se agrega - * ninguna por defecto. Ambos archivos pueden especificar tanto - * la unidad de disco como el camino. - * Tanto ambos archivos como el dispositivo pueden ser especificados - * como literal de nombre de archivo como una expresin de caracteres - * encerrada entre parentesis. - * - * El nombre del dispositivo puede ser tanto uno local como uno de red - * LPT1, \\SHARED\PRINTER, etc. - * - * Los comandos SET DEFAULT y SET PATH no afectan la operatoria de este - * comando. - * $EXAMPLES$ - * COPY FILE C:\harbour\tests\adirtest.prg TO C:\temp\adirtest.prg - * COPY FILE C:\harbour\utils\hbdoc\gennf.prg TO LPT1 - * $STATUS$ - * R - * $COMPLIANCE$ - * Este comando es compatible con CA-Cl*pper. - * $SEEALSO$ - * ERASE,RENAME,FRENAME(),FERASE(),COPY TO - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * HB_FEOF() - * $CATEGORY$ - * Bajo Nivel - * $ONELINER$ - * Chequea si el puntero del archivo esta al final (EOF). - * $SYNTAX$ - * HB_FEOF( ) --> lEsEOF - * $ARGUMENTS$ - * Manejador de archivo del sistema operativo - * El valor es obtenido del llamado a alguna de - * las funciones FCREATE() FOPEN(). - * $RETURNS$ - * Devuelve , un valor lgico verdadero (.T.) si el puntero - * del archivo de ese manejador est al final del archivo (EOF), - * falso (.F.) si an no lleg al fin del archivo. - * $DESCRIPTION$ - * Esta funcin testea si el archivo abierto correspondiente al - * manejador tiene el puntero del archivo al final del - * archivo, E-O-F. - * - * Si el manejador de archivo falta, no es numrico, el archivo no - * est abierto, entonces esta funcin devuelve .T. y establece el - * valor devuelto por FERROR() a -1 (FS_ERROR), a un valor de error - * dependiente del compilador de lenguaje C (EBADF EINVAL). - * $EXAMPLES$ - * nHandle := FOPEN('file.txt') - * - * ? FREADSTR( nHandle, 80) - * - * IF HB_FEOF( nHandle ) - * ? "Fue alcanzado el Fin-de-Archivo (EOF)" - * ELSE - * ? FREADSTR( nHandle, 80) - * ENDIF - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es una extensin de Harbour. - * $FILES$ - * La librera asociada es rtl - * $SEEALSO$ - * FERROR() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * DIRREMOVE() - * $CATEGORY$ - * Bajo Nivel - * $ONELINER$ - * Remueve un directorio - * $SYNTAX$ - * DIRCHANGE( ) --> nError - * $ARGUMENTS$ - * Es el nombre del directorio a remover - * $RETURNS$ - * Devuelve un valor numrico, es cero si el directorio fu - * exitosamente removido, de otro modo devuelve el nmero del ltimo - * error ocurrido. - * $DESCRIPTION$ - * Esta funcin intenta remover el directorio especificado en la - * variable . Si esta funcin falla, devolver el cdigo - * numrico del sistema operativo correspondiente al ltimo error - * ocurrido. - * Consulte la funcin FERROR() por una descripcin del error. - * $EXAMPLES$ - * cDir := ".\backup" - * nError := DIRREMOVE( cDir ) - * - * IF nError == 0 - * ? "La remocin del directorio [" + cDir + "] fu exitosa" - * ENDIF - * $TESTS$ - * Ver ejemplos - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es compatible con CA-Cl*pper 5.3 - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera asociada es rtl - * $SEEALSO$ - * MAKEDIR(),DIRCHANGE(),ISDISK(),DISKCHANGE(),DISKNAME(),FERROR() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * DIRCHANGE() - * $CATEGORY$ - * Bajo Nivel - * $ONELINER$ - * Cambia el directorio activo - * $SYNTAX$ - * DIRCHANGE( ) --> nError - * $ARGUMENTS$ - * Es el nombre del directorio al cual Ud. desea cambiarse - * $RETURNS$ - * Devuelve un valor numrico, es cero si el directorio fu - * exitosamente cambiado, de otro modo devuelve el nmero del ltimo - * error ocurrido. - * $DESCRIPTION$ - * Esta funcin intenta cambiar el directorio actual a otro especificado - * en la variable . Si esta funcin falla, devolver el - * cdigo numrico del sistema operativo correspondiente al ltimo error - * ocurrido. - * Consulte la funcin FERROR() por una descripcin del error. - * $EXAMPLES$ - * cDir := "\temp" - * nError := DIRCHANGE( cDir ) - * - * IF nError == 0 - * ? "El cambio al directorio [" + cDir + "] fu exitoso" - * ENDIF - * $TESTS$ - * Ver ejemplos - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es compatible con CA-Cl*pper 5.3 - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera asociada es rtl - * $SEEALSO$ - * MAKEDIR(),DIRREMOVE(),ISDISK(),DISKCHANGE(),DISKNAME(),FERROR() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * MAKEDIR() - * $CATEGORY$ - * Bajo Nivel - * $ONELINER$ - * Crea un nuevo directorio - * $SYNTAX$ - * MAKEDIR( ) --> nError - * $ARGUMENTS$ - * Es el nombre del directorio que Ud. desea crear - * $RETURNS$ - * Devuelve un valor numrico, es cero si el directorio fu - * exitosamente creado, de otro modo devuelve el nmero del ltimo - * error ocurrido. - * $DESCRIPTION$ - * Esta funcin intenta crear un nuevo directorio con el nombre - * especificado en la variable . Si esta funcin falla, - * devolver el cdigo numrico del sistema operativo correspondiente - * al ltimo error ocurrido. - * Consulte la funcin FERROR() por una descripcin del error. - * $EXAMPLES$ - * cDir := "Temp" - * nError := MAKEDIR( cDir) - * IF nError == 0 - * ? "La creacin del directorio [" + cDir + "] fu exitosa" - * ENDIF - * $TESTS$ - * Ver ejemplos - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es compatible con CA-Cl*pper 5.3 - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera asociada es rtl - * $SEEALSO$ - * DIRCHANGE(),DIRREMOVE(),ISDISK(),DISKCHANGE(),DISKNAME(),FERROR() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * ISDISK() - * $CATEGORY$ - * Bajo Nivel - * $ONELINER$ - * Verifica si un drive est listo - * $SYNTAX$ - * ISDISK( ) --> lExito - * $ARGUMENTS$ - * Una letra de drive que sea vlida - * $RETURNS$ - * Devuelve un valor lgico , es verdadero (.T.) si el drive - * est listo, falso (.F.) si no est listo. - * $DESCRIPTION$ - * Esta funcin intenta acceder a un drive. Si el aceso al drive fu - * Es til para funcines de respaldo back-up, as Ud. puede determinar - * si el drive que va a recibir los datos a resguardar est listo no. - * Si esta funcin falla, devolver el cdigo numrico del sistema - * operativo correspondiente al ltimo error ocurrido. - * Consulte la funcin FERROR() por una descripcin del error. - * $EXAMPLES$ - * 1) Testea el drive A: - * - * IF ISDISK("A") - * ? "El Drive est listo " - * ENDIF - * - * - * 2) Testea el drive B: - * cDrive := "B" - * - * IF ! ISDISK( cDrive ) - * ? "El Drive [" + cDrive + ":] No est disponible" - * ENDIF - * $TESTS$ - * Ver ejemplos - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es compatible con CA-Cl*pper 5.3 - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera asociada es rtl - * $SEEALSO$ - * DIRCHANGE(),MAKEDIR(),DIRREMOVE(),DISKCHANGE(),DISKNAME() - * $END$ - */ - - - diff --git a/harbour/examples/hbdoc/examples/es/garbage.txt b/harbour/examples/hbdoc/examples/es/garbage.txt deleted file mode 100644 index 56cd497d39..0000000000 --- a/harbour/examples/hbdoc/examples/es/garbage.txt +++ /dev/null @@ -1,447 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2000 Alejandro de Grate - * Documentacin en Espaol de: - * Readme, hb_gcAlloc(), hb_gcFree(), hb_gcLockItem(), - * hb_gcUnlockItem(), hb_gcCollectAll(), hb_gcItemRef(), HB_GCALL() - * - * Copyright 2000 brian Brian Hays - * Documentacin en Ingls de: - * Readme, hb_gcAlloc(), hb_gcFree(), hb_gcLockItem(), - * hb_gcUnlockItem(), hb_gcCollectAll(), hb_gcItemRef(), HB_GCALL() - * - * Vea COPYING por los trminos de la licencia. - * - */ - - -/* $DOC$ - * $FUNCNAME$ - * Colector de memoria - * $CATEGORY$ - * Documento - * $ONELINER$ - * Lame con informacin de la recoleccin de memoria. - * $DESCRIPTION$ - * El recolector de memoria (Garbage Collector GC) usa la siguiente - * lgica: - * - primero recolectar todas las ubicaciones de memoria que puedan - * constituirse en "basura" - * - luego inspeccionar todas las variables, por si esos bloques estn - * todava referenciados. - * - * Note que slo arrays, objetos y bloques de cdigo son recolectados - * porque esos son los nicos tipos de datos que pueden causar: - * auto-referencias - * ( a [1] : = a ) - * referencias circulares: - * ( a[1] := b; b[1] := c; c[1] := a ) - * que no pueden ser apropiadamente desasignadas por un simple conteo - * de referencia. - * - * Como todas las variables en Harbour son almacenadas dentro de algunas - * tablas disponibles (eval stack, tabla de memvars y array de variables - * estticas), entonces chequear si la referencia es todava activa es - * bastante fcil y no requiere ningn tratamiento especial durante la - * la asignacin de memoria. Adicionalmente el recolector de memoria - * inspecciona algunos datos internos usados por la implementacin de - * objetos de Harbour que tambin almacena algunos valores que pueden - * contener referencias de memoria. Estos datos son usados para inicia- - * lizar variables de instancia de la clase, y son almacenadas en - * variables compartidas por la clase. - * - * En casos especiales cuando el valor de una variable de Harbour es - * almacenada internamente en algn area esttica (a nivel de lenguaje - * C asembler), por ejemplo SETKEY() almacena bloques de cdigo que - * sern evaluados cuando se presione una tecla, el recolector de - * memoria no ser capaz de inspeccionar esos valores porque este no - * conoce su ubicacin. Esto podra ocasionar que algunos bloques de - * memoria sean liberados prematuramente. Para prevenir la prematura - * desasignacin de esos bloques ellos deben ser bloqueados para el - * recolector de memoria. - * - * Para ello se definen distintos estados del bloque de memoria: - * - * #define HB_GC_UNLOCKED 0 // desbloqueado - * #define HB_GC_LOCKED 1 // No recolectar el bloque de memoria - * #define HB_GC_USED_FLAG 2 // bit para la bandera usado/no usado - * - * El bloque de memoria puede ser bloqueado con hb_gcLockItem(), mtodo - * recomendado si un tem de estructura es usado con la funcin - * hb_gcLock() si un puntero directo a memoria es usado. - * El bloque de memoria puede ser desbloqueado por hb_gcUnlockItem() - * hb_gcUnlock(). - * - * Ntese sin embargo que todas las variables pasadas a una funcin de - * bajo nivel son pasadas mediante la pila de evaluacin (eval stack), - * as ellas no necesitan bloquearse durante la llamada a la funcin. - * El bloqueo puede ser requerido, si un valor pasado es copiado dentro - * de algn rea esttica para hacerla disponible para otras funciones - * de bajo nivel, llamadas despus de la salida de la funcin que - * almacena el valor. Esto es requerido porque el valor es removido de - * la pila de evaluacin despus de la llamada a la funcin y esta no - * puede seguir siendo referenciada por otras variables. - * - * Sin embargo la inspeccin de todas las variables puede ser una - * operacin de un gran consumo de tiempo. Esto requiere que todos los - * arrays asignados tengan que ser recorridos a travs de todos sus - * elementos para encontrar ms arrays. - * Tambin todos los bloques de cdigo son inspeccionados, en busca de - * variables locales separadas que ellos estan referenciando. Por esta - * esta razn, la busqueda por bloques de memoria no referenciados es - * realizada durante los estados inactivos. - * - * El estado inactivo es el estado cuando no hay un cdigo real de la - * aplicacin ejecutndose. Por ejemplo, el cdigo del usuario es - * detenido durante 0.1 segundo por INKEY(0.1) - Harbour esta chequeando - * slo el teclado durante este tiempo. Esto deja sin embargo suficiente - * tiempo para muchas otras tareas en segundo plano. Una de esas tareas - * en segundo plano, puede ser la bsqueda de bloques de memoria no - * referenciados. - * - * Asignando memoria - * ----------------- - * - * El recolector de memoria, recoge bloques de memoria asignados con - * llamadas a la funcin hb_gcAlloc(). La memoria asignada por - * hb_gcAlloc() debera ser liberada con la funcin hb_gcFree(). - * - * - * Bloqueando memoria - * ------------------ - * - * La memoria asignada con hb_gcAlloc() debera ser bloqueada para - * prevenir una automtica liberacin como un puntero de memoria si no - * es almacenado dentro de una variable a nivel de Harbour. Todos los - * valores de Harbour (items), almacenados internamente en reas - * estticas de lenguaje C deben ser bloqueadas. - * Vea hb_gcLockItem() y hb_gcUnlockItem() para ms informacin. - * - * - * La recolecin de memoria - * ------------------------ - * - * Durante la bsqueda de memoria no referenciada, el recolector de - * memoria (RM) est usando un algoritmo llamado "mark & sweep", marcar - * y barrer. Este es realizado en tres etapas: - * - * 1) Marcar todos los bloques asignados por el RM con un bandera: - * "sin uso" - * - * 2) barrer (buscar) todos los lugares conocidos y limpiar las banderas - * sin uso por los bloques de memoria que son referenciados all; - * - * 3) finalizar recolectando por desasignacin de todos los bloques de - * memoria que an estan marcados como sin uso y que no estn bloqueados. - * - * Para acelerar las cosas un poco, la etapa de marca es simplificada - * por la inversin del significado de la bandera "sin uso". Despus de - * la desasignacin de los bloques sin uso, todos los bloques todava - * activos son marcados con la bandera "usado" as nosotros podemos - * invertir el significado de esta bandera al estado "sin uso" en la - * prxima recolecin. - * Todos los bloques de memoria nuevos sin bloquear son automtica- - * mente marcados como "sin uso" usando la bandera actual, lo cual - * asegura que todos los bloques de memoria son marcados con la misma - * bandera antes de que la etapa de barrido comience. - * - * Ver hb_gcCollectAll() y hb_gcItemRef() - * - * - * Llamando al recolector de memoria desde cdigo Harbour - * ------------------------------------------------------ - * - * El RM puede ser llamado directamente desde un programa en Harbour. - * Esto es til en situaciones donde no hay estados inactivos - * disponibles la aplicacin esta trabajando en un bucle sin - * interaccin con el usuario y hay muchas asignaciones de memoria. - * Vea HB_GCALL() por una explicacin de como llamar a esta funcin - * desde el cdigo de Harbour. - * $SEEALSO$ - * hb_gcAlloc(),hb_gcFree(),hb_gcLockItem(),hb_gcUnlockItem(),hb_gcCollectAll(),hb_gcItemRef(),HB_GCALL(),HB_IDLESTATE() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_gcAlloc() - * $CATEGORY$ - * Colector de memoria - * $ONELINER$ - * Asigna memoria que ser recolectada por el recolector de memoria. - * $SYNTAX$ - * #include - * void *hb_gcAlloc( ULONG ulSize, HB_GARBAGE_FUNC_PTR pCleanupFunc ); - * $ARGUMENTS$ - * es el tamao solicitado del bloque de memoria. - * - * es un Puntero a la funcin HB_GARBAGE_FUNC que ser - * llamada directamente antes de la liberacin del bloque - * de memoria sin uso NULL. Esta funcin debera - * liberar toda otra memoria asignada y almacenada dentro - * del bloque de memoria. - * Por ejemplo, esta libera todos los items almacenados dentro del array - * La funcin recibe un slo parmetro: el puntero a la memoria asignada - * por hb_gcAlloc(). - * $RETURNS$ - * Devuelve un puntero a la memoria asignada esta generar un error - * interno irrecuperable. - * $DESCRIPTION$ - * hb_gcAlloc() es usada para asignar la memoria que ser rastreada por - * el RM. Este permite una apropiada liberacin de memoria en el caso - * de variables auto-referenciadas con referencias cruzadas a nivel - * de Harbour. - * La memoria asignada con esta funcin debera ser liberada con la - * funcin hb_gcFree() esta ser automticamente desasignada por el - * RM si no esta bloqueada si no esta referenciada por alguna - * variable a nivel de Harbour. - * $EXAMPLES$ - * Vea ../source/vm/arrays.c - * - * PHB_BASEARRAY pArr = (PHB_BASEARRAY) : - * hb_gcAlloc( sizeof( HB_BASEARRAY), ; - * hb_arrayReleaseGarbage ); - * $STATUS$ - * C - * $COMPLIANCE$ - * Esta funcin es una extensin de Harbour. - * $PLATFORMS$ - * Todas - * $FILES$ - * Archivo fuente: ../source/vm/garbage.c - * $SEEALSO$ - * hb_gcFree(),hb_gcLockItem(),hb_gcUnlockItem() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_gcFree() - * $CATEGORY$ - * Colector de memoria - * $ONELINER$ - * Libera la memoria que fu asignada con hb_gcAlloc(). - * $SYNTAX$ - * void hb_gcFree( void *pMemoryPtr ); - * $ARGUMENTS$ - * es el puntero a la memoria a liberar. Este puntero de - * memoria debe ser asignado con la funcin hb_gcAlloc(). - * $RETURNS$ - * Nada. - * $DESCRIPTION$ - * La funcin hb_gcFree() es usada para liberar la memoria que fu - * asignada con la funcin hb_gcAlloc(). - * $EXAMPLES$ - * Vea ../source/vm/arrays.c - * hb_gcFree( (void *) pBaseArray ); // puntero al array a liberar - * $STATUS$ - * C - * $COMPLIANCE$ - * Esta funcin es una extensin de Harbour. - * $PLATFORMS$ - * Todas - * $FILES$ - * Archivo fuente: ../source/vm/garbage.c - * $SEEALSO$ - * hb_gcAlloc(),hb_gcLockItem(),hb_gcUnlockItem() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_gcLockItem() - * $CATEGORY$ - * Colector de memoria - * $ONELINER$ - * Bloquea la memoria para prevenir la desasignacin por el RM. - * $SYNTAX$ - * void hb_gcLockItem( HB_ITEM_PTR pItem ); - * $ARGUMENTS$ - * es el puntero a la estructura item que ser bloqueada. - * El item pasado puede ser de cualquier tipo de datos, aunque - * arrays de objetos y bloques de cdigos son bloqueados - * solamente. Otros tipos de datos no necesitan bloqueo, as - * que ellos son simplemente ignorados. - * $RETURNS$ - * Nada. - * $DESCRIPTION$ - * La funcin hb_gcLockItem() es usada para bloquear el puntero de - * memoria almacenado en la estructura item pasada. Este suprime la - * liberacin de memoria si el RM no encuentra alguna referencia a - * este puntero. - * El RM almacena un contador de bloqueo y cada llamada a esta funcin - * incrementa el contador. El item es bloqueado si el contador es mayor - * que cero. - * $EXAMPLES$ - * Vea ../source/rtl/setkey.c - * // bloquea un codeblock para prevenir la liberacin por el RM - * hb_gcLockItem( sk_list_tmp-> pAction ); - * $STATUS$ - * C - * $COMPLIANCE$ - * Esta funcin es una extensin de Harbour. - * $PLATFORMS$ - * Todas - * $FILES$ - * Archivo fuente: ../source/vm/garbage.c - * $SEEALSO$ - * hb_gcAlloc(),hb_gcFree(),hb_gcUnlockItem() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_gcUnlockItem() - * $CATEGORY$ - * Colector de memoria - * $ONELINER$ - * Desbloquea la memoria para prevenir la liberacin por el RM - * $SYNTAX$ - * void hb_gcUnlockItem( HB_ITEM_PTR pItem ); - * $ARGUMENTS$ - * es el puntero a la estructura item que ser bloqueada. - * El item pasado puede ser de cualquier tipo de datos, aunque - * arrays de objetos y bloques de cdigos son bloqueados - * solamente. Otros tipos de datos no necesitan bloqueo as - * que ellos son simplemente ignorados. - * $RETURNS$ - * Nada. - * $DESCRIPTION$ - * La funcin hb_gcUnlockItem() es usada para desbloquear el puntero de - * memoria almacenado en la estructura item pasada, que fu previamente - * bloqueada con una llamada a hb_gcLockItem(). Esto permite liberar - * la memoria durante la recoleccin de memoria sin uso si el RM no - * encuentra ninguna referencia a este puntero. El RM almacena el - * contador de bloqueo, cada llamda a esta funcin decrementa el - * contador. - * Esta funcin no libera la memoria almacenada dentro del item, - * la memoria debe ser desasignada sin embargo durante la recolecin - * de memoria sin uso ms cercana, si el contador de bloqueo es - * igual a cero y el puntero de memoria no es referenciado por - * ninguna variable a nivel de Harbour. - * $EXAMPLES$ - * Vea ../source/rtl/setkey.c - * hb_gcUnlockItem( sk_list_tmp-> pAction ); // libera el item - * $STATUS$ - * C - * $COMPLIANCE$ - * Esta funcin es una extensin de Harbour. - * $PLATFORMS$ - * Todas - * $FILES$ - * Archivo fuente: ../source/vm/garbage.c - * $SEEALSO$ - * hb_gcAlloc(),hb_gcFree(),hb_gcLockItem() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_gcCollectAll() - * $CATEGORY$ - * Colector de memoria - * $ONELINER$ - * Examina todos los bloques de memoria y libera la memoria sin uso. - * $SYNTAX$ - * void hb_gcCollectAll( void ); - * $ARGUMENTS$ - * Ninguno. - * $RETURNS$ - * Nada. - * $DESCRIPTION$ - * Esta funcin examina la pila de evaluacin, las tablas de memvars, - * el array de variables estticas y las tablas de clases creadas en - * busca de bloques de memoria referenciados. Despus de examinar todos - * los bloques de memoria sin uso y los bloques que no estan bloqueados, - * son liberados. - * $STATUS$ - * C - * $COMPLIANCE$ - * Esta funcin es una extensin de Harbour. - * $PLATFORMS$ - * Todas - * $FILES$ - * Archivo fuente: ../source/vm/garbage.c - * $SEEALSO$ - * hb_gcAlloc(),hb_gcFree(),hb_gcLockItem(),hb_gcUnlockItem() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_gcItemRef() - * $CATEGORY$ - * Colector de memoria - * $ONELINER$ - * Marca la memoria para prevenir la desasignacin por el RM. - * $SYNTAX$ - * void hb_gcItemRef( HB_ITEM_PTR pItem ); - * $ARGUMENTS$ - * es el puntero a la estructura item que ser examinada. - * El item pasado puede ser de cualquier tipo de datos, aunque - * arrays de objetos y bloques de cdigos son bloqueados - * solamente. Otros tipos de datos no necesitan bloqueo as - * que ellos son simplemente ignorados. - * $RETURNS$ - * Nada. - * $DESCRIPTION$ - * El recolector de memoria usa la funcin hb_gcItemRef() durante la - * inspeccin de punteros de memoria referenciados. - * Esta funcin chequea el tipo del item pasado y examina recursivamente - * todos los otros bloques de memoria referenciados por este item, si - * ste es un array un objeto un bloque de cdigo - * - * NOTA: Esta funcin es reservada para el recolector de memoria (RM) - * solamente. Esta NO debe ser llamada desde el cdigo del usuario - * llamarla puede causar resultados impredecibles (bloques de - * memoria referenciados por el item pasado pueden ser liberados - * prematuramente durante la recolecin de memoria ms cercana). - * $STATUS$ - * C - * $COMPLIANCE$ - * Esta funcin es una extensin de Harbour. - * $PLATFORMS$ - * Todas - * $FILES$ - * Archivo fuente: ../source/vm/garbage.c - * $SEEALSO$ - * hb_gcAlloc(),hb_gcFree(),hb_gcLockItem(),hb_gcUnlockItem() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * HB_GCALL() - * $CATEGORY$ - * Colector de memoria - * $ONELINER$ - * Inspecciona la memoria y libera los bloques de memoria sin uso - * $SYNTAX$ - * HB_GCALL() - * $ARGUMENTS$ - * Ninguno - * $RETURNS$ - * NIL - * $DESCRIPTION$ - * Esta funcin libera todos los bloques de memoria que son considerados - * como "basura". - * $STATUS$ - * Harbour - * $COMPLIANCE$ - * Esta funcin es una extensin de Harbour. - * $PLATFORMS$ - * Todas - * $FILES$ - * Archivo fuente: ../source/vm/garbage.c - * $SEEALSO$ - * hb_gcCollectAll() - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/gnulice.txt b/harbour/examples/hbdoc/examples/es/gnulice.txt deleted file mode 100644 index 61add9b958..0000000000 --- a/harbour/examples/hbdoc/examples/es/gnulice.txt +++ /dev/null @@ -1,500 +0,0 @@ -/* - * $Id$ - */ - -/* $DOC$ - * $FUNCNAME$ - * Licencia GNU - * $CATEGORY$ - * Documento - * $ONELINER$ - * Licencia GNU Parte 1 - * $DESCRIPTION$ - * - * GNU General Public License - * Licencia Pblica General - * Versin 2, Junio de 1991 - * - * Copyright (C) 1989, 1991 Free Software Foundation, Inc. - * 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA - * - * ----------------------------------------------------------------- - * - * Traduccin al Espaol : Diciembre de 2001 por - * Jos Mara Sarchaga Fischer - * Contribuciones: - * 13-Dic-2002 Fabin Rodrguez - * Ene 2003 Alejandro de Grate - * - * This is an unofficial translation of the GNU General Public - * License into spanish. It was not published by the Free Software - * Foundation, and does not legally state the distribution terms for - * software that uses the GNU GPL--only the original English text of - * the GNU GPL does that. However, we hope that this translation - * will help spanish speakers understand the GNU GPL better. - * - * ----------------------------------------------------------------- - * - * Esta es una traduccin NO oficial de la "GNU General Public - * License" al espaol. No fu publicada por la "FSF Free Software - * Foundation", y no respalda legalmente los trminos de - * distribucin del software que utiliza la "GNU GPL", slo el texto - * original en ingls lo hace. Sin embargo esperamos que esta - * traduccin ayude a las personas de habla hispana a entender mejor - * la "GPL". - * - * ----------------------------------------------------------------- - * - * Toda persona tiene permiso de copiar y distribuir copias fieles - * de este documento de licencia, pero no se permite hacer - * modificaciones. - * - * - * PREAMBULO - * - * Los contratos de licencia de la mayor parte del software estn - * diseados para quitarle su libertad de compartir y modificar - * dicho software. En contraste, la "GNU General Public License" - * pretende garantizar su libertad de compartir y modificar el - * software "libre", esto es para asegurar que el software es libre - * para todos sus usuarios. Esta licencia pblica general se aplica - * a la mayora del software de la "FSF Free Software Foundation" - * (Fundacin para el Software Libre) y a cualquier otro programa de - * software cuyos autores as lo establecen. Algunos otros programas - * de software de la Free Software Foundation estn cubiertos por la - * "LGPL Library General Public License" (Licencia Pblica General - * para Libreras), la cual puede aplicar a sus programas tambin. - * - * Cuando hablamos de software libre, nos referimos a libertad, no - * precio. Nuestras licencias "General Public Licenses" estn - * diseadas para asegurar que: - * - * 1. usted tiene la libertad de distribuir copias del software - * libre (y cobrar por ese sencillo servicio si as lo desea) - * 2. recibir el cdigo fuente (o tener la posibilidad de obtenerlo - * si as lo desea) - * 3. que usted puede modificar el software o utilizar partes de - * l en nuevos programas de software libre - * 4. que usted est enterado de que tiene la posibilidad de hacer - * todas estas cosas. - * - * Para proteger sus derechos, necesitamos hacer restricciones que - * prohiban a cualquiera denegarle estos derechos o a pedirle que - * renuncie a ellos. Estas restricciones se traducen en algunas - * responsabilidades para usted, si distribuye copias del software, - * si lo modifica. - * - * Por ejemplo, si usted distribuye copias de un programa, ya sea - * gratuitamente o por algn importe, usted debe dar al que recibe - * el software todos los derechos que usted tiene sobre el mismo. - * Debe asegurarse tambin que reciban el cdigo fuente o bin que - * puedan obtenerlo si lo desean. Y por ltimo debe mostrarle a esa - * persona estos trminos, para que conozca los derechos de que goza. - * - * Nosotros protegemos sus derechos en 2 pasos: (1) protegiendo los - * derechos de autor del software y (2) ofreciendole este contrato - * de licencia que le otorga permiso legal para copiar, distribuir - * y modificar el software. - * - * Adems, para la proteccin de los autores de software y la - * nuestra, queremos asegurarnos de que toda persona entienda que no - * existe ninguna garanta del software libre. Si el software es - * modificado por alguien y lo distribuye, queremos que quienes lo - * reciban sepan que la copia que obtuvieron no es la original, por - * lo que cualquier problema provocado por quien realiz la - * modificacin no afectar la reputacin del autor original. - * - * Finalmente, cualquier programa de software libre es constantemente - * amenazado por las patentes de software. Deseamos evadir el peligro - * de que los re-distribuidores de un programa de software libre - * obtenga individualmente los derechos de patente con el fin de - * volver dicho programa propietario. Para prevenir esto, hemos - * dejado en claro que cualquier patente deber ser licenciada para - * el uso libre de toda persona o que no est licenciada del todo. - * - * A continuacin se describen con precisin los trminos y - * condiciones para copiar, distribuir y modificar el software. - * - * ----------------------------------------------------------------- - * - * - * TERMINOS Y CONDICIONES PARA COPIA, MODIFICACION Y DISTRIBUCION - * - * 0. Esta licencia aplica a cualquier programa o trabajo que - * contenga una nota puesta por el propietario de los derechos del - * trabajo estableciendo que su trabajo puede ser distribuido bajo - * los trminos de esta "GPL General Public License". - * El "Programa", utilizado en lo subsecuente, se refiere a - * cualquier programa o trabajo original, y el "trabajo basado en - * el Programa" significa ya sea el Programa o cualquier trabajo - * derivado del mismo bajo la ley de derechos de autor: es decir, - * un trabajo que contenga el Programa o alguna porcin de l, ya - * sea ntegra o con modificaciones y/o traducciones a otros idiomas. - * De aqu en adelante "traduccin" estar incluida (pero no - * limitada a) en el trmino "modificacin", y la persona a la que - * se aplique esta licencia ser llamado "usted". - * - * Otras actividades que no sean copia, distribucin o - * modificacin no estn cubiertas en esta licencia y estn fuera de - * su alcance. El acto de ejecutar el programa no est restringido, - * y la salida de informacin del programa est cubierta slo si su - * contenido constituye un trabajo basado en el Programa (es - * independiente de si fue resultado de ejecutar el programa). Si - * esto es cierto no depende de la funcin del programa. - * - * - * 1. Usted puede copiar y distribuir copias fieles del cdigo - * fuente del programa tal como lo recibi, en cualquier medio, - * siempre que proporcione de manera conciente y apropiada una nota - * de derechos de autor y una declaracin de no garanta, adems de - * mantener intactas todas las notas que se refieran a esta licencia - * y a la ausencia de garanta, y que le proporcione a las dems - * personas que reciban el programa una copia de esta licencia junto - * con el Programa. - * Usted puede aplicar un cargo por el acto fsico de transferir una - * copia, y ofrecer proteccin de garanta por una cuota, lo cual no - * compromete a que el autor original del Programa responda por tal - * efecto. - * - * - * 2. Usted puede modificar su copia del Programa o de cualquier - * parte de el, formando as un trabajo basado en el Programa, y - * copiar y distribuir tales modificaciones o bin trabajar bajo los - * trminos de la seccin 1 arriba descrita, siempre que cumpla con - * las siguientes condiciones: - * - * A. Usted debe incluir en los archivos modificados notas - * declarando que modific dichos archivos y la fecha de los - * cambios. - * B. Usted debe notificar que ese trabajo que distribuye contiene - * totalmente o en partes al Programa, y que debe ser licenciado - * como un conjunto sin cargo alguno a cualquier otra persona - * que reciba sus modificaciones bajo los trminos de esta - * Licencia. - * C. Si el programa modificado lee normalmente comandos - * interactivamente cuando es ejecutado, usted debe presentar un - * aviso, cuando el programa inicie su ejecucin en ese modo - * interactivo de la forma ms ordinaria, que contenga una nota - * de derechos de autor y un aviso de que no existe garanta - * alguna (o que s existe si es que usted la proporciona) y que - * los usuarios pueden redistribuir el programa bajo esas - * condiciones, e informando al usuario como puede ver una copia - * de esta Licencia. (Excepcin: si el programa en s es - * interactivo pero normalmente no muestra notas, su trabajo - * basado en el Programa no tiene la obligacin de mostrar tales - * notas) - * - * Estos requerimientos aplican al trabajo modificado como un todo. - * Si existen secciones identificables de tal trabajo que no son - * derivadas del Programa original, y pueden ser razonablemente - * consideradas trabajos separados e independientes como tal, - * entonces esta Licencia y sus trminos no aplican a dichas - * secciones cuando usted las distribuye como trabajos separados. - * Pero cuando usted distribuye las mismas secciones como parte de - * un todo, que es un trabajo basado en el Programa, la distribucin - * del conjunto debe ser bajo los trminos de esta Licencia, cuyos - * permisos para otras personas que obtengan el software se - * extienden para todo el software, as como para cada parte de l, - * independientemente de quin lo escribi. - * - * No es la intencin de esta seccin de reclamar derechos o pelear - * sus derechos sobre trabajos hechos enteramente por usted, en lugar - * de eso, la intencin es ejercer el derecho de controlar la - * distribucin de los trabajos derivados o colectivos basados en el - * Programa. - * - * Adicionalmente, el simple agregado de otro trabajo NO basado en - * el Programa al Programa en cuestin (o a un trabajo basado en el - * Programa) en algn medio de almacenamiento no pone el otro - * trabajo bajo el alcance de esta Licencia. - * - * - * 3. Usted puede copiar y distribuir el Programa ( un trabajo - * basado en l, bajo la Seccin 2) en cdigo objeto en forma - * de ejecutable bajo los trminos de las secciones 1 y 2 arriba - * descritas siempre que cumpla los siguientes requisitos: - * - * A. Acompaarlo con el correspondiente cdigo fuente legible por - * la mquina, que debe ser distribudo bajo los trminos de las - * secciones 1 y 2 y en un medio comunmente utilizado para el - * intercambio de software, - * B. Acompaarlo con una oferta escrita, vlida por al menos 3 - * aos y para cualquier persona, por un cargo no mayor al costo - * que conlleve la distribucin fsica del cdigo fuente - * correspondiente en un medio comunmente utilizado para el - * intercambio de software, - * C. Acompaarlo con la informacin que usted recibi sobre la - * oferta de distribucin del cdigo fuente correspondiente. - * (Esta alternativa est permitida slo para distribucin - * no-comercial y slo si usted recibi el Programa en cdigo - * objeto o en forma de ejecutable con tal oferta de acuerdo - * a la subseccin b anterior) - * - * El cdigo fuente de un trabajo significa la forma preferida de - * hacer modificaciones al mismo. Para un trabajo ejecutable, un - * cdigo fuente completo significa todo el cdigo fuente de todos - * los mdulos que contiene, ms cualquier archivo de definicin de - * interfases, ms los programas utilizados para controlar la - * compilacin y la instalacin del ejecutable. - * Sin embargo, como excepcin especial, no se requiere que el - * cdigo fuente distribudo incluya cualquier cosa que no sea - * normalmente distribuda con las componentes mayores (compilador, - * kernel, etc.) del sistema operativo en el cual el ejecutable - * corre, a menos de que una componente en particular acompae al - * ejecutable. - * - * Si la distribucin del ejecutable del cdigo objeto se hace - * ofreciendo acceso a copiar desde un lugar designado, entonces el - * ofrecer acceso equivalente para copiar el cdigo fuente desde el - * mismo lugar se considera distribucin del cdigo fuente, aunque - * las dems personas no copien el cdigo fuente junto con el cdigo - * objeto. - * - * - * 4. Usted no puede copiar, modificar, sub-licenciar ni distribuir - * el Programa a menos que sea expresamente bajo esta Licencia, de - * otra forma cualquier intento de copiar, modificar, sub-licenciar - * distribuir el programa es nulo, y automticamente causar la - * prdida de sus derechos bajo esta Licencia. Sin embargo, cualquier - * persona que haya recibido copias derechos de usted bajo esta - * Licencia no vern terminadas sus Licencias ni sus derechos - * perdidos mientras ellas continen cumpliendo los trminos de - * esta Licencia. - * - * - * 5. Usted no est obligado a aceptar esta Licencia, dado que no la - * ha firmado. Sin embargo, nada le otorga el permiso de modificar - * distribuir el Programa ni sus trabajos derivados. Estas acciones - * estn prohibidas por la ley si usted no acepta esta Licencia. - * Sin embargo, modificando o distribuyendo el Programa (o cualquier - * trabajo basado en el Programa) indica su aceptacin de esta - * Licencia y de todos sus trminos y condiciones para copiar, - * distribuir o modificar el Programa y/o trabajos basados en l. - * - * - * 6. Cada vez que usted redistribuye el Programa (o cualquier - * trabajo basado en el Programa), la persona que lo recibe - * automticamente recibe una licencia del autor original para - * copiar, distribuir o modificar el Programa sujeto a estos - * trminos y condiciones. Usted no puede imponer ninguna - * restriccin adicional a las personas que reciban el Programa - * sobre los derechos que en esta Licencia se les otorga. - * Usted no es responsable de forzar a terceras personas en l - * cumplimiento de esta Licencia. - * - * $SEEALSO$ - * Licencia GNU Parte 2 - * $END$ - */ - -/* - * $DOC$ - * $FUNCNAME$ - * Licencia GNU Parte 2 - * $CATEGORY$ - * Documento - * $ONELINER$ - * Licencia GNU Parte 2 - * $DESCRIPTION$ - * - * 7. Si como consecuencia de un veredicto de un juzgado o por el - * alegato de infringir una patente por cualquier otra razn (no - * limitado slo a cuestiones de patentes) se imponen condiciones - * sobre usted que contradigan los trminos y condiciones de esta - * Licencia, stas no le excusan de los trminos y condiciones aqu - * descritos. Si usted no puede distribuir el producto cumpliendo - * totalmente con las obligaciones concernientes a la resolucin - * oficial y al mismo tiempo con las obligaciones que se describen - * en este contrato de Licencia, entonces no podr distribuir ms - * este producto. Por ejemplo, si una licencia de patente no - * permitir la distribucin del Programa de forma libre de - * regalas (sin pago de regalas) por parte de quienes lo reciban - * directa o indirectamente, entonces la nica forma de cumplir con - * ambas obligaciones es renunciar a la distribucin del mismo. - * - * Si cualquier parte de esta seccin resulta invlida, inaplicable - * no obligatoria bajo cualquier circunstancia en particular, la - * tendencia de esta es a aplicarse, y la seccin completa se - * aplicar bajo otras circunstancias. - * - * La intencin de esta seccin no es la de inducirlo a infringir - * ninguna ley de patentes, ni tampoco infringir algn reclamo de - * derechos, ni discutir la validez de tales reclamos; esta seccin - * tiene el nico propsito de proteger la integridad del sistema de - * distribucin del software libre, que est implementado por - * prcticas de licencia pblica. Mucha gente ha hecho generosas - * contribuciones a la amplia gama de software distribuido bajo este - * sistema favoreciendo as la constante aplicacin de este sistema - * de distribucin; es decisin del autor/donador si su Programa - * ser distribudo utilizando este u otro sistema de distribucin, - * y la persona que recibe el software no puede obligarlo a hacer - * ninguna eleccin en particular. - * Esta seccin pretende dejar muy en claro lo que se cree que ser - * una consecuencia del resto de esta Licencia. - * - * - * 8. Si la distribucin y/o el uso del Programa se restringe a - * algunos pases ya sea por patentes, interfases protegidas por - * derechos de autor, el propietario original de los derechos de - * autor que ubica su Programa bajo esta Licencia puede agregar una - * restriccin geogrfica de distribucin explcita excluyendo - * los pases que aplique, dando como resultado que su distribucin - * slo se permita en los pases no excludos. En tal caso, esta - * Licencia incorpora la limitacin como si hubiera sido escrita en - * el cuerpo de esta misma Licencia. - * - * - * 9. La "FSF Free Software Foundation" puede publicar versiones - * nuevas o revisadas de la "GPL General Public License" de uno a - * otro momento. Estas nuevas versiones mantendrn el espritu de la - * presente versin, pero pueden diferir en la inclusin de nuevos - * problemas en la manera de tocar los problemas aspectos ya - * presentes. - * - * Cada versin tendr un nmero de versin que la distinga. Si el - * Programa especifica un nmero de versin para esta Licencia que - * aplique a l y "cualquier versin subsecuente", usted tiene la - * opcin de seguir los trminos y condiciones de dicha versin o de - * cualquiera de las posteriores versiones publicadas por la "FSF". - * Si el programa no especifica una versin en especial de esta - * Licencia, usted puede elegir entre cualquiera de las versiones - * que han sido publicadas por la "FSF". - * - * - * 10. Si usted desea incorporar partes del Programa en otros - * Programas de software libre cuyas condiciones de distribucin - * sean distintas, deber escribir al autor solicitando su - * autorizacin. Para programas de software protegidas por la "FSF - * Free Software Foundation", deber escribir a la "FSF" solicitando - * autorizacin, en ocasiones hacemos excepciones. Nuestra decisin - * ser guiada por dos metas principales: - * - * A. mantener el estado de libertad de todos los derivados de - * nuestro software libre - * B. promover el uso comunitario y compartido del software en - * general - * - * - * - * NO EXISTE GARANTIA ALGUNA - * ----------------------------------------------------------------- - * - * 11. DEBIDO A QUE EL PROGRAMA SE OTORGA LIBRE DE CARGOS Y REGALIAS, - * NO EXISTE NINGUNA GARANTIA PARA EL MISMO HASTA DONDE LO PERMITA - * LA LEY APLICABLE. A EXCEPCION DE QUE SE INDIQUE OTRA COSA, LOS - * PROPIETARIOS DE LOS DERECHOS DE AUTOR PROPORCIONAN EL PROGRAMA - * "COMO ESTA" SIN NINGUNA GARANTIA DE NINGUN TIPO, YA SEA EXPLICITA - * O IMPLICITA, INCLUYENDO, PERO NO LIMITADA A, LAS GARANTIAS QUE - * IMPLICA EL MERCADEO Y EJERCICIO DE UN PROPOSITO EN PARTICULAR. - * CUALQUIER RIESGO DEBIDO A LA CALIDAD Y DESEMPEO DEL PROGRAMA ES - * TOMADO COMPLETAMENTE POR USTED. SI EL SOFTWARE MUESTRA ALGUN - * DEFECTO, USTED CUBRIRA LOS COSTOS DE CUALQUIER SERVICIO, - * REPARACION O CORRECCION DE SUS EQUIPOS Y/O SOFTWARE QUE REQUIERA. - * - * 12. EN NINGUN CASO NI BAJO NINGUNA CIRCUNSTANCIA EXCEPTO BAJO - * SOLICITUD DE LA LEY O DE COMUN ACUERDO POR ESCRITO, NINGUN - * PROPIETARIO DE LOS DERECHOS DE AUTOR NI TERCERAS PERSONAS QUE - * PUDIERAN MODIFICAR Y/O REDISTRIBUIR EL PROGRAMA COMO SE PERMITE - * ARRIBA, SERAN RESPONSABLES DE LOS DAOS CORRESPONDIENTES AL USO - * O IMPOSIBILIDAD DE USAR EL PROGRAMA, SIN IMPORTAR SI SON DAOS - * GENERALES, ESPECIALES, INCIDENTALES O CONSEQUENTES - * CORRESPONDIENTES AL USO O IMPOSIBILIDAD DE USAR EL PROGRAMA - * (INCLUYENDO PERO NO LIMITADO A LA PERDIDA DE INFORMACION O - * DETERIORO DE LA MISMA AFECTANDOLO A USTED, A TERCERAS PERSONAS - * QUE SEA POR FALLAS EN LA OPERACION DEL PROGRAMA O SU INTERACCION - * CON OTROS PROGRAMAS) INCLUSIVE SI TAL PROPIETARIO U OTRAS - * PERSONAS HAYAN SIDO NOTIFICADAS DE TALES FALLAS Y DE LA - * POSIBILIDAD DE TALES DAOS. - * - * - * FIN DE TERMINOS Y CONDICIONES - * - * ----------------------------------------------------------------- - * - * - * Apendice: Cmo aplicar estos trminos a sus nuevos programas ? - * - * Si usted desarrolla un nuevo Programa y desea que sea lo ms - * pblico posible, el mejor modo de hacerlo es haciendolo Software - * Libre donde toda persona lo puede redistribuir y cambiar bajo - * estos trminos. - * - * Para hacer esto, agregue las siguientes notas al programa. - * Es ms seguro agregarlas al inicio de cada archivo del cdigo - * fuente para notificar de manera ms efectiva la ausencia de - * garanta; y cada archivo debe de contener al menos la lnea de - * "Copyright" o derechos de autor y una referencia de donde se - * puede encontrar la nota completa. - * ejemplo: - * - * Una lnea que contenga el nombre del programa y una idea de lo - * que hace. - * Copyright (C) - * - * Este programa es Software Libre; usted puede redistribuirlo - * y/o modificarlo bajo los trminos de la "GNU General Public - * License" como lo publica la "FSF Free Software Foundation", - * (a su eleccin) de cualquier versin posterior. - * - * Este programa es distribuido con la esperanza de que le ser - * til, pero SIN NINGUNA GARANTIA; incluso sin la garanta - * implcita por el MERCADEO o EJERCICIO DE ALGUN PROPOSITO en - * particular. Vea la "GNU General Public License" para ms - * detalles. - * - * Usted debe haber recibido una copia de la "GNU General Public - * License" junto con este programa, si no, escriba a la "FSF - * Free Software Foundation, Inc.", 59 Temple Place - Suite 330, - * Boston, MA 02111-1307, USA. - * - * Adicionalmente agregue informacin de cmo contactarle por - * correo electrnico y convencional. - * Si el programa es interactivo, ponga en la salida del programa - * una nota corta al iniciar el modo interactivo como en siguiente - * ejemplo: - * - * Gnomovision version 69, Copyright (C) - * Gnomovision no tiene NINGUNA GARANTIA, para ms detalles - * escriba 'show w'. Este es Software Libre, y usted est - * permitido para redistribuirlo bajo ciertas condiciones; - * escriba 'show c' para ms detalles. - * - * Estos hipoteticos comandos 'show w' y 'show c' debern mostrar - * las partes apropiadas de la "GPL General Public License". - * Por supuesto, los comandos que utilice pueden ser distintos, - * pueden ser incluso "clicks" del ratn, opciones de mens etc, lo - * ms apropiado para su programa. - * - * Usted debera hacer que su jefe de proyecto (si trabaja como - * programador) o su escuela, si aplica, firme una "declaracin de - * derechos de autor" para el programa, si se necesita. - * Aqu hay un ejemplo, modifique los nombres: - * - * "Yoyodyne, Inc., por este medio renuncia a todo inters - * en los derechos de autor en el programa 'Gnomovision' - * (lo que make pasa al compilador) escrito por James Hacker." - * - * Ty Coon, 1 de Abril 1989 - * Ty Coon, Presidente de Yoyodyne, Inc - * - * - * Esta Licencia Pblica General no permite incorporar su programa - * en programas propietarios. Si su programa es una librera de - * subrutinas, puede ser ms til permitir que se ligue en tiempo de - * compilacin o ejecucin a aplicaciones propietarias. Si esto es - * lo que quiere hacer, use la licencia Pblica General para - * Libreras en lugar de esta licencia. - * - * Consultas y dudas sobre FSF y GNU dirigirlas a gnu@gnu.org - * - * Free Software Foundation, Inc., - * 59 Temple Place - Suite 330, Boston, MA 02111, USA - * Updated: 3 Jan 2000 rms - * - * $SEEALSO$ - * Licencia,Licencia GNU - * $END$ - */ - - - diff --git a/harbour/examples/hbdoc/examples/es/harbext.txt b/harbour/examples/hbdoc/examples/es/harbext.txt deleted file mode 100644 index 784cdd4128..0000000000 --- a/harbour/examples/hbdoc/examples/es/harbext.txt +++ /dev/null @@ -1,115 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2002 Alejandro de Grate - * Traduccin al Espaol de harbext.txt - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * Extensiones a Harbour - * $CATEGORY$ - * Documento - * $ONELINER$ - * Extensiones a Harbour - * $DESCRIPTION$ - * Extensiones al lenguaje: - * ------------------------ - * - * * Generacin y manejo de Clases. - * - * Clipper solamente permite la creacin de objetos desde unas pocas - * clases estndar. - * - * En Harbour, Ud. puede crear sus propias Clases completas con - * Mtodos, Variables de Instancia, Variables de Clase y Herencia. - * Aplicaciones enteras pueden ser designadas y codificadas en un - * enfoque Orientado a Objetos. - * - * - * * @() - * - * Retorna el puntero (la direccin) a la funcin. - * - * El valor retornado no es til a nivel de la programacin de la - * aplicacin pero es usado a bajo nivel para implementar el cdigo - * Orientado a Objeto (Internamente, el mtodo de una Clase es una - * funcin esttica, no hay un smbolo para ella, entonces esta es - * accedida mediante su direccin). - * - * - * * Clase TGetList - * - * Soporte Orientado a Objetos para el manejo de GetList. - * - * - * * ProcName() soporte para el nombre de Mtodos de las Clases. - * - * Los Mtodos de Clases pueden ser recuperados de la pila de llamada. - * - * - * * Memory() tiene nuevos valores de retorno. - * - * Vea hbmemory.ch - * - * - * * TRANSFORM() --> Agregado de nueva funcin para el formateo de - * cadenas: - * - * @0 Hace el pad con ceros una cadena numrica. - * - * - * * STOD() --> dDate - * - * Nueva funcin que convierte una cadena en el formato yyyymmdd a - * valor de fecha (date). - * - * - * * Declaracin STRONG TYPE Opcional en tiempo de compilacin (y - * advertencias en tiempo de compilacin de TYPE MISMATCH) - * - * Example: LOCAL/STATIC Variable AS ... - * - * - * * El depurador de Harbour provee de nuevas clases interesantes: - * - * - La Clase TDbWindow podra ser la fundacin de una ventana de - * visualizacin multiplatforma. - * - * - La Clase TForm - * - * - La Clase TDbMenu implementa ambos menes desplegables y - * (pulldown & popup) - * - * - * Funcionalidad mejorada de la RTL: - * --------------------------------- - * - * - DIRECTORY( , , ) - * - * El tercer parmetro es un parmetro de Harbour (opcional) e indica - * que en aquellas plataformas que soportan nombres largos de archivo, - * Ud. solicita lo que podra considerarse el equivalente al nombre - * 8.3 Podra afectar ADIR() y DIR si ellas fueron modificadas para - * tomar ventaja de esto. Esta retornar nombres largos si el sistema - * operativo lo soporta. - * - * - * - HB_DISKSPACE( , ) - * - * El segundo parmetro es un parmetro de Harbour (opcional) e indica - * el tipo de informacin del disco que esta siendo requerida. - * vea en ../doc/es/diskspac.txt para mayor informacin. - * - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/hb_apiln.txt b/harbour/examples/hbdoc/examples/es/hb_apiln.txt deleted file mode 100644 index 793b86d5fa..0000000000 --- a/harbour/examples/hbdoc/examples/es/hb_apiln.txt +++ /dev/null @@ -1,625 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2003 Alejandro de Grate - * Documentacin en Espaol de: - * Readme, Archivo de cabecera para la API de Idiomas - * hb_langRegister(), hb_langDeRegister(), hb_langFind(), hb_langFindPos(), - * hb_langSelect(), hb_langSelectID(), hb_langDGetItem(), hb_langID(), - * hb_langName(), hb_langDGetErrorDesc(), HB_LANG_REQUEST() - * - * Copyright 1999 Victor Szakats - * Header file for the Language API - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * Idiomas Soportados - * $CATEGORY$ - * Documentacin - * $ONELINER$ - * Lame con las caractersticas del manejo de Idiomas en Harbour - * $DESCRIPTION$ - * Introduccin - * El mdulo de idiomas esta compuesto por una estructura de items que - * permite el uso de distintos Idiomas con Harbour de una forma - * unificada. Actualmente se definen un mximo de 64 Idiomas. - * #define HB_LANG_MAX_ 64 // en ../source/rtl/langapi.c - * - * Se define tambin un array que contiene los idiomas soportados. - * static PHB_LANG s_langList[ HB_LANG_MAX_ ]; - * - * Todos los idiomas comparten una estructura comn que facilita la - * portabilidad. Esta estructura es del tipo esttica (s_lang) y esta - * definida dentro de los archivos correspondientes a cada idioma, que - * se encuentran en el subdirectorio ../source/rtl/lang/*.c - * Por ejemplo ./source/rtl/lang/msges.c // Espaol - * - * Esta estructura esta definida como un array (pItemList[]) de punteros - * a void y consta actualmente de 116 elementos (nmeros y cadenas de - * caracteres) divididos en unidades temticas: A, B, C, D, E, F - * typedef struct _HB_LANG - * { - * void * pItemList[ HB_LANG_ITEM_MAX_ ]; - * } HB_LANG, * PHB_LANG, * HB_LANG_PTR; - * - * A. Identificador de Idioma [Offset 0-5] - * -------------------------- - * [0] Dos caracteres ISO que caracterizan al idioma. Por ejemplo "ES" - * identifica al idioma espaol. - * [1] El nombre del Idioma en Ingls. Por ejemplo "Spanish". - * [2] El nombre del Idioma en su lengua nativa. Por ejemplo "Espaol" - * [3] Identificacin segn la RFC. Por ejemplo "ES" - * [4] Pgina de Cdigos igual a las usadas en DOS y Windows. - * Por ejemplo 850, 437, etc. - * [5] Nmero de la Versin en uso. Por ejemplo 1.5 - * - * - * B. Nombre de meses [Offset 6-17]: "Enero", "Febrero", etc. - * ------------------ - * - * C. Nombre de los das [Offset 18-24]: "Domingo", "Lunes", etc. - * --------------------- - * - * D. Mensajes de nacin (natmsg) compatibles con Clipper [Offset 25-37] - * --------------------- - * - * E. Mensajes de error - * -------------------- - * - Nombre con la descripcin de errores [Offset 38-88]: - * Por ejemplo: "Error de argumento" - * - * - Errores internos [Offset 89-111]: - * Por ejemplo: "hb_xgrab no puede asignar memoria" - * - * F. Diversos textos [Offset 112-115]. - * ------------------ - * Cada uno de estos elementos es accedido por su posicin en el array. - * - * Se define una macro para publicar un idioma tanto a nivel de C como - * de Harbour. - * #define HB_LANG_ANNOUNCE( id ) HB_FUNC( HB_LANG_##id ) {} - * - * - * Idioma por defecto - * ------------------ - * Por defecto Harbour siempre enlaza el mdulo de Idioma Ingls. - * Para setear un mdulo de Idioma por defecto a ser usado por Harbour - * se debe definir en el archivo ../include/hbsetup.h la macro - * HB_LANG_DEFAULT a un identificador de lenguaje vlido. - * - * (Notese que este puede tambin estar bajo la forma de una macro). - * #ifndef HB_LANG_DEFAULT - * #define HB_LANG_DEFAULT EN - * #endif - * - * Funciones - * --------- - * Harbour implementa el uso de distintos Idiomas a travs de funciones - * de bajo nivel en lenguaje C. Las cuales se describen ms abajo - * Estas funciones permiten acceder a estructuras que soportan los - * distintos datos que componen cada Idioma, generalmente pasando - * punteros a esas estructuras. - * - * /* Manejo de lista de lenguajes */ - * - * extern HB_BOOL hb_langRegister ( PHB_LANG lang ); - * extern HB_BOOL hb_langDeRegister ( char * pszID ); - * extern int hb_langFindPos ( char * pszID ) - * extern PHB_LANG hb_langFind ( char * pszID ); - * - * - * /* Seleccin del lenguaje por defecto y bsqueda de datos */ - * - * extern PHB_LANG hb_langSelect ( PHB_LANG lang ); - * extern char * hb_langSelectID ( char * pszID ); - * extern void * hb_langDGetItem ( int iIndex ); - * extern char * hb_langID ( void ); - * extern char * hb_langName ( void ); - * - * - * /* Interfaz de Compatibilidad */ - * - * extern char * hb_langDGetErrorDesc ( ULONG ulIndex ); - * - * $SEEALSO$ - * hb_langRegister(), hb_langDeRegister(), hb_langFind(), hb_langFindPos(), - * hb_langSelect(), hb_langSelectID(), hb_langDGetItem(), hb_langID(), - * hb_langName(), hb_langDGetErrorDesc(), HB_LANG_REQUEST() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_langRegister() - * $CATEGORY$ - * API de Idiomas - * $ONELINER$ - * Registra un Idioma por defecto. - * $SYNTAX$ - * C Prototype - * - * #include - * hb_langRegister( PHB_LANG lang ) --> ( HB_BOOL )bResult - * $ARGUMENTS$ - * es un puntero a la estructura del Idioma, que se va a - * registrar como idioma por defecto. - * $RETURNS$ - * Retorna el valor lgico indicando si fu satisfactoria la - * operacin. - * $DESCRIPTION$ - * La funcin hb_langRegister() es una funcin de bajo nivel escrita - * en lenguaje C que permite registrar un idioma por defecto para ser - * usado con Harbour. - * $EXAMPLES$ - * HB_LANG_ANNOUNCE( ES ); - * - * HB_CALL_ON_STARTUP_BEGIN( hb_lang_Init_ES ) - * hb_langRegister( &s_lang ); - * HB_CALL_ON_STARTUP_END( hb_lang_Init_ES ) - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a la API. - * $FILES$ - * El archivo fuente es ../source/rtl/langapi.c - * La librera asociada es lang - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_langDeRegister, hb_langSelect(), hb_langSelectID() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_langDeRegister() - * $CATEGORY$ - * API de Idiomas - * $ONELINER$ - * Elimina un Idioma registrado. - * $SYNTAX$ - * C Prototype - * - * #include - * hb_langDeRegister( char * pszID ) --> ( HB_BOOL )bResult - * $ARGUMENTS$ - * Puntero a una cadena terminada con '\0' que contiene la - * identificacin del idioma a ser removido. - * $RETURNS$ - * Retorna el valor lgico indicando si fu satisfactoria la - * operacin. - * $DESCRIPTION$ - * La funcin hb_langDeRegister() es una funcin de bajo nivel en - * lenguaje C que permite eliminar un idioma de una lista para ser - * usado con Harbour. - * Para ello utiliza a la funcin hb_langFindPos( pszID ) que devuelve - * la posicin en una lista de idiomas (si existe) el valor -1 si no - * se pudo encontrar. Si se encontr cambia su valor a NULL. - * $EXAMPLES$ - * Vea langapi.c - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a la API. - * $FILES$ - * El archivo fuente es ../source/rtl/langapi.c - * La librera asociada es lang - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_langRegister(), hb_langSelect(), hb_langSelectID() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_langFindPos() - * $CATEGORY$ - * API de Idiomas - * $ONELINER$ - * Busca en una lista de idiomas por un identificador de Lenguaje. - * $SYNTAX$ - * C Prototype - * - * #include - * hb_langFindPos( char * pszID ) --> int iPos - * $ARGUMENTS$ - * Puntero a una cadena terminada con '\0' que contiene la - * identificacin del idioma. - * $RETURNS$ - * Retorna , la posicin dentro de la estructura si existe -1 - * en caso contrario. - * $DESCRIPTION$ - * La funcin hb_langFindPos() es una funcin de bajo nivel en - * lenguaje C que realiza la bsqueda de un identificador de idioma de - * una lista. Para ello compara el parmetro con la cadena de - * caracteres que se encuentra en la posicin HB_LANG_ITEM_ID_ID del - * array pItemList. - * Esta devuelve la posicin en una lista de idiomas (si existe) el - * valor -1 si no se pudo encontrar. Si se encontr cambia su valor a - * NULL. - * $EXAMPLES$ - * Vea langapi.c - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a la API. - * $FILES$ - * El archivo fuente es ../source/rtl/langapi.c - * La librera asociada es lang - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_langFind(), hb_langSelectID() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_langFind() - * $CATEGORY$ - * API de Idiomas - * $ONELINER$ - * Busca en la lista de idiomas por un identificador de Lenguaje. - * $SYNTAX$ - * C Prototype - * - * #include - * hb_langFind( char * pszID ) --> ( PHB_LANG )pResult - * $ARGUMENTS$ - * Puntero a una cadena terminada con '\0' que contiene la - * identificacin del idioma. - * $RETURNS$ - * Retorna un puntero a la estructura del idioma solicitado - * si lo encuentra NULL en caso contrario. - * $DESCRIPTION$ - * La funcin hb_langFind() es una funcin de bajo nivel en lenguaje C - * que realiza la bsqueda de un identificador de idioma de una lista. - * Para ello utiliza a la funcin hb_langFindPos( pszID ) que devuelve - * la posicin en una lista de idiomas (si existe) el valor -1 si no - * se pudo encontrar. - * Si se encontr hb_langFind() devuelve un puntero a esa estructura - * NULL si no se encontr. - * $EXAMPLES$ - * Vea langapi.c - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a la API. - * $FILES$ - * El archivo fuente es ../source/rtl/langapi.c - * La librera asociada es lang - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_langFindPos(), hb_langID(), hb_langSelectID() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_langSelect() - * $CATEGORY$ - * API de Idiomas - * $ONELINER$ - * Selecciona un mdulo de mensajes especfico a una nacionalidad. - * $SYNTAX$ - * C Prototype - * - * #include - * hb_langSelect( PHB_LANG lang ) --> ( PHB_LANG )pResult - * $ARGUMENTS$ - * es un puntero a la estructura del nuevo Idioma que se esta - * tratando de seleccionar. - * $RETURNS$ - * Retorna un puntero a la estructura del Idioma actualmente - * en uso, antes de establecer el nuevo idioma solicitado . - * $DESCRIPTION$ - * La funcin hb_langSelect() es una funcin de bajo nivel en lenguaje - * C que establece un nuevo idioma para su uso a travs del pasaje de - * un puntero a la estructura del nuevo Idioma. Si el puntero no es - * vlido la funcin no hace nada. - * $EXAMPLES$ - * Vea langapi.c - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a la API. - * $FILES$ - * El archivo fuente es ../source/rtl/langapi.c - * La librera asociada es lang - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_langSelectID(), hb_langID(), hb_langRegister() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_langSelectID() - * $CATEGORY$ - * API de Idiomas - * $ONELINER$ - * Selecciona un mdulo de mensajes correspondiente a un Idioma. - * $SYNTAX$ - * C Prototype - * - * #include - * hb_langSelectID( char * pszID ) --> ( char * )pszResult - * $ARGUMENTS$ - * Puntero a una cadena terminada con '\0' que contiene la - * identificacin del idioma. - * $RETURNS$ - * - * $DESCRIPTION$ - * La funcin - * $EXAMPLES$ - * Vea langapi.c - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a la API. - * $FILES$ - * El archivo fuente es ../source/rtl/langapi.c - * La librera asociada es lang - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_langSelect(), hb_langID() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_langDGetItem() - * $CATEGORY$ - * API de Idiomas - * $ONELINER$ - * Obtiene un elemento del array de items del Idioma. - * $SYNTAX$ - * C Prototype - * - * #include - * hb_langDGetItem( int iIndex ) --> ( void * )pResult - * $ARGUMENTS$ - * es la posicin del elemento en el array del idioma. - * El valor de debe estar comprendido entre 0 y - * HB_LANG_ITEM_MAX_ - * $RETURNS$ - * Retorna un puntero a void, que previo a su uso debe - * hacerse un casting al tipo apropiado. En general a: (char *) - * $DESCRIPTION$ - * La funcin hb_langDGetItem() es una funcin de bajo nivel escrita - * en lenguaje C que devuelve un puntero de uso general con el dato - * solicitado del array de idioma. - * $EXAMPLES$ - * Vea langapi.c - * if( s_lang ) - * return ( char * ) hb_langDGetItem( HB_LANG_ITEM_BASE_ID + - * HB_LANG_ITEM_ID_ID ); - * else - * return NULL; - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a la API. - * $FILES$ - * El archivo fuente es ../source/rtl/langapi.c - * La librera asociada es lang - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_langDGetErrorDesc(), hb_langID(), hb_langName() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_langID() - * $CATEGORY$ - * API de Idiomas - * $ONELINER$ - * Retorna el identificador ISO del idioma en uso. - * $SYNTAX$ - * C Prototype - * - * #include - * hb_langID( void ) --> ( char * )pszResult - * $ARGUMENTS$ - * Ninguno. - * $RETURNS$ - * Retorna un puntero a una cadena de caracteres terminada - * en '\0' con el identificador del idioma en uso. - * $DESCRIPTION$ - * La funcin hb_langID() es una funcin de bajo nivel en lenguaje C - * que devuelve un puntero a una cadena de caracteres correspondiente - * al identificador de 2 caracteres (ISO) del idioma actualmente en - * uso. - * Esta funcin es llamada por la funcin de Harbour, HB_LANGSELECT() - * $EXAMPLES$ - * Vea langapi.c - * HB_FUNC( HB_LANGSELECT ) - * { - * hb_retc( hb_langID() ); - * - * hb_langSelectID( hb_parc( 1 ) ); - * } - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a la API. - * $FILES$ - * El archivo fuente es ../source/rtl/langapi.c - * La librera asociada es lang - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_langSelectID(), hb_langName() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_langName() - * $CATEGORY$ - * API de Idiomas - * $ONELINER$ - * Obtiene informacin sobre el mdulo de lenguaje en uso. - * $SYNTAX$ - * C Prototype - * - * #include - * hb_langName( void ) --> ( char * )pszResult - * $ARGUMENTS$ - * Ninguno. - * $RETURNS$ - * Retorna un puntero a una cadena de caracteres terminada - * en '\0' con los datos del idioma actualmente en uso. - * La rutina llamadora debe encargarse de liberar el puntero pszName - * utilizado por esta funcin. - * $DESCRIPTION$ - * La funcin hb_langName() es una funcin de bajo nivel en lenguaje - * C que devuelve una cadena de caracteres con los datos del idioma en - * uso en la forma "Harbour Language: %s1 %s2 (%s3)", donde: - * - * %s1 es un puntero a una cadena de caracteres terminada en '\0' que - * contiene el identificador del idioma en uso como resultado de - * la llamada a la funcin: - * hb_langDGetItem( HB_LANG_ITEM_ID_ID). - * - * %s2 es un puntero a una cadena de caracteres terminada en '\0' que - * contiene el nombre del idioma en uso (en Ingls) como resultado - * de la llamada a la funcin: - * hb_langDGetItem( HB_LANG_ITEM_ID_NAME). - * - * %s3 es un puntero a una cadena de caracteres terminada en '\0' que - * contiene el nombre del idioma en uso (en lengua nativa) como - * resultado de la llamada a la funcin: - * hb_langDGetItem( HB_LANG_ITEM_ID_NAMENAT). - * - * Esta funcin es llamada por la funcin de Harbour HB_LANGNAME(), - * para realizar esta tarea. hb_langName() es meramente informativa. - * $EXAMPLES$ - * Vea langapi.c - * HB_FUNC( HB_LANGNAME ) - * { - * char * pszName = hb_langName(); - * hb_retc( pszName ); - * hb_xfree( pszName ); - * } - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a la API. - * $FILES$ - * El archivo fuente es ../source/rtl/langapi.c - * La librera asociada es lang - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_langDGetItem() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_langDGetErrorDesc() - * $CATEGORY$ - * API de Idiomas - * $ONELINER$ - * Obtiene una descripcin de error para un ndice del array de idioma. - * $SYNTAX$ - * C Prototype - * - * #include - * hb_langDGetErrorDesc( ULONG ulIndex ) --> ( char * )pszResult - * $ARGUMENTS$ - * es la posicin en el array del Idioma, como un (offset) - * desplazamiento a partir de HB_LANG_ITEM_BASE_ERRDESC. - * $RETURNS$ - * Retorna un puntero a una cadena de caracteres terminada - * en '\0' con la descripcin del error solicitado. - * $DESCRIPTION$ - * La funcin hb_langDGetErrorDesc() es una funcin de bajo nivel en - * lenguaje C que devuelve la descripcin del error solicitado, - * correspondiente a un valor numrico. - * La posicin del elemento que contiene la descripcin del error se - * calcula sumando a la macro HB_LANG_ITEM_BASE_ERRDESC el valor de - * . - * La descripcin puede correponder a un error interno de Harbour a - * uno externo. - * $EXAMPLES$ - * Vea langapi.c - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a la API. - * $FILES$ - * El archivo fuente es ../source/rtl/langapi.c - * La librera asociada es lang - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_langDGetItem() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * HB_LANG_REQUEST() - * $CATEGORY$ - * API de Idiomas - * $ONELINER$ - * Pseudofuncin para usar un identificador de idioma, en forma de macro - * $SYNTAX$ - * C Prototype (macro definition) - * - * #include - * HB_LANG_REQUEST( id ) --> - * - * // This hack is needed to force preprocessing if id is also a macro - * #define HB_LANG_REQUEST( id ) HB_LANG_REQUEST_( id ) - * #define HB_LANG_REQUEST_( id ) extern HB_FUNC( HB_LANG_##id ); \ - * void hb_lang_ForceLink( void ) \ - * { \ - * HB_FUNC_EXEC( HB_LANG_##id ); \ - * } - * - * // Macro to publish a specific language module, for both C - * // and Harbour level - * #define HB_LANG_ANNOUNCE( id ) HB_FUNC( HB_LANG_##id ) {} - * $ARGUMENTS$ - * Es el identificador del idioma a establecer - * $RETURNS$ - * Nada. - * $DESCRIPTION$ - * Este truco es necesario para forzar un pre-procesamiento si id es - * tambin una macro. - * La macro termina ejecutando la funcin HB_FUNC( HB_LANG_##id ) para - * el identificador . - * $EXAMPLES$ - * Vea langapi.c, hbapilng.h - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a la API. - * $FILES$ - * El archivo de cabecera es ../include/hbapilng.h - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * HB_LANG_ANNOUNCE(), HB_LANG_REQUEST_() - * $END$ - */ diff --git a/harbour/examples/hbdoc/examples/es/hb_set.txt b/harbour/examples/hbdoc/examples/es/hb_set.txt deleted file mode 100644 index dae9b85392..0000000000 --- a/harbour/examples/hbdoc/examples/es/hb_set.txt +++ /dev/null @@ -1,85 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las partes siguientes son la Propiedad de los autores individuales. - * www - http: / / www.harbour - project.org - * - * Copyright 1999 David G. Holm < dholm@jsd-llc.com > - * El archivo de Cabecera para el Set API - * - * Copyright 2000 Edison Suarez - * La traduccin de fichero hb_set.txt al espaol. - * - * Vea COPYING para los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_setInitialize () - * $CATEGORY$ - * Set API - * $ONELINER$ - * - * $SYNTAX$ - * Prototipo C - * - * #include - * hb_setInitialize( void ) --> void - * $ARGUMENTS$ - * - * $RETURNS$ - * - * $DESCRIPTION$ - * - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * El cumplimiento no es aplicable a las llamadas de API. - * $FILES$ - * La biblioteca es rtl - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_setRelease() - * $CATEGORY$ - * Set API - * $ONELINER$ - * - * $SYNTAX$ - * Prototipo C - * - * #include - * hb_setRelease( void ) --> void - * $ARGUMENTS$ - * - * $RETURNS$ - * - * $DESCRIPTION$ - * - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * El cumplimiento no es aplicable a las llamadas de API. - * $FILES$ - * La biblioteca es rtl - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/hb_vm.txt b/harbour/examples/hbdoc/examples/es/hb_vm.txt deleted file mode 100644 index c58ab82e86..0000000000 --- a/harbour/examples/hbdoc/examples/es/hb_vm.txt +++ /dev/null @@ -1,1001 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2000 Alejandro de Grate - * Documentacin en Espaol de: - * Archivo de cabecera para la API de la VM - * hb_vmInit(), hb_vmQuit(), hb_vmExecute(), hb_vmProcessSymbols() - * hb_vmSymbolInit_RT(), hb_vmRequestQuit(), hb_vmRequestEndProc() - * hb_vmRequestCancel(), hb_vmRequestBreak(), hb_vmRequestQuery() - * hb_vmMessage(), hb_vmDo(), hb_vmFunction(), hb_vmSend() - * hb_vmEvalBlock(), hb_vmEvalBlockV(), hb_vmPush(), hb_vmPushNil() - * hb_vmPushNumber(), hb_vmPushInteger(), hb_vmPushLong() - * hb_vmPushDouble(), hb_vmPushLogical(), hb_vmPushString() - * hb_vmPushDate(), hb_vmPushSymbol(), hb_vmPushPointer() - * hb_stackDispCall(), hb_stackPop() - * - * Copyright 1999 Antonio Linares - * Header file for the Virtual Machine API - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_vmInit() - * $CATEGORY$ - * Virtual machine API - * $ONELINER$ - * Inicializa la Mquina Virtual (Virtual machine) - * $SYNTAX$ - * C Prototype - * - * #include - * hb_vmInit( HB_BOOL bStartMainProc ) --> void - * $ARGUMENTS$ - * Valor lgico que indica si la VM se inicia en - * un mdulo principal secundario. - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * Inicializa la Mquina Virtual (Virtual machine) - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * La librera asociada es vm - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_vmQuit() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_vmQuit() - * $CATEGORY$ - * Virtual machine API - * $ONELINER$ - * Sale Inmediatamente de la Mquina Virtual - * $SYNTAX$ - * C Prototype - * - * #include - * hb_vmQuit( void ) --> int - * $ARGUMENTS$ - * Ninguno - * $RETURNS$ - * ERRORLEVEL - * $DESCRIPTION$ - * Ocasiona la Inmediata salida de la Mquina Virtual - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * La librera asociada es vm - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_vmInit() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_vmExecute() - * $CATEGORY$ - * Virtual machine API - * $ONELINER$ - * Invoca la Mquina Virtual - * $SYNTAX$ - * C Prototype - * - * #include - * hb_vmExecute( const BYTE * pCode, PHB_SYMB pSymbols ) --> void - * $ARGUMENTS$ - * puntero a cadena constante - * - * smbolo a procesar - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * La librera asociada es vm - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_vmDo(),hb_vmProcessSymbols() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_vmProcessSymbols() - * $CATEGORY$ - * Virtual machine API - * $ONELINER$ - * Inicializacin de smbolos estticos - * $SYNTAX$ - * C Prototype - * - * #include - * hb_vmProcessSymbols( PHB_SYMB pSymbols, USHORT uiSymbols ) --> void - * $ARGUMENTS$ - * - * - * - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * La librera asociada es vm - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_vmSymbolInit_RT(),hb_vmExecute() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_vmSymbolInit_RT() - * $CATEGORY$ - * Virtual machine API - * $ONELINER$ - * Inicializacin de smbolos de soporte de ejecucin - * $SYNTAX$ - * C Prototype - * - * #include - * hb_vmSymbolInit_RT( void ) --> void - * $ARGUMENTS$ - * Ninguno - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * La librera asociada es vm - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_vmProcessSymbols() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_vmRequestQuit() - * $CATEGORY$ - * Virtual machine API - * $ONELINER$ - * - * $SYNTAX$ - * C Prototype - * - * #include - * hb_vmRequestQuit( void ) --> void - * $ARGUMENTS$ - * Ninguno - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * La librera asociada es vm - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_vmRequestEndProc() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_vmRequestEndProc() - * $CATEGORY$ - * Virtual machine API - * $ONELINER$ - * - * $SYNTAX$ - * C Prototype - * - * #include - * hb_vmRequestEndProc( void ) --> void - * $ARGUMENTS$ - * Ninguno - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * La librera asociada es vm - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_vmRequestQuit(),hb_vmRequestCancel() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_vmRequestCancel() - * $CATEGORY$ - * Virtual machine API - * $ONELINER$ - * - * $SYNTAX$ - * C Prototype - * - * #include - * hb_vmRequestCancel( void ) --> void - * $ARGUMENTS$ - * Ninguno - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * La librera asociada es vm - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_vmRequestQuit(),hb_vmRequestBreak() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_vmRequestBreak() - * $CATEGORY$ - * Virtual machine API - * $ONELINER$ - * - * $SYNTAX$ - * C Prototype - * - * #include - * hb_vmRequestBreak( PHB_ITEM pItem ) --> void - * $ARGUMENTS$ - * - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * La librera asociada es vm - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_vmRequestQuit(),hb_vmRequestCancel() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_vmRequestQuery() - * $CATEGORY$ - * Virtual machine API - * $ONELINER$ - * - * $SYNTAX$ - * C Prototype - * - * #include - * hb_vmRequestQuery( void ) --> ( USHORT )usResult - * $ARGUMENTS$ - * Ninguno - * $RETURNS$ - * El resultado expresado como un entero corto sin signo - * $DESCRIPTION$ - * - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * La librera asociada es vm - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_vmRequestCancel() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_vmMessage() - * $CATEGORY$ - * Virtual machine API - * $ONELINER$ - * Enva un mensaje a un objeto - * $SYNTAX$ - * C Prototype - * - * #include - * hb_vmMessage( PHB_SYMB pSymMsg ) --> void - * $ARGUMENTS$ - * - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * La librera asociada es vm - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_vmSend() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_vmDo() - * $CATEGORY$ - * Virtual machine API - * $ONELINER$ - * Invoca la Mquina Virtual - * $SYNTAX$ - * C Prototype - * - * #include - * hb_vmDo( USHORT uiParams ) --> void - * $ARGUMENTS$ - * - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * La librera asociada es vm - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_vmExecute(),hb_vmFunction() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_vmFunction() - * $CATEGORY$ - * Virtual machine API - * $ONELINER$ - * Ejecuta una funcin guardando su resultado - * $SYNTAX$ - * C Prototype - * - * #include - * hb_vmFunction( USHORT uiParams ) --> void - * $ARGUMENTS$ - * - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * Ejecuta una funcin guardando su resultado - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * La librera asociada es vm - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_vmDo() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_vmSend() - * $CATEGORY$ - * Virtual machine API - * $ONELINER$ - * Enva un mensaje a un objeto - * $SYNTAX$ - * C Prototype - * - * #include - * hb_vmSend( USHORT uiParams ) --> void - * $ARGUMENTS$ - * - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * La librera asociada es vm - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_vmMessage() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_vmEvalBlock() - * $CATEGORY$ - * Virtual machine API - * $ONELINER$ - * Ejecuta el codeblock pasado sin argumentos - * $SYNTAX$ - * C Prototype - * - * #include - * hb_vmEvalBlock( PHB_ITEM pBlockItem ) --> ( PHB_ITEM )pResult - * $ARGUMENTS$ - * - * $RETURNS$ - * Un puntero a PHB_ITEM - * $DESCRIPTION$ - * - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * La librera asociada es vm - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_vmEvalBlockV() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_vmEvalBlockV() - * $CATEGORY$ - * Virtual machine API - * $ONELINER$ - * Ejecuta el codeblock pasado con argumentos - * $SYNTAX$ - * C Prototype - * - * #include - * hb_vmEvalBlockV( PHB_ITEM pBlockItem, USHORT uiArgCount, ... ) - * --> ( PHB_ITEM )pResult - * $ARGUMENTS$ - * - * - * Numero de argumentos, expresado como entero sin signo - * - * <...> Argumentos opcionales indicados arriba - * $RETURNS$ - * Un puntero a PHB_ITEM - * $DESCRIPTION$ - * - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * La librera asociada es vm - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_vmEvalBlock() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_vmPush() - * $CATEGORY$ - * Virtual machine API - * $ONELINER$ - * Empuja un item generico a la pila - * $SYNTAX$ - * C Prototype - * - * #include - * hb_vmPush( PHB_ITEM pItem ) --> void - * $ARGUMENTS$ - * - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * Empuja un item genrico a la pila de evaluacin - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * La librera asociada es vm - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_vmPushNil() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_vmPushNil() - * $CATEGORY$ - * Virtual machine API - * $ONELINER$ - * Pone NIL en el lugar de self - * $SYNTAX$ - * C Prototype - * - * #include - * hb_vmPushNil( void ) --> void - * $ARGUMENTS$ - * Ninguno - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * La librera asociada es vm - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_vmPush() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_vmPushNumber() - * $CATEGORY$ - * Virtual machine API - * $ONELINER$ - * Empuja un nmero en la pila y lo evala - * $SYNTAX$ - * C Prototype - * - * #include - * hb_vmPushNumber( double dNumber, int iDec ) --> void - * $ARGUMENTS$ - * Nmero de doble precisin para ser evaluado - * - * Numero entero para indicar las cifras decimales - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * Empuja un nmero en la pila y lo evala para decidir si es entero - * (int), entero largo (long) de doble precisin (double) - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * La librera asociada es vm - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_vmPushInteger(),hb_vmPushLong(),hb_vmPushDouble() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_vmPushInteger() - * $CATEGORY$ - * Virtual machine API - * $ONELINER$ - * Empuja un nmero entero corto a la pila - * $SYNTAX$ - * C Prototype - * - * #include - * hb_vmPushInteger( int iNumber ) --> void - * $ARGUMENTS$ - * Entero corto para ser evaluado - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * Empuja un nmero entero corto a la pila para su evaluacin - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * La librera asociada es vm - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_vmPushNumber(),hb_vmPushLong(),hb_vmPushDouble() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_vmPushLong() - * $CATEGORY$ - * Virtual machine API - * $ONELINER$ - * Empuja un nmero entero largo a la pila - * $SYNTAX$ - * C Prototype - * - * #include - * hb_vmPushLong( long lNumber ) --> void - * $ARGUMENTS$ - * Entero largo para ser evaluado - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * Empuja un nmero entero largo a la pila para su evaluacin. - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * La librera asociada es vm - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_vmPushNumber(),hb_vmPushInteger(),hb_vmPushDouble() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_vmPushDouble() - * $CATEGORY$ - * Virtual machine API - * $ONELINER$ - * Empuja un nmero doble a la pila - * $SYNTAX$ - * C Prototype - * - * #include - * hb_vmPushDouble( double lNumber, int iDec ) --> void - * $ARGUMENTS$ - * Nmero de doble precisin para ser evaluado - * - * Numero entero para indicar las cifras decimales - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * Empuja un nmero de doble precisin a la pila para su evaluacin - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * La librera asociada es vm - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_vmPushNumber(),hb_vmPushInteger(),hb_vmPushLong() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_vmPushLogical() - * $CATEGORY$ - * Virtual machine API - * $ONELINER$ - * Empuja un valor lgico a la pila - * $SYNTAX$ - * C Prototype - * - * #include - * hb_vmPushLogical( HB_BOOL bValue ) --> void - * $ARGUMENTS$ - * Valor logico - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * La librera asociada es vm - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_vmPushNumber(),hb_vmPushString() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_vmPushString() - * $CATEGORY$ - * Virtual machine API - * $ONELINER$ - * Empuja una cadena a la pila - * $SYNTAX$ - * C Prototype - * - * #include - * hb_vmPushString( char * szText, ULONG length ) --> void - * $ARGUMENTS$ - * puntero a una cadena de texto terminada en '\0' - * - * longitud de la cadena - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * Empuja una cadena a la pila - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * La librera asociada es vm - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_vmPushNumber(),hb_vmPushLogical() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_vmPushDate() - * $CATEGORY$ - * Virtual machine API - * $ONELINER$ - * Empuja una fecha representada como entero largo a la pila - * $SYNTAX$ - * C Prototype - * - * #include - * hb_vmPushDate( long lDate ) --> void - * $ARGUMENTS$ - * Entero largo representando una fecha - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * Empuja una fecha representada como entero largo a la pila - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * La librera asociada es vm - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_vmPushNumber(),hb_vmPushLogical() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_vmPushSymbol() - * $CATEGORY$ - * Virtual machine API - * $ONELINER$ - * Empuja un puntero a una funcin, a la pila - * $SYNTAX$ - * C Prototype - * - * #include - * hb_vmPushSymbol( PHB_SYMB pSym ) --> void - * $ARGUMENTS$ - * puntero a una funcin - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * Empuja un puntero a una funcin, a la pila - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * La librera asociada es vm - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_vmPushPointer() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_vmPushPointer() - * $CATEGORY$ - * Virtual machine API - * $ONELINER$ - * Empuja un item del tipo HB_IT_POINTER - * $SYNTAX$ - * C Prototype - * - * #include - * hb_vmPushPointer( void * ) --> void - * $ARGUMENTS$ - * puntero sin tipo (puntero genrico) - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * La librera asociada es vm - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_vmPushSymbol() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_stackDispCall() - * $CATEGORY$ - * Virtual machine API - * $ONELINER$ - * - * $SYNTAX$ - * C Prototype - * - * #include - * hb_stackDispCall( void ) --> void - * $ARGUMENTS$ - * Ninguno - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * La librera asociada es vm - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_stackPop() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_stackPop() - * $CATEGORY$ - * Virtual machine API - * $ONELINER$ - * Recupera un item de la pila - * $SYNTAX$ - * C Prototype - * - * #include - * hb_stackPop( void ) --> void - * $ARGUMENTS$ - * Ninguno - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * La librera asociada es vm - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_stackDispCall() - * $END$ - */ diff --git a/harbour/examples/hbdoc/examples/es/howtobsd.txt b/harbour/examples/hbdoc/examples/es/howtobsd.txt deleted file mode 100644 index 7a283fbc7c..0000000000 --- a/harbour/examples/hbdoc/examples/es/howtobsd.txt +++ /dev/null @@ -1,59 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2001-2002 David G. Holm - * Documentacin en Ingls de: - * BSD platform Configuration for Harbour. - * - * Copyright 2001 Alejandro de Grate - * Documentacin en Espaol de: - * Configuracin del sistema operativo FreeBSD para usar con Harbour - * - * Vea COPYING por los trminos de la licencia. - * - */ - - -COMO CONFIGURAR BSD PARA CONSTRUIR HARBOUR ------------------------------------------- - -Primero, Ud. necesitar una instalacin FreeBSD 4.4 para desarrolladores. -Luego Ud. necesitar instalar bison y gmake. Si Ud. instal la coleccin -de ports, todo lo que Ud. necesita para instalar bison y gmake es -ejecutar los siguientes comandos los cuales pueden requerir que ejecute -primero el comando 'su' para obtener los permisos adecuados. - - cd /usr/ports/devel/bison - make - make install - make clean - cd /usr/ports/devel/gmake - make - make install - make clean - -Si Ud. quiere usar la librera GTSLN en lugar de GTSTD GTCRS, -entonces Ud. tambin necesita instalar libslang. Si Ud. instal -la coleccin de ports, entonces todo lo que Ud. necesita para -instalar libslang es ejecutar los siguientes comandos los cuales -pueden requerir que ejecute primero el comando 'su' para obtener -los permisos adecuados. - - cd /usr/ports/devel/libslang - make - make install - make clean - -Entonces lea el archivo doc/gmake.txt para instrucciones genricas -sobre make (GNU) y los seteos de Harbour especficos necesarios para -BSD. Cuando Ud. desee construir Habour, asegrese de ejecutar -'gmake -r' en la lnea de comandos en lugar de 'make -r'. - -David G. Holm - - diff --git a/harbour/examples/hbdoc/examples/es/hvm.txt b/harbour/examples/hbdoc/examples/es/hvm.txt deleted file mode 100644 index cae5344388..0000000000 --- a/harbour/examples/hbdoc/examples/es/hvm.txt +++ /dev/null @@ -1,445 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2000 Alejandro de Grate - * Documentacin en Espaol de: - * PROCNAME(), PROCLINE(), PROCFILE(), HB_PVALUE(), PCOUNT() - * __QUIT(), CLIPINIT(), __SetHelpK(), BREAK(), DO(), __DBGVMVARLGET() - * - * Copyright 1999 Jose Lanin - * Documentacin en Ingls de: PROCLINE(),PROCFILE(),PROCNAME() - * - * Copyright 1999 Eddie Ruina - * Documentacin en Ingls de: __DBGVMVARLGET() - * - * Copyright 1999 Chen Kedem - * Documentacin en Ingls de: CLIPINIT(), __SETHELPK() - * - * Copyright 1999 Ryszard Glab - * Documentacin en Ingls de: DO() - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * PROCNAME() - * $CATEGORY$ - * Miscelanea - * $ONELINER$ - * Obtiene el nombre de la funcin actual en la pila - * $SYNTAX$ - * PROCNAME( ) --> - * $ARGUMENTS$ - * es el nivel de la funcin requerida - * $RETURNS$ - * El nombre de la funcin que esta siendo ejecutada - * $DESCRIPTION$ - * Esta funcin mira al tope de la pila y obtiene el nombre de la - * funcin actual ejecutada si no se pasaron argumentos. De otra - * manera esta retorna el nombre de la funcin procedimiento en el - * nivel . - * $EXAMPLES$ - * Ver Test - * - * $TESTS$ - * Este test mostrar las funciones y procedimientos en la pila - * antes de ejecutarlas. - * - * FUNCTION Test() - * LOCAL n := 1 - * while !Empty( ProcName( n ) ) - * ? ProcName( n++ ) - * end do - * RETURN NIL - * - * $STATUS$ - * R - * $COMPLIANCE$ - * PROCNAME() es totalmente compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas. - * $FILES$ - * La librera asociada es vm - * $SEEALSO$ - * PROCLINE(),PROCFILE() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * PROCLINE() - * $CATEGORY$ - * Miscelanea - * $ONELINER$ - * Obtiene el nmero de lnea de la funcin actual en la pila - * $SYNTAX$ - * PROCLINE( ) --> - * $ARGUMENTS$ - * es el nivel de funcin requerida - * $RETURNS$ - * el nmero de lnea de la funcin que esta siendo ejecutada - * $DESCRIPTION$ - * Esta funcin mira al tope de la pila y obtiene el nmero de lnea - * de la funcin actual ejecutada si no se pasaron argumentos. De otra - * manera esta retorna el nmero de lnea de la funcin procedimiento - * en el nivel . - * $EXAMPLES$ - * Ver Test - * - * $TESTS$ - * FUNCTION Test() - * ? ProcLine( 0 ) - * ? ProcName( 2 ) - * RETURN NIL - * - * $STATUS$ - * R - * $COMPLIANCE$ - * PROCLINE() es totalmente compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas. - * $FILES$ - * La librera asociada es vm - * $SEEALSO$ - * PROCNAME(),PROCFILE() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * PROCFILE() - * $CATEGORY$ - * Miscelanea - * $ONELINER$ - * Esta funcin siempre retorna una cadena vaca. - * $SYNTAX$ - * PROCFILE( ) --> - * $ARGUMENTS$ - * es cualquier tipo vlido - * $RETURNS$ - * Retorna la cadena vaca . - * $DESCRIPTION$ - * Esta funcin es agregada a la RTL por total compatibilidad. - * Esta siempre retorna una cadena vaca. - * $EXAMPLES$ - * ? ProcFile() - * - * $TESTS$ - * FUNCTION Test() - * ? ProcFile() - * ? ProcFile( NIL ) - * ? ProcFile( 2 ) - * RETURN NIL - * - * $STATUS$ - * R - * $COMPLIANCE$ - * PROCFILE() es totalmente compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas. - * $FILES$ - * La librera asociada es vm - * $SEEALSO$ - * PROCNAME(),PROCLINE() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * HB_PVALUE() - * $CATEGORY$ - * Chequeo Parametros - * $ONELINER$ - * Obtiene el valor de un argumento. - * $SYNTAX$ - * HB_PVALUE( ) --> - * $ARGUMENTS$ - * Un nmero que indica el argumento a chequear. - * $RETURNS$ - * Retorna el valor almacenado en el argumento. - * $DESCRIPTION$ - * Esta funcin es til para chequear el valor almacenado en un - * argumento. - * $EXAMPLES$ - * Ver Test - * - * $TESTS$ - * FUNCTION Test( nValue, cString ) - * IF PCount() == 2 - * ? hb_PValue( 1 ), nValue - * ? hb_PValue( 2 ), cString - * ENDIF - * RETURN NIL - * - * $STATUS$ - * R - * $COMPLIANCE$ - * HB_PVALUE() es una nueva funcin y por tanto no es compatible con - * CA-Cl*pper. - * $PLATFORMS$ - * Todas. - * $FILES$ - * La librera asociada es vm - * $SEEALSO$ - * PCOUNT() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * PCOUNT() - * $CATEGORY$ - * Chequeo Parametros - * $ONELINER$ - * Obtiene el nmero de argumentos pasados a la funcin. - * $SYNTAX$ - * PCOUNT() --> - * $ARGUMENTS$ - * Ninguno. - * $RETURNS$ - * Un nmero que indica la cantidad de parmetros pasados a - * la funcin procedimiento, - * $DESCRIPTION$ - * Esta funcin es til para chequear si una funcin procedimiento a - * recibido el nmero de argumentos necesario. - * $EXAMPLES$ - * Ver Test - * - * $TESTS$ - * FUNCTION Test( xExp ) - * IF PCount() == 0 - * ? "Esta funcin necesita un parmetro" - * ELSE - * ? xExp - * ENDIF - * RETURN NIL - * - * $STATUS$ - * R - * $COMPLIANCE$ - * PCOUNT() es totalmente compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas. - * $FILES$ - * La librera asociada es vm - * $SEEALSO$ - * HB_PVALUE() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * __QUIT() - * $CATEGORY$ - * Eventos - * $ONELINER$ - * Termina una aplicacin. - * $SYNTAX$ - * __QUIT() --> NIL - * $ARGUMENTS$ - * Ninguno - * $RETURNS$ - * NIL - * $DESCRIPTION$ - * Esta funcin termina la aplicacin actual y retorna al sistema. - * $EXAMPLES$ - * Ver Test - * - * $TESTS$ - * FUNCTION EndApp( lYesNo ) - * IF lYesNo - * __Quit() - * ENDIF - * RETURN NIL - * - * $STATUS$ - * R - * $COMPLIANCE$ - * __QUIT() es totalmente compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas. - * $FILES$ - * La librera asociada es vm - * $SEEALSO$ - * QUIT - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * CLIPINIT() - * $CATEGORY$ - * Internal - * $ONELINER$ - * Initializa varios subsistemas de Harbour - * $SYNTAX$ - * CLIPINIT() --> NIL - * $ARGUMENTS$ - * Ninguno - * $RETURNS$ - * CLIPINIT() siempre devuelve NIL. - * $DESCRIPTION$ - * CLIPINIT() es uno de los INIT PROCEDURE predefinidos y es ejecutado - * cuando el programa arranca. Este declara un array MEMVAR PUBLIC vaco - * llamado GetList que va a ser usado por el sistema Get. - * Este activa el manejador de error por defecto, y (al menos por el - * momento) llama a la funcin que establece la tecla de Ayuda por - * defecto (F1). - * $STATUS$ - * R - * $COMPLIANCE$ - * Se dice que CLIPINIT() no debera llamar a la funcin que establece - * la tecla de Ayuda por defecto (F1) dado que CA-Cl*pper lo hace en - * otro lugar. - * $PLATFORMS$ - * Todas. - * $SEEALSO$ - * INIT PROCEDURE - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * __SetHelpK() - * $CATEGORY$ - * Internal - * $ONELINER$ - * Establece a como la tecla de Ayuda por defecto - * $SYNTAX$ - * __SetHelpK() --> NIL - * $ARGUMENTS$ - * Ninguno - * $RETURNS$ - * __SetHelpK() siempre devuelve NIL - * $DESCRIPTION$ - * Establece que al pulsar la tecla , se ejecute una funcin llamada - * HELP si tal funcin es enlazada dentro del programa. - * $STATUS$ - * R - * $COMPLIANCE$ - * __SetHelpK() trabaja exactamente como la funcin de CA-Cl*pper - * llamada __SetHelpK() - * $PLATFORMS$ - * Todas. - * $FILES$ - * La librera asociada es vm - * $SEEALSO$ - * __XHelp(),SET KEY,SETKEY() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * BREAK() - * $CATEGORY$ - * Error recovery - * $ONELINER$ - * Sale de un bloque BEGIN SEQUENCE - * $SYNTAX$ - * BREAK( ) --> NIL - * $ARGUMENTS$ - * es cualquier expresin vlida. Esta es requerida siempre - * Si Ud. no desea pasarle ningn argumento, slo use NIL. - * $RETURNS$ - * NIL - * $DESCRIPTION$ - * Esta funcin le pasa el control a la sentencia RECOVER en un bloque - * BEGIN SEQUENCE. - * $EXAMPLES$ - * Break( NIL ) - * - * $STATUS$ - * R - * $COMPLIANCE$ - * BREAK() es totalmente compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas. - * $FILES$ - * La librera asociada es vm - * $SEEALSO$ - * BEGIN SEQUENCE - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * DO() - * $CATEGORY$ - * Utility - * $ONELINER$ - * Llama a un procedimiento a una funcin - * $SYNTAX$ - * DO( [, ] ) - * $ARGUMENTS$ - * es tanto una cadena con un nombre de funcin - * procedimiento a ser llamado, un codeblock a evaluar. - * argumentos pasados a la funcin procedimiento - * llamado a un codeblock. - * $RETURNS$ - * A value that was returned from called function. - * $DESCRIPTION$ - * Esta funcin puede ser llamada bien por el compilador Harbour - * por el usuario. - * El compilador siempre siempre pasa el item de tipo IT_SYMBOL que - * almacena el nombre del procedimiento especificado en la sentencia - * DO WITH . - * Si el procedimiento/funcin no existe, entonces un error de tiempo - * de ejecucin es generado. - * Esta funcin puede ser usada como reemplazo del operador macro. - * Esta es tambin usada internamente para implementar: - * DO WITH - * En este caso es del tipo HB_SYMB. - * $EXAMPLES$ - * cbCode ={|x| MyFunc( x )} - * DO( cbCode, 1 ) - * - * cFunction := "MyFunc" - * xRetVal :=DO( cFunction, 2 ) - * - * Old style (slower): - * DO &cFunction WITH 3 - * - * $PLATFORMS$ - * Todas. - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * __DBGVMVARLGET() - * $CATEGORY$ - * Variable Management - * $ONELINER$ - * Obtiene una variable LOCAL de un nivel de procedimiento - * $SYNTAX$ - * __DBGVMVARLGET( , ) - * $ARGUMENTS$ - * Es el nivel de procedimiento, el mismo que el usado - * en PROCNAME() y PROCLINE(), desde el cual una variable - * local va a ser obtenida. - * Es la posicin ndice de la variable local a recuperar - * $RETURNS$ - * El contenido de la variable local especificada. - * $DESCRIPTION$ - * Esta funcin es usada desde el depurador. - * $PLATFORMS$ - * Todas. - * $FILES$ - * La librera asociada es vm - * $SEEALSO$ - * PROCNAME() - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/idle.txt b/harbour/examples/hbdoc/examples/es/idle.txt deleted file mode 100644 index 5e2d742ef9..0000000000 --- a/harbour/examples/hbdoc/examples/es/idle.txt +++ /dev/null @@ -1,222 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2000 Brian Hays - * Documentacin en Ingls de: - * Readme for Idle state, HB_IDLEADD(), HB_IDLEDEL() - * HB_IDLESTATE(), hb_idleState() - * - * Copyright 2000 Alejandro de Grate - * Documentacin en Espaol de: - * Leame para Estado Ocioso, HB_IDLEADD(), HB_IDLEDEL() - * HB_IDLESTATE(), hb_idleState() - * - * Vea COPYING por los trminos de la licencia. - * - */ - - -/* $DOC$ - * $FUNCNAME$ - * Estado Ocioso - * $CATEGORY$ - * Documento - * $ONELINER$ - * Archivo Lame para Estado Ocioso - * $DESCRIPTION$ - * El estado de espera ocioso es el estado de la mquina virtual de - * Harbour cuando esta espera por una accin del usuario a travs del - * teclado el mouse. El estado ocioso ocurre actualmente durante - * las llamadas a INKEY(). Todas las funciones que no usen la funcin - * INKEY() pueden sealizar el estado ocioso con una llamada a la - * funcin Harbour HB_IDLESTATE() hb_idleState() a nivel de lenguaje - * C. - * - * Durante los estados ociosos, la mquina virtual llama al recolector - * de memoria y este puede llamar a acciones definidas por el usuario - * (tareas en segundo plano background). Este tambin libera porciones - * del tiempo de la CPU para algunas plataformas deficientes que no son - * lo suficientemente inteligentes (Windows NT). - * - * Por definicin de tareas en segundo plano vea las funciones: - * HB_IDLEADD() y HB_IDLEDEL(). - * - * Para llamar directamente a acciones en segundo plano vea la funcin: - * HB_IDLESTATE(). - * - * Para indicar el estado ocioso desde cdigo en lenguaje C vea la - * hb_idleState() en la API, - * $SEEALSO$ - * HB_IDLEADD(),HB_IDLEDEL() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * HB_IDLEADD() - * $CATEGORY$ - * Estado Ocioso - * $ONELINER$ - * Agrega tareas en segundo plano. - * $SYNTAX$ - * HB_IDLEADD( ) --> nHandle - * $ARGUMENTS$ - * es un bloque de cdigo que ser ejecutado durante los - * estados ociosos, No hay argumentos pasados a este bloque - * de cdigo durante la evaluacin. - * $RETURNS$ - * El manejador (un valor entero) que identifica la tarea. - * Este manejador puede ser usado para eliminar la tarea. - * $DESCRIPTION$ - * HB_IDLEADD() agrega el pasado bloque de cdigo a las lista de tareas - * en segundo plano que sern evaluadas durante los estados ociosos. - * No hay un lmite para el nmero de tareas. - * $EXAMPLES$ - * nTarea := HB_IDLEADD( {|| SayTime()} ) - * $STATUS$ - * R - * $COMPLIANCE$ - * Extensin de Harbour, similar a la funcin FT_ONIDLE() disponible - * en la librera Nanforum. - * $PLATFORMS$ - * Todas - * $FILES$ - * El archivo fuente es ../source/rtl/idle.c - * $SEEALSO$ - * HB_IDLEDEL(),HB_IDLESTATE() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * HB_IDLEDEL() - * $CATEGORY$ - * Estado Ocioso - * $ONELINER$ - * Remueve tareas desde la lista de tareas en segundo plano. - * $SYNTAX$ - * HB_IDLEDEL( ) --> xAccion - * $ARGUMENTS$ - * es el identificador de la tarea devuelto por la funcin - * HB_IDLEADD(). - * $RETURNS$ - * Retorna igual a NIL si un manejador no vlido es pasado - * $DESCRIPTION$ - * La funcin HB_IDLEDEL() remueve la accin asociada con el identi- - * ficador pasado desde la lista de tareas en segundo plano. - * El identificador debera ser el valor retornado por la llamada - * previa a la funcin HB_IDLEADD(). - * Si la tarea especificada est definida, entonces el codeblock es - * retornado, de otro modo el valor NIL es retornado. - * $EXAMPLES$ - * nTarea := HB_IDLEADD( {|| SayTime()} ) - * INKEY(10) - * cbAccion := HB_IDLEDEL( nTarea ) - * $STATUS$ - * R - * $COMPLIANCE$ - * Extensin de Harbour - * $PLATFORMS$ - * Todas - * $FILES$ - * El archivo fuente es ../source/rtl/idle.c - * $SEEALSO$ - * HB_IDLEADD(),HB_IDLESTATE() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * HB_IDLESTATE() - * $CATEGORY$ - * Estado Ocioso - * $ONELINER$ - * Evala una sola tarea en segundo plano y llama al recolector - * $SYNTAX$ - * HB_IDLESTATE() - * $ARGUMENTS$ - * Ninguno - * $RETURNS$ - * NIL - * $DESCRIPTION$ - * La funcin HB_IDLESTATE() solicita la recoleccin de memoria sin - * uso y ejecuta una nica tarea definida por el bloque de cdigo - * pasado con la funcin HB_IDLEADD(). Cada llamada a esta funcin - * evala una tarea diferente en el orden de la creacin de tareas. - * No hay argumentos pasados durante la evaluacin del bloque de - * cdigo. - * Esta funcin puede ser llamada con seguridad, an si no hay tareas - * definidas en segundo plano. - * $EXAMPLES$ - * nTarea1 := HB_IDLEADD( {|| MuestreLaHora()} ) - * nTarea2 := HB_IDLEADD( {|| SaveScreen()} ) - * - * DO WHILE( ! bTerminado ) - * bTerminado := HagaAlgoMuyImportante() - * HB_IdleState() - * ENDDO - * - * cbAccion := HB_IDLEDEL( nTarea1 ) - * HB_IDLEDEL( nTarea2 ) - * $STATUS$ - * R - * $COMPLIANCE$ - * Extensin de Harbour, similar a la funcin FT_IAMIDLE() disponible - * en la librera Nanforum. - * $PLATFORMS$ - * Todas - * $FILES$ - * El archivo fuente es ../source/rtl/idle.c - * $SEEALSO$ - * HB_IDLEADD(),HB_IDLEDEL() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * hb_idleState() - * $CATEGORY$ - * Estado Ocioso - * $ONELINER$ - * Evala una sola tarea en segundo plano y llama al recolector - * $SYNTAX$ - * void hb_idleState( void ); - * $ARGUMENTS$ - * Ninguno - * $RETURNS$ - * Nada. - * $DESCRIPTION$ - * La funcin hb_idleState() es una funcin en lenguaje C que solicita - * la recoleccin de memoria sin uso y ejecuta una sola tarea en - * segundo plano, definida por el bloque de cdigo pasado con la - * funcin HB_IDLEADD(). Esta tambin libera porciones de tiempo de - * CPU para aquellas plataformas que lo requieran. - * - * Cada llamda a esta funcin evala una tarea diferente en el orden - * de la creacin de tareas. No hay argumentos pasados durante la - * evaluacin del bloque de cdigo. - * - * Esta funcin puede ser llamada con seguridad, an si no hay tareas - * definidas en segundo plano. - * - * Esta funcin es automticamente llamada desde la funcin INKEY(). - * $STATUS$ - * R - * $PLATFORMS$ - * Todas - * $FILES$ - * El archivo fuente es ../source/rtl/idle.c - * $SEEALSO$ - * HB_IDLEADD(),HB_IDLEDEL(),HB_IDLESTATE() - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/input.txt b/harbour/examples/hbdoc/examples/es/input.txt deleted file mode 100644 index 8a27a29ec9..0000000000 --- a/harbour/examples/hbdoc/examples/es/input.txt +++ /dev/null @@ -1,484 +0,0 @@ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2000 Alejandro de Grate - * Documentacin en Espaol de: - * INKEY(), __KEYBOARD(), HB_KEYPUT(), NEXTKEY() - * LASTKEY(), KEYBOARD, READKEY(), MROW(), MCOL() - * Copyright 1999 Chen Kedem - * Documentation for: READKEY() - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * INKEY() - * $CATEGORY$ - * Entrada de Consola - * $ONELINER$ - * Extrae el prximo cdigo de tecla desde el buffer de teclado. - * $SYNTAX$ - * INKEY( [] [,] ) --> nTecla - * $ARGUMENTS$ - * es un valor opcional de tiempo de espera en segundos, - * con una resolucin de 1/10th de segundo. - * Si es omitido, INKEY() retorna inmediatamente. - * Si es cero, INKEY() espera hasta que un evento de entrada suceda. - * Si es establecido en cualquier otro valor INKEY() retornara tanto - * cuando un evento de entrada ocurra como cuando el perodo de espera - * haya transcurrido. - * Si slo este parmetro es especificado y este no es numrico, ste - * ser tratado como si fuera cero. Pero si ambos parmetros son - * especificados y este parmetro no es numrico, este ser tratado - * como si no estuviese presente. - * - * es una mscara opcional de los eventos de entrada que son - * habilitados. - * Si es omitida por defecto es hb_set.HB_SET_EVENTMASK. - * Mscaras vlidas de entrada se ecuentran en inkey.ch y son explicadas - * ms abajo. Se recomienda usar los nombres de estas mscaras, antes - * que sus valores numricos, en el caso que estos valores numricos - * cambien en futuras versiones de Harbour. - * Para permitir ms de un tipo de evento de entrada, simplemente sume - * varios nombres de mscara todos juntos. - * - * - * inkey.ch Significado de los eventos - * - * INKEY_MOVE permitidos los eventos de movimiento del mouse - * INKEY_LDOWN permitido apretar el botn izq. del mouse - * INKEY_LUP permitido soltar el botn izquierdo del mouse - * INKEY_RDOWN permitido apretar el botn derecho del mouse - * INKEY_RUP permitido soltar el botn derecho del mouse - * INKEY_KEYBOARD Todos los eventos de teclado estan permitidos - * INKEY_ALL Todos los eventos de mouse y teclado estan - * permitidos - * HB_INKEY_EXTENDED Codigos Extendidos de teclado son usados - *
- * Si el parmetro no es numrico, este ser tratado como si hubiese - * sido establecido a hb_set.HB_SET_EVENTMASK. - * $RETURNS$ - * INKEY() retorna cero en caso de transcurrido el tiempo de espera sin - * ningn evento de entrada, de otro modo retorna un valor en el rango - * -39 a 386 para eventos de teclado en le rango de 1001 a 1007 para - * eventos de mouse. - * Los eventos de mouse y los eventos de teclado que no se pueden - * imprimir son representados por los valores K_ listados en - * el archivo inkey.ch - * Los cdigo de teclas de los eventos de teclado en el rango de 32 a - * 127 son los equivalentes al set de caracteres ASCII. Los cdigos de - * retorno de eventos de teclado en el rango de 128 a 255 son asumidos - * como imprimibles, pero los resultados pueden variar basados en el - * hardware del teclado y la nacionalidad de su seteo. - * - * Los codigos de tecla Extendidos para un teclado de PC consisten de - * scancode y uno o mas valores de desplazamiento (offset). - * Si ningun modificador de teclado fue usado entonces HB_INKEY_NONE - * es agregado. Las teclas agregan HB_INKEY_ALT, las teclas - * agregan HB_INKEY_CTRL, las teclas de desplazamiento (Shift), - * (que se simbolizan con una flecha hacia arriba) agregan - * HB_INKEY_SHIFT, y las teclas adicionales del teclado numerico - * ubicadas a la derecha - * del teclado (teclas KeyPad y CursorPad ) agregan HB_INKEY_ENHANCED. - * - * Por ejemplo la tecla tiene un scancode de 59, asi que si solo - * se pulsa se obtiene el codigo 315, da 443, - * da 571, da 699. <> - * - * ?????? And NumPad+/ gives 1077, 1205, 1333, and 1461. At - * this time, the only value that can combine with other values is - * HB_INKEY_ENHANCED (i.e., there are no Alt+Ctl combinations, etc.) - * - * Nota: El conjunto de codigos de teclas extendido es mayor que el - * conjunto de codigo de tecla normal. Como resultante de esto, si - * Ud. cambia entre los modos normal y extendido, Ud. debe saber que - * algunos codigos son trasladados como cero en el modo normal (esto - * es debido a que existe el correspondiente codigo para esa tecla en - * modo normal) y que esos codigos seran removidos del buffer de - * entrada del teclado en el modo normal y que Ud. no podr volver - * atras y obtenerlos luego en modo extendido. - * $DESCRIPTION$ - * INKEY() puede ser usada para detectar eventos de entrada, como la - * pulsacin de una tecla, un click del mouse (arriba y/o abajo). - * $EXAMPLES$ - * // Espera a que el usuario presione la tecla Esc - * ? "Por favor, presione la tecla ESC." - * WHILE INKEY( 0.1 ) != K_ESC - * END - * - * $TESTS$ - * KEYBOARD "AB"; ? INKEY(), INKEY() ==> 65 66 - * - * $STATUS$ - * S - * $COMPLIANCE$ - * INKEY() es compatible con la funcin INKEY() de Clipper 5.3 con una - * excepcin: La funcin INKEY() de Harbour dar un error de argumento - * si el primer parmetro es menor igual a cero y el segundo parmetro - * ( la mscara por defecto ) no es vlida, porque de otra manera - * INKEY() podra no retornar nunca, porque en efecto espera por - * siempre por un un evento que no se va a producir (Nota: En Clipper, - * esto tambin bloquea los eventos SET KEY). - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * inkey.ch - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * __KEYBOARD() - * $CATEGORY$ - * Entrada de Consola - * $ONELINER$ - * NO LLAMAR A ESTA FUNCION DIRECTAMENTE ! - * $SYNTAX$ - * KEYBOARD - * CLEAR TYPEAHEAD - * $ARGUMENTS$ - * es una cadena opcional para ser colocada en el buffer - * de teclado de Harbour despus de borrarlo. - * Nota: El carcter ";" es convertido a CHR(13) (esta es - * una caracterstica no documentada de CA-Cl*pper). - * $RETURNS$ - * No hay valor de retorno. - * $DESCRIPTION$ - * Borra el buffer de teclado de Harbour y luego inserta una cadena - * opcional en ste. - * $EXAMPLES$ - * // Pone la tecla en el buffer de teclado - * KEYBOARD CHR(13) - * - * // Borra el buffer de teclado - * CLEAR TYPEAHEAD - * - * $TESTS$ - * KEYBOARD CHR(13); ? INKEY() ==> 13 - * KEYBOARD ";" ? INKEY() ==> 13 - * KEYBOARD "HOLA"; CLEAR TYPEAHEAD; ? INKEY() ==> 0 - * - * $STATUS$ - * R - * $COMPLIANCE$ - * __KEYBOARD() es compatible con CA-Cl*pper 5.3 - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * CLEAR TYPEAHEAD,KEYBOARD - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * HB_KEYPUT() - * $CATEGORY$ - * Entrada de Consola - * $ONELINER$ - * Pone un cdigo de tecla en el buffer de teclado. - * $SYNTAX$ - * HB_KEYPUT( ) - * $ARGUMENTS$ - * es el cdigo de tecla. que debera ser insertado en - * el buffer de teclado. - * $RETURNS$ - * No hay valor de retorno. - * $DESCRIPTION$ - * Inserta un cdigo de tecla en el buffer de teclado. - * El buffer *NO* es borrado en esta operacin. Esta funcin permite - * insertar cdigos de teclas que no estan en el rango de 0 a 255. - * Para insertar ms de un cdigo, llame a la funcin repetidamente. - * El cdigo cero no puede ser insertado. - * $EXAMPLES$ - * // Coloca la tecla de Alt+PgDn key en el buffer de teclado. - * HB_KEYPUT( K_ALT_PGDN ) - * - * $TESTS$ - * HB_KEYPUT( K_ALT_PGDN ) ; ? INKEY() ==> 417 - * HB_KEYPUT( K_F11 ) ; ? INKEY() ==> -40 - * - * $STATUS$ - * R - * $COMPLIANCE$ - * HB_KEYPUT() es una extensin de Harbour. - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * KEYBOARD,CLEAR TYPEAHEAD,INKEY() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * NEXTKEY() - * $CATEGORY$ - * Entrada de Consola - * $ONELINER$ - * Lee la prxima tecla del buffer de teclado sin extraerla - * $SYNTAX$ - * NEXTKEY( [] ) --> nTecla - * $ARGUMENTS$ - * es un valor entero opcional compuesto por una o mas - * constantes INKEY_ or HB_INKEY_ - * El solo proposito de este argumento es permitir cambiar - * entre los codigos de tecla HB_INKEY_EXTENDED y usar - * los codigos de tecla normales compatibles con Clipper. - * $RETURNS$ - * el valor del prximo cdigo de tecla del buffer de teclado. - * $DESCRIPTION$ - * Retorna el valor del prximo cdigo de tecla del buffer de teclado - * sin extraerlo. - * $EXAMPLES$ - * // Uso de NEXTKEY() con INKEY() para cambiar los caracteres a mostrar - * // para poder salir del bucle, as el llamador puede detectar - * // la tecla ESC. - * LOCAL nTecla, cChar := "+" - * - * WHILE TRUE - * ?? cChar - * nTecla := NEXTKEY() - * - * IF nTecla == K_ESC - * EXIT - * ELSE - * IF nTecla != 0 - * cChar := CHR( nTecla ) - * END IF - * ENDIF - * - * END WHILE - * - * $TESTS$ - * KEYBOARD "AB"; ? NEXTKEY(), NEXTKEY() ==> 65 65 - * - * $STATUS$ - * R - * $COMPLIANCE$ - * NEXTKEY() es compatible con CA-Cl*pper 5.3 - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * INKEY(),LASTKEY() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * LASTKEY() - * $CATEGORY$ - * Entrada de Consola - * $ONELINER$ - * Obtiene el ltima tecla extraida desde el buffer de teclado. - * $SYNTAX$ - * LASTKEY( [] ) --> nTecla - * $ARGUMENTS$ - * es un valor entero opcional compuesto por una o mas - * constantes INKEY_ o HB_INKEY_ - * El solo proposito de este argumento es permitir cambiar - * entre los codigos de tecla HB_INKEY_EXTENDED y usar - * los codigos de tecla normales compatibles con Clipper. - * $RETURNS$ - * la ltima tecla extraida desde el buffer de teclado. - * $DESCRIPTION$ - * LASTKEY() retorna el valor de la ltima tecla extraida del buffer - * de teclado. - * $EXAMPLES$ - * // Continua el bucle a menos que la tecla ESC haya sido presionada - * // en MainFunc() - * WHILE TRUE - * - * MainFunc() - * IF LASTKEY() == K_ESC - * EXIT - * ENDIF - * - * END WHILE - * - * $TESTS$ - * KEYBOARD "AB"; ? INKEY(), LASTKEY() ==> 65 65 - * - * $STATUS$ - * R - * $COMPLIANCE$ - * LASTKEY() es compatible con CA-Cl*pper 5.3 - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * INKEY(),LASTKEY() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * KEYBOARD - * $CATEGORY$ - * Comando - * $ONELINER$ - * Rellena el buffer de teclado con una cadena. - * $SYNTAX$ - * KEYBOARD - * $ARGUMENTS$ - * es la cadena a ser procesada, un caracter a la vez, por - * el procesador de teclado de Harbour. - * $DESCRIPTION$ - * Este comando llena el buffer de entrada con . - * El nmero de caracteres que pueden ser puestos en el buffer de - * teclado es controlado por el comando SET TYPEAHEAD y puede estar en - * el rango de 0 a 32622, donde cada caracter corresponde al rango ASCII - * de 0 a 255. Ninguna de las teclas extendidas puede ser puestas en - * el buffer de teclado. - * Haciendo KEYBOARD " " limpiar el buffer de teclado. - * $EXAMPLES$ - * // Coloca la tecla en el buffer de teclado. - * KEYBOARD CHR(13) - * - * // Borra el buffer de teclado. - * CLEAR TYPEAHEAD - * - * $TESTS$ - * KEYBOARD CHR(13); ? INKEY() ==> 13 - * KEYBOARD "HOLA"; CLEAR TYPEAHEAD; ? INKEY() ==> 0 - * - * $STATUS$ - * R - * $COMPLIANCE$ - * __KEYBOARD() es compatible con CA-Cl*pper 5.3 - * $SEEALSO$ - * CLEAR TYPEAHEAD,__KEYBOARD() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * READKEY()* - * $CATEGORY$ - * Entrada y Salida de datos - * $ONELINER$ - * Encuentra cual tecla caus la salida del READ - * $SYNTAX$ - * READKEY() --> nCodigoTecla - * $ARGUMENTS$ - * Ninguno. - * $RETURNS$ - * READKEY() retorna un cdigo numrico representando la tecla que - * caus la terminacin del READ. - * $DESCRIPTION$ - * READKEY() es usado despus que un READ ha terminado para determinar - * la tecla de salida. - * Si el buffer del GET fu actualizado durante el READ, el valor 256 - * es agregado al cdigo de retorno. - * - * - * Tecla de Cdigo de Retorno Cdigo de Retorno - * Salida (no actualizado) (actualizado) - * - * Up 4 260 - * Down 5 261 - * Page-Up 6 262 - * Page-Down 7 263 - * Ctrl Page-Up 34 290 - * Ctrl Page-Down 35 291 - * Esc 12 268 - * Ctrl End 14 270 - * Enter 15 271 - * Key >= 32 15 271 - * de otro modo 0 0 - *
- * READKEY() es una funcin de compatibilidad, as que trate de no - * usarla. READKEY() es superada por LASTKEY() la que retorna el cdigo - * de INKEY() para esa tecla. UPDATED() podra ser usado para encontrar - * si el buffer GET haba cambiado durante el READ. - * $STATUS$ - * R - * $COMPLIANCE$ - * READKEY() es compatible con CA-Cl*pper 5.3 - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * @...GET,INKEY(),LASTKEY(),READ,READEXIT(),UPDATED() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * MROW() - * $CATEGORY$ - * Entrada de Consola - * $ONELINER$ - * Retorna la fila de posicin del cursor del mouse. - * $SYNTAX$ - * MROW() --> nFilaMouse - * $ARGUMENTS$ - * Ninguno - * $RETURNS$ - * la fila de posicin del cursor del mouse. - * $DESCRIPTION$ - * Esta funcin retorna el fila de posicion actual del cursor del mouse - * En sistemas grficos el valor representa filas de pixels. - * En sistemas basados en caracteres el valor representa filas de - * caracteres como en Clipper. - * $EXAMPLES$ - * IF MROW() < 1 - * ? "El Mouse esta en la fila superior!" - * ENDIF - * - * $STATUS$ - * R - * $COMPLIANCE$ - * MROW() es compatible con CA-Cl*pper 5.3, pero ha sido extendido para - * trabajar sobre sistemas grficos tan bien como en sistemas basados - * en caracteres. - * $PLATFORMS$ - * Todas. - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * MCOL() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * MCOL() - * $CATEGORY$ - * Entrada de Consola - * $ONELINER$ - * Retorna la columna de posicin del cursor del mouse. - * $SYNTAX$ - * MCOL() --> nColumnaMouse - * $ARGUMENTS$ - * Ninguno. - * $RETURNS$ - * la columna de posicin del cursor del mouse. - * $DESCRIPTION$ - * Esta funcin retorna la columna de posicin actual del cursor del - * mouse. - * En sistemas grficos el valor representa filas de pixels. - * En sistemas basados en caracteres el valor representa filas de - * caracteres como en Clipper. - * $EXAMPLES$ - * IF MCOL() < 1 - * ? "El Mouse esta sobre el margen izquierdo!" - * ENDIF - * $STATUS$ - * R - * $COMPLIANCE$ - * MCOL() es compatible con CA-Cl*pper 5.3, pero ha sido extendido para - * trabajar sobre sistemas grficos tan bien como en sistemas basados - * en caracteres. - * $PLATFORMS$ - * Todas. - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * MROW() - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/lang.txt b/harbour/examples/hbdoc/examples/es/lang.txt deleted file mode 100644 index 13c39b6682..0000000000 --- a/harbour/examples/hbdoc/examples/es/lang.txt +++ /dev/null @@ -1,429 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2000-2004 Alejandro de Grate - * Documentacin en Espaol de: HB_LANGSELECT(), HB_LANGNAME() - * HB_LANGERRMSG(), HB_LANGMESSAGE(), HB_SETCODEPAGE(), HB_TRANSLATE() - * - * Copyright 2000 Luiz Rafael Culik - * Documentacin en Ingls de: HB_LANGSELECT(), HB_LANGNAME() - * - * Copyright 2004 Chen Kedem - * Documentacin en Ingls de: HB_LANGERRMSG(), HB_LANGMESSAGE(), - * HB_SETCODEPAGE(), HB_TRANSLATE() - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * HB_LANGERRMSG() - * $CATEGORY$ - * Nacion - * $ONELINER$ - * Descripcin de un cdigo de error usando el idioma actual - * $SYNTAX$ - * HB_LANGERRMSG( ) --> cMensajeError - * $ARGUMENTS$ - * es uno de los cdigo de error genricos (EG_...) - * definidos en include/error.ch - * $RETURNS$ - * HB_LANGERRMSG() retorna la cadena con el mensaje de error que - * representa al cdigo . - * $DESCRIPTION$ - * Esta funcin devuelve el mensaje de error asociado con un cdigo de - * error usando el idioma actual seleccionado. - * $EXAMPLES$ - * #include "error.ch" - * - * REQUEST HB_LANG_ES - * - * FUNCTION Main() - * // English: Argument error - * ? "English:", HB_LANGERRMSG( EG_ARG ) - * HB_LANGSELECT( "ES" ) - * - * // Spanish: Error de argumento - * ? "Spanish:", HB_LANGERRMSG( EG_ARG ) - * RETURN NIL - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es una Extensin de Harbour - * $PLATFORMS$ - * Todas - * $FILES$ - * Las Libreras asociadas son: rtl, lang - * El archivo de cabecera es error.ch - * $SEEALSO$ - * HB_LANGSELECT(),NATIONMSG() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * HB_LANGMESSAGE() - * $CATEGORY$ - * Nacion - * $ONELINER$ - * Retorna una cadena de errores y mensajes internacionales - * $SYNTAX$ - * HB_LANGMESSAGE( ) --> cMensaje - * $ARGUMENTS$ - * es el cdigo numrico del mensaje - * $RETURNS$ - * HB_LANGMESSAGE() devuelve el texto asociado con el cdigo . - * $DESCRIPTION$ - * HB_LANGMESSAGE() es similar a NATIONMSG() pero permite el acceso a - * la lista completa de mensajes para un idioma determinado: nombres - * de Da y Mes, mensajes de error genricos, errores internos, etc. - * - * Utilice el archivo de cabecera hblang.ch para obtener una lista de - * los valores de base para . - * $EXAMPLES$ - * #include "hblang.ch" - * - * REQUEST HB_LANG_ES - * - * FUNCTION Main() - * // English: Monday - * ? "English:", HB_LANGMESSAGE( HB_LANG_ITEM_BASE_DAY + 1 ) - * HB_LANGSELECT( "ES" ) - * - * // Spanish: Lunes - * ? "Spanish:", HB_LANGMESSAGE( HB_LANG_ITEM_BASE_DAY + 1 ) - * RETURN NIL - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es una Extensin de Harbour - * $PLATFORMS$ - * Todas - * $FILES$ - * Las Libreras asociadas son: rtl, lang - * El archivo de cabecera es hblang.ch - * $SEEALSO$ - * HB_LANGSELECT(),NATIONMSG(),REQUEST - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * HB_LANGSELECT() - * $CATEGORY$ - * Nacion - * $ONELINER$ - * Selecciona un mdulo de mensajes especfico a una nacionalidad. - * $SYNTAX$ - * HB_LANGSELECT() --> cViejoLeng - * $ARGUMENTS$ - * El cdigo de identificacin del mdulo de idioma del - * pas. - * Los valores posibles para estan mostrados abajo, tal - * como estn definidos en la librera de Lenguajes, ordenados por - * idioma. - * - * - * Idioma Cdigo de Pgina - * Vasco 850 EU - * Cataln 850 CA - * Chino Simplificado 936 ZHGB - * Chino Tradicional 950 ZHB5 - * Croata 852 HR852 - * Croata ISO-8859-2 HRISO - * Checo 852 CS852 - * Checo ISO-8859-2 CSISO - * Checo KAM CSKAM - * Checo Windows-1250 CSWIN - * Ingls 437 EN - * Esperanto 850 EO - * Francs 850 FR - * Gallego 850 GL - * Alemn 850 DE - * Alemn ANSI ANSI DEWIN - * Griego 737 EL - * Griego ANSI Windows-1253 ELWIN - * Hebreo 862 HE862 - * Hebreo Windows-1255 HEWIN - * Hungaro 852 HU852 - * Hungaro CWI-2 HUCWI - * Hungaro Windows-1 HUWIN - * Islands 850 IS850 - * Indonesio 437 ID - * Italiano 437 IT - * Coreano 949 KO - * Polaco 852 PL852 - * Polaco ISO-8859-1 PLISO - * Polaco Mozowia PLMAZ - * Polaco Windows-1250 PLWIN - * Portugus 850 PT - * Rumano 852 RO - * Ruso 866 RU866 - * Ruso KOI-8 RUKOI8 - * Ruso Windows-1251 RUWIN - * Serbio 852 SR852 - * Serbio ISO-8859-2 SRISO - * Serbio Windows-1251 SRWIN - * Eslovenio 437 SL437 - * Eslovenio 852 SL852 - * Eslovenio ISO-8859-2 SLISO - * Eslovenio Windows-1251 SLWIN - * Espaol 850 ES - * Espaol ANSI ANSI ESWIN - *
- * $RETURNS$ - * El identificador anterior de Lenguaje - * $DESCRIPTION$ - * Esta funcin establece un mdulo de lenguaje o idioma para las - * advertencias internas, mensajes NatMsg y errores internos que - * utilizan nombres de fechas, das, meses, etc. - * Cuando una IDentificacin de Lenguaje es elegida todos los mensajes - * son mostrados de acuerdo al actual idioma, hasta que otro sea - * seleccionado, el programa termine. - * La ID son dos letras que establecen la correspondencia con un idioma - * dado de acuerdo a una tabla. - * - * Nota: La tabla que se muestra arriba puede no estar completa. - * $EXAMPLES$ - * * El siguiente ejemplo cambia el mdulo de idioma por defecto, y - * luego muestra por pantalla la ID del mdulo de lenguaje, el nombre - * del da de la semana y el mes en varios idiomas. - * - * REQUEST HB_LANG_PT - * REQUEST HB_LANG_RO - * REQUEST HB_LANG_ES - * LOCAL nViejo - * - * HB_LANGSELECT("PT") // el idioma por defecto es ahora Portugus - * ? "La nueva ID de idioma elegida es ", HB_LANGSELECT() // PT - * ? CDOW( DATE() ) - * ? CMONTH( DATE() ) - * - * nViejo := HB_LANGSELECT("RO") // el idioma por defecto es Romano - * ? "La vieja ID de idioma elegida era ", nViejo // PT - * ? "La nueva ID de idioma elegida es ", HB_LANGSELECT() // RO - * ? CDOW( DATE() ) - * ? CMONTH( DATE() ) - * - * HB_LANGSELECT("ES") // el idioma por defecto es ahora Espaol - * ? "La nueva ID de idioma elegida es ", HB_LANGSELECT() // ES - * ? CDOW( DATE() ) - * ? CMONTH( DATE() ) - * - * $TESTS$ - * Vea ..\tests\langapi.prg tests\langmsg.prg - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es una Extensin de Harbour. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera asociada es rtl - * $SEEALSO$ - * HB_LANGNAME(),HB_SETCODEPAGE(),NATIONMSG(),REQUEST - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * HB_LANGNAME() - * $CATEGORY$ - * Nacion - * $ONELINER$ - * Retorna el nombre del mdulo actual de lenguaje en uso. - * $SYNTAX$ - * HB_LANGNAME() --> cNombreLenguaje - * $ARGUMENTS$ - * Ninguno. - * $RETURNS$ - * HB_LANGNAME() retorna , el nombre del idioma en uso - * $DESCRIPTION$ - * Esta funcin describe el nombre del idioma lenguaje correspondiente - * al que existe por defecto ha sido establecido por HB_LANGSELECT(). - * $EXAMPLES$ - * * El siguiente ejemplo cambia el mdulo de idioma por defecto, y - * luego muestra por pantalla la ID del mdulo de lenguaje, el idioma - * asociado a esa ID. y el da de la semana y el mes en varios idiomas - * - * REQUEST HB_LANG_PT - * REQUEST HB_LANG_ES - * - * HB_LANGSELECT("PT") // el idioma por defecto es ahora Portugus - * ? "El idioma actual es ", HB_LANGNAME() // Portugus - * ? "La nueva ID de idioma elegida es ", HB_LANGSELECT() // RO - * ? CDOW( DATE() ) - * ? CMONTH( DATE() ) - * - * HB_LANGSELECT("ES") // el idioma por defecto es ahora Espaol - * ? "El idioma actual es ", HB_LANGNAME() // Espaol - * ? CDOW( DATE() ) - * ? CMONTH( DATE() ) - * $TESTS$ - * Vea ..\tests\langapi.prg tests\langmsg.prg - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es una Extensin de Harbour. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera asociada es lang - * Nota: el nombre de la extensin de la librera, puede cambiar con - * el sistema operativo (.lib .o , etc.) - * $SEEALSO$ - * HB_LANGSELECT(),NATIONMSG() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * HB_SETCODEPAGE() - * $CATEGORY$ - * Nacion - * $ONELINER$ - * Selecciona el cdigo de pgina activo por la ID del idioma - * $SYNTAX$ - * HB_SETCODEPAGE( [] ) --> cViejoLeng - * $ARGUMENTS$ - * El cdigo de identificacin opcional del mdulo de - * idioma del pas. - * Los valores posibles para estan mostrados abajo, tal - * como estn definidos en la librera de Lenguajes, ordenados por - * idioma (segn doc. original en ingls). - * - * - * Idioma Cdigo de Pgina - * - * Ingls 437 EN - * Alemn 850 DE - * Alemn ANSI ANSI DEWIN - * Griego 737 EL - * Griego ANSI Windows-1253 ELWIN - * Hungaro 852 HU852 - * Hungaro Windows-1 HUWIN - * Polaco 852 PL852 - * Polaco ISO-8859-2 PLISO - * Polaco Mozowia PLMAZ - * Polaco Windows-1250 PLWIN - * Portugus 850 PT - * Portugus ISO-8859-1 PTISO - * Ruso 866 RU866 - * Ruso KOI-8 RUKOI8 - * Ruso Windows-1251 RUWIN - * Serbio Windows-1251 SRWIN - * Eslovenio 437 SL437 - * Eslovenio 852 SL852 - * Eslovenio ISO-8859-2 SLISO - * Eslovenio Windows-1250 SLWIN - * Espaol 850 ES - * Espaol ANSI ANSI ESWIN - *
- * $RETURNS$ - * El identificador anterior de Lenguaje - * $DESCRIPTION$ - * HB_SETCODEPAGE() establece el cdigo de pgina activo usado por - * Harbour para ordenar y comparar cadenas. El cdigo de pgina por - * defecto usa el orden ASCII del idioma ingls (cLang == "EN"). - * - * NOTA: Usted debe solicitar a travs del comando 'REQUEST' cada - * mdulo de cdigo de pgina que Ud. intente usar. - * Por ejemplo: para usar el cdigo de pgina Ruso: RU866, Ud. debe - * agregar lo siguiente a su programa: - * REQUEST HB_CODEPAGE_RU866 - * $EXAMPLES$ - * REQUEST HB_CODEPAGE_HU852 - * - * FUNCTION Main() - * LOCAL cTxt := CHR( 71 ) + " > " + CHR( 144 ) + " is" - * - * ? HB_SETCODEPAGE() // EN - * ? cTxt, CHR( 71 ) > CHR( 144 ) // G > is .F. - * - * ? HB_SETCODEPAGE( "HU852" ) // EN - * ? cTxt, CHR( 71 ) > CHR( 144 ) // G > is .T. - * - * ? HB_SETCODEPAGE( "EN" ) // HU852 - * ? cTxt, CHR( 71 ) > CHR( 144 ) // G > is .F. - * RETURN NIL - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es una Extensin de Harbour. - * $PLATFORMS$ - * Todas - * $FILES$ - * La libreras asociadas son rtl, codepage - * $SEEALSO$ - * HB_LANGNAME(),HB_LANGSELECT(),HB_TRANSLATE(),NATIONMSG(),REQUEST - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * HB_TRANSLATE() - * $CATEGORY$ - * Nacion - * $ONELINER$ - * Traduce una cadena de un cdigo de pgina a otro. - * $SYNTAX$ - * HB_TRANSLATE( , [], [] ) - * --> cTextoDest - * $ARGUMENTS$ - * Es la cadena original a traducir. - * - * Es la ID opcional del cdigo de pgina de la cadena - * original. Si no es especificada, es usado el cdigo de - * pgina por defecto. - * - * Es la ID opcional del cdigo de pgina de la cadena de - * destino. Si no es especificada, es usado el cdigo de - * pgina por defecto. - * $RETURNS$ - * HB_TRANSLATE() devuelve la cadena de destino convertida a partir de - * la cadena original. - * $DESCRIPTION$ - * HB_TRANSLATE() trata de convertir la cadena original desde un cdigo - * de pgina a otro. Si el cdigo de pgina no es reconocido, no es - * enlazado, el cdigo de pgina por defecto, es usado. - * HB_TRANSLATE() es generalmente usado para convertir entre los cdigos - * de pgina de DOS y Windows, para un mismo idioma. - * - * NOTA: Si el cdigo de pgina de origen y el cdigo de pgina de - * destino, no tienen el mismo nmero de caracteres, la traduccin - * no puede ser realizada y la cadena de destino es una copia de - * la cadena de origen. - * - * NOTA: Usted debe solicitar a travs del comando 'REQUEST' cada - * mdulo de cdigo de pgina que Ud. intente usar. - * Por ejemplo: para usar el cdigo de pgina Ruso: RU866, Ud. debe - * agregar lo siguiente a su programa: - * REQUEST HB_CODEPAGE_RU866 - * $EXAMPLES$ - * REQUEST HB_CODEPAGE_DE - * REQUEST HB_CODEPAGE_DEWIN - * - * FUNCTION Main() - * LOCAL cTxt := "A" + CHR( 142 ) + "BC" - * - * ? "Texto Alemn 850 :", cTxt - * ? "Texto Alemn ANSI:", HB_TRANSLATE( cTxt, "DE", "DEWIN" ) - * RETURN NIL - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es una Extensin de Harbour. - * $PLATFORMS$ - * Todas - * $FILES$ - * La libreras asociadas son rtl, codepage - * $SEEALSO$ - * HB_LANGSELECT(),HB_SETCODEPAGE(),NATIONMSG(),REQUEST - * $END$ - */ diff --git a/harbour/examples/hbdoc/examples/es/license.txt b/harbour/examples/hbdoc/examples/es/license.txt deleted file mode 100644 index 3ead8a2beb..0000000000 --- a/harbour/examples/hbdoc/examples/es/license.txt +++ /dev/null @@ -1,121 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2001 Alejandro de Grate - * Documentacin en Espaol de license.txt - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * Licencia - * $CATEGORY$ - * Documento - * $ONELINER$ - * Licencia Actual Del Proyecto Harbour - * $DESCRIPTION$ - * - * LICENCIA - * - * Traduccin: Alejandro de Grate. - * - * Nota del traductor: - * Se encar la traduccin de la licencia de Harbour de su original - * en ingls al espaol, debido a que su comprensin podra aportar - * beneficios en los alcances del uso de Harbour y evitar algunos - * malentendidos ya sea para uso personal comercial. - * - * Soy conciente que la presente traduccin puede contener algn - * error u omisin, aunque he hecho los esfuerzos posibles para - * que ello no ocurra. - * - * Para mayor informacin sobre que opina la FSF acerca de las - * traducciones de la GPL consulte: - * - * - * - * Nota Previa al texto de la licencia: (requisito de la FSF) - * - * This is an unofficial translation of the GNU General Public License - * into spanish. It was not published by the Free Software Foundation, - * and does not legally state the distribution terms for software that - * uses the GNU GPL--only the original English text of the GNU GPL does - * that. However, we hope that this translation will help spanish - * speakers understand the GNU GPL better. - * - * Esta es una traduccin no oficial de la Licencia Publica General GNU - * al espaol. No fue publicada por la Fundacin de Software Libre, y - * no establece legalmente los trminos de distribucin para software - * que usa la GPL GNU--slo el texto original en ingls de la GPL GNU - * lo hace. Sin embargo, esperamos que esta traduccin ayude a gente de - * habla hispana a entender mejor la GNU GPL. - * - * - * - * LICENCIA ACTUAL DEL PROYECTO HARBOUR - * ==================================== - * - * (Actualizada al 10/06/2001) - * - * "Este programa es software libre; Ud. puede redistribuirlo y/o - * modificarlo bajo los trminos de la Licencia Pblica General GNU - * como fu publicada por la Fundacin de Software Libre; sea la - * versin 2 de la Licencia, (a su eleccin) alguna versin posterior. - * - * Este programa es distribuido con la esperanza que le pueda ser til, - * pero SIN NINGUNA GARANTIA; an sin la garanta implcita de - * COMERCIALIZACION DESTINO PARA ALGUN PROPOSITO PARTICULAR. - * Consulte la License Pblica General GNU para mayores detalles. - * - * Ud. debera haber recibido una copia de la Licencia Pblica General - * GNU junto con este programa; Vea el archivo COPYING. Si no, escriba - * a la Fundacin de Software Libre: - * - * Free Software Foundation, Inc., - * 59 Temple Place, Suite 330, - * Boston, MA 02111-1307 USA - * ( visite su sitio Web en http://www.gnu.org/). - * - * Como una especial excepcin, el proyecto Harbour da permiso para - * usos adicionales del texto contenido en esta liberacin de Harbour. - * - * La excepcin es que, si Ud. enlaza (link) la Libreras de Harbour - * con otros archivos para producir un ejecutable, esto por s mismo - * no causa que el ejecutable resultante sea cubierto por la Licencia - * Pblica General GNU. - * El uso de ese ejecutable por parte suya no esta en ninguna forma - * restringido, en cuenta del enlazado del cdigo de librera de - * Harbour dentro de l. - * - * Esta excepcin sin embargo, no invalida algunas otras razones por - * las cuales el archivo ejecutable podra estar cubierto por la - * Licencia Pblica General GNU. - * - * Esta excepcin se aplica: solamente al cdigo liberado por el - * Proyecto Harbour bajo el nombre "Harbour". Si Ud. copia cdigo - * desde otro Proyecto Harbour desde alguna liberacin de la - * Fundacin de Software Libre, dentro de una copia de Harbour, tal - * como la Licencia Pblica General lo permite, la excepcin no se - * aplica al cdigo que Ud. agrega de esta forma. Para evitar engaos - * a alguien con el estado de estos archivos modificados, Ud. debe - * borrar el aviso de excepcin de ellos. - * - * Si Ud. escribe modificaciones de su propia creacin para Harbour, - * es su eleccin, cundo permitir que esta excepcin se aplique a - * sus modificaciones. - * Si Ud. no desea eso, borre el aviso de excepcin." - * - * - * $SEEALSO$ - * PANORAMA - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/macro.txt b/harbour/examples/hbdoc/examples/es/macro.txt deleted file mode 100644 index 79c785c972..0000000000 --- a/harbour/examples/hbdoc/examples/es/macro.txt +++ /dev/null @@ -1,99 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2002 Alejandro de Grate - * Documentacin en Espaol de: - * Compilador Macro, HB_SETMACRO() - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * Compilador Macro - * $CATEGORY$ - * Documento - * $ONELINER$ - * Compilador Macro - * $DESCRIPTION$ - * - * Invocando al compilador de Macros: - * ================================= - * - * &variable - * - * &( expresin ) - * - * &variable.text - * - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * HB_SETMACRO() - * $CATEGORY$ - * Compilador Macro - * $ONELINER$ - * Habilita/Inhabilita las caractersticas del Compilador Macro - * $SYNTAX$ - * HB_SETMACRO( , [] ) --> - * $ARGUMENTS$ - * Una de las constantes HB_SM_* definidas en set.ch. - * - * Usar .T. para habilitar .F. para Inhabilitar una - * caracterstica. - * $RETURNS$ - * HB_SETMACRO() retorna el estado anterior de la caracterstica - * solicitada. - * $DESCRIPTION$ - * Esta funcin Habilita / Inhabilita algunas de las caractersticas - * del Compilador de Macros. Harbour extiende las caractersticas para - * macros comparadas con el conjunto original en Clipper. - * Habilitando / Inhabilitando algunas de ellas permite mantener una - * estricta compatibilidad con Clipper. - * - * Las caractersticas disponibles son: - * - * HB_SM_HARBOUR - Habilita las extensiones de Harbour: - * operadores: ++, --, +=, -=, *=, /=, ^= - * objetos: asignaciones a una variable de instancia - * - * HB_SM_XBASE - Habilita extensiones de otros dialectos Xbase++: - * Expansin de listas de expresiones - * - * HB_SM_SHORTCUTS - Habilita la evaluacin optimizada de los - * operadores lgicos (.AND., .OR.) - * - * HB_SM_PREPROC - Habilita el preprocesamiento de comandos - * Esto es significativo si Harbour es compilado con la bandera - * HB_MACRO_STATEMENTS establecida. - * - * $EXAMPLES$ - * INIT PROCEDURE IWANTCLIPPER() - * HB_SETMACRO( HB_SM_HARBOUR, .F. ) - * HB_SETMACRO( HB_SM_XBASE, .F. ) - * RETURN - * - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es una extensin de Harbour. - * $PLATFORMS$ - * Todas - * $FILES$ - * El archivo de cabecera es ..\include\set.ch - * La Librera es macro - * $SEEALSO$ - * Compilador Macro - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/math.txt b/harbour/examples/hbdoc/examples/es/math.txt deleted file mode 100644 index 336fd091a3..0000000000 --- a/harbour/examples/hbdoc/examples/es/math.txt +++ /dev/null @@ -1,587 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2001 Ricardo Ramrez R. - * Documentacin en Espaol de: ABS(), EXP(), LOG(), INT(), MAX() - * MIN(), SQRT(), ROUND() - * - * Basado en ../en/math.txt - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * ABS() - * $CATEGORY$ - * Matemticas - * $ONELINER$ - * Devuelve el valor absoluto de un nmero. - * $SYNTAX$ - * ABS() --> - * $ARGUMENTS$ - * Cualquier nmero. - * $RETURNS$ - * El valor absoluto de un nmero. - * $DESCRIPTION$ - * Esta funcin entrega el valor absoluto de un valor o una expresin - * . - * $EXAMPLES$ - * Function Main() - * - * Local nNumero := 50 - * Local nNumero1 := 27 - * - * qout( nNumero - nNumero1 ) - * qout( nNumero1 - nNumero ) - * qout( ABS(nNumero - nNumero1 ) ) - * qout( ABS(nNumero1 - nNumero ) ) - * qout( ABS( -1 * 345 ) ) - * Return Nil - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta es una funcin compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * Se encuentra en la librera rtl - * $SEEALSO$ - * EXP(),INT() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * EXP() - * $CATEGORY$ - * Matemticas - * $ONELINER$ - * Calcula el valor de e elevado a la potencia indicada. - * $SYNTAX$ - * EXP( ) --> - * $ARGUMENTS$ - * Cualquier nmero real. - * $RETURNS$ - * El anti-logaritmo de . - * $DESCRIPTION$ - * Esta function devuelve el valor de e elevado a la potencia indicada - * en . Es la contraria de LOG(). - * $EXAMPLES$ - * ? EXP(45) - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta es una funcin compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * Se encuentra en la librera rtl - * $SEEALSO$ - * LOG(),SET DECIMALS,SET FIXED - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * INT() - * $CATEGORY$ - * Matemticas - * $ONELINER$ - * Devuelve la parte entera de un valor nmerico. - * $SYNTAX$ - * INT( ) --> - * $ARGUMENTS$ - * Cualquier valor nmerico. - * $RETURNS$ - * La parte entera de un valor nmerico. - * $DESCRIPTION$ - * Esta funcin convierte una expresin numrica en entero. Todos - * lo dgitos decimales son truncados. Esta funcin no redondea el - * valor ni por encima ni por debajo; simplemente trunca el valor - * desde el punto decimal. - * $EXAMPLES$ - * SET Decimal to 5 - * ? INT( 632512.62541 ) - * ? INT( 845414111.91440 ) - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta es una funcin compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * Se encuentra en la librera rtl - * $SEEALSO$ - * ROUND(),STRZERO() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * LOG() - * $CATEGORY$ - * Matemticas - * $ONELINER$ - * Devuelve el logaritmo natural de un nmero. - * $SYNTAX$ - * LOG( ) --> - * $ARGUMENTS$ - * Cualquier expresin numrica. - * $RETURNS$ - * El logaritmo natural de . - * $DESCRIPTION$ - * Esta funcin devuelve el logaritmo natural del nmero . - * Si es 0 o menor que 0, se produce un desbordamiento - * numrico, el cual es mostrado en la pantalla como una serie de - * asteriscos. - * Esta funcin es la contraria de EXP(). - * $EXAMPLES$ - * ? LOG(632512) - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta es una funcin compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * Se encuentra en la librera rtl - * $SEEALSO$ - * EXP(),SET DECIMALS,SET FIXED - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * MAX() - * $CATEGORY$ - * Matemticas - * $ONELINER$ - * Devuelve el mayor de dos nmeros o fechas. - * $SYNTAX$ - * MAX(,) --> - * $ARGUMENTS$ - * Cualquier fecha o valor nmerico. - * - * Cualquier fecha o valor nmerico (con el mismo tipo de - * ). - * $RETURNS$ - * El nmero mayor (o la fecha mayor). - * $DESCRIPTION$ - * Esta funcin devuelve el mayor de las dos expresiones pasadas. Si - * y son del tipo nmerico, el valor devuelto - * por esta funcin ser tambien numrico y ser el mayor de los - * numeros pasados a dicha funcin. Si y son del - * tipo fecha el valor devuelto ser tambien de tipo fecha. Este ser - * la mayor de ellas. - * $EXAMPLES$ - * ? MAX( 214514214,6251242142 ) - * ? MAX( CTOD('11/11/2000'), CTOD('21/06/2014') ) - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta es una funcin compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * Se encuentra en la librera rtl - * $SEEALSO$ - * MIN() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * MIN() - * $CATEGORY$ - * Matemticas - * $ONELINER$ - * Determina el menor de dos nmeros o fechas. - * $SYNTAX$ - * MIN(,) --> - * $ARGUMENTS$ - * Cualquier fecha o valor numrico. - * - * Cualquier fecha o valor numrico (con el mismo tipo de - * ). - * $RETURNS$ - * El valor o fecha menor. - * $DESCRIPTION$ - * Esta funcin devuelve el menor valor del par de expresiones - * recibidas y deben ser del mismo tipo. Si es - * numrico, el menor valor es devuelto. Si es fecha, la fecha menor - * es devuelta. - * $EXAMPLES$ - * ? MIN(214514214,6251242142) - * ? MIN(CTOD('11/11/2000'),CTOD('21/06/2014') - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta es una funcin compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * Se encuentra en la librera rtl - * $SEEALSO$ - * MAX() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * MOD() * - * $CATEGORY$ - * Matemticas - * $ONELINER$ - * Devuelve el residuo de dos nmeros. - * $SYNTAX$ - * MOD( ,) --> - * $ARGUMENTS$ - * Numerador en una expresin de divisin. - * - * Denominador en una expresin de divisin. - * $RETURNS$ - * El residuo despues de la operacin de divisin. - * $DESCRIPTION$ - * Esta funcin devuleve el residuo de un nmero dividido entre otro. - * $EXAMPLES$ - * ? MOD( 12,8.521 ) - * ? MOD( 12,0 ) - * ? MOD( 62412.5142,4522114.12014 ) - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta es una funcin compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * Se encuentra en la librera rtl - * $SEEALSO$ - * % - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * SQRT() - * $CATEGORY$ - * Matemticas - * $ONELINER$ - * Calcula la raz cuadrada de un nmero. - * $SYNTAX$ - * SQRT( ) --> - * $ARGUMENTS$ - * Cualquier valor numrico. - * $RETURNS$ - * La raz cuadrada de . - * $DESCRIPTION$ - * Esta funcin devuelve la raz cuadrada de . La presicin - * de esta evaluacin esta basada nicamente en la asignacin del - * comando SET DECIMAL TO - * Cualquier nmero negativo pasado como siempre retornar 0. - * $EXAMPLES$ - * SET Decimal to 5 - * ? SQRT( 632512.62541 ) - * ? SQRT( 845414111.91440 ) - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta es una funcin compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * Se encuentra en la librera rtl - * $SEEALSO$ - * ROUND(),SET DECIMALS,SET FIXED - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * ROUND() - * $CATEGORY$ - * Matemticas - * $ONELINER$ - * Redondea una expresin numrica. - * $SYNTAX$ - * ROUND( , ) --> - * $ARGUMENTS$ - * Cualquier valor numrico. - * - * El nmero de lugares decimales a redondear. - * $RETURNS$ - * El nmero redondeado. - * $DESCRIPTION$ - * Esta funcin redondea el valor de a la cantidad de lugares - * decimales especificados en . Si el valor de es - * un nmero negativo, la funcin intentar redondear en el - * nmero completo. Nmeros de 5 a 9 sern redondeados hacia arriba, el - * resto redondeados hacia abajo. - * $EXAMPLES$ - * ? ROUND(632512.62541,5) - * ? ROUND(845414111.91440,3) - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta es una funcin compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * Se encuentra en la librera rtl - * $SEEALSO$ - * INT(),SET DECIMALS,SET FIXED,STR(),VAL() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_getMathError() - * $CATEGORY$ - * Matemticas API - * $ONELINER$ - * Obtener el ltimo error de la librera matemtica. - * $SYNTAX$ - * C Prototype - * - * #include - * hb_getMathError (void) --> int iMathError - * $ARGUMENTS$ - * Ninguno - * $RETURNS$ - * Retorna el ltimo error matemtico - * $DESCRIPTION$ - * - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * Se encuentra en la librera rtl - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_setMathError(),hb_resetMathError() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_resetMathError() - * $CATEGORY$ - * Matemticas API - * $ONELINER$ - * Inicializa el error matemtico. - * $SYNTAX$ - * C Prototype - * - * #include - * hb_resetMathError (void) --> void - * $ARGUMENTS$ - * Ninguno - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * Pone en cero (No hay error) a la variable donde se conservan los - * errores matemticos - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * Se encuentra en la librera rtl - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_isMathHandler() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_isMathHandler() - * $CATEGORY$ - * Matemticas API - * $ONELINER$ - * Verifica si el manejador de errores de Harbour esta disponible. - * $SYNTAX$ - * C Prototype - * - * #include - * hb_isMathHandler (void) --> int iIsMathHandler - * $ARGUMENTS$ - * Ninguno - * $RETURNS$ - * - * $DESCRIPTION$ - * - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * Se encuentra en la librera rtl - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_installMathHandler(),hb_getMathHandlerStatus() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_installMathHandler() - * $CATEGORY$ - * Matemticas API - * $ONELINER$ - * Agrega un manejador de errores definido por el usuario - * $SYNTAX$ - * C Prototype - * - * #include - * hb_installMathHandler (HB_MATH_HANDLERPROC handlerproc) - * --> HB_MATH_HANDLERHANDLE handle - * $ARGUMENTS$ - * Manejador para el manejador de errores - * $RETURNS$ - * Identificador del manejador en la cadena de - * identificadores. - * $DESCRIPTION$ - * - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * Se encuentra en la librera rtl - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_deinstallMathHandler() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_deinstallMathHandler() - * $CATEGORY$ - * Matemticas API - * $ONELINER$ - * Quita un manejador de errores definido por el usuario. - * $SYNTAX$ - * C Prototype - * - * #include - * hb_deinstallMathHandler (HB_MATH_HANDLERHANDLE handle) - * --> int iSuccess - * $ARGUMENTS$ - * Identificador devuelto por hb_installMathHandler() - * $RETURNS$ - * Como termino el proceso. - * $DESCRIPTION$ - * - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * Se encuentra en la librera rtl - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_installMathHandler() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_setMathHandlerStatus() - * $CATEGORY$ - * Matemticas API - * $ONELINER$ - * Pone el estado del manejador de errores definido por el usuario - * $SYNTAX$ - * C Prototype - * - * #include - * hb_setMathHandlerStatus (HB_MATH_HANDLERHANDLE handle, int status) - * --> int iSuccess - * $ARGUMENTS$ - * Identificador devuelto por hb_installMathHandler() - * nuevo valor del estado, puede ser uno de los - * siguientes: - * HB_MATH_HANDLER_STATUS_INACTIVE - * --> identificador presente pero no activo - * HB_MATH_HANDLER_STATUS_ACTIVE - * --> identificador presente y activo - * $RETURNS$ - * iSuccess Como termino el proceso. - * $DESCRIPTION$ - * - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * Se encuentra en la librera rtl - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_getMathHandlerStatus() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * hb_getMathHandlerStatus() - * $CATEGORY$ - * Matemticas API - * $ONELINER$ - * Lee el estado del manejador de errores definido por el usuario - * $SYNTAX$ - * C Prototype - * - * #include - * hb_getMathHandlerStatus (HB_MATH_HANDLERHANDLE handle) - * --> int iStatus - * $ARGUMENTS$ - * Identificador devuelto por hb_installMathHandler() - * $RETURNS$ - * Estado del manejador de errores. - * $DESCRIPTION$ - * - * $EXAMPLES$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Compatibilidad no es aplicable a las llamadas a las APIs. - * $FILES$ - * Se encuentra en la librera rtl - * $PLATFORMS$ - * Todas - * $SEEALSO$ - * hb_setMathHandlerStatus() - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/memo.txt b/harbour/examples/hbdoc/examples/es/memo.txt deleted file mode 100644 index 2bba6e0794..0000000000 --- a/harbour/examples/hbdoc/examples/es/memo.txt +++ /dev/null @@ -1,253 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2000-2003 Alejandro de Grate - * Documentacin en Espaol de: MEMOTRAN(), HARDCR() - * MEMOREAD(), MEMOWRIT() - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * MEMOTRAN() - * $CATEGORY$ - * Cadenas - * $ONELINER$ - * Reemplaza los retornos del carro/nueva linea de una cadena - * $SYNTAX$ - * MEMOTRAN( , , ) --> - * $ARGUMENTS$ - * es la cadena de caracteres a convertir. - * - * es el carcter para reemplazar los retornos de carro "duro". - * Si no es especificado por defecto es el punto y coma. - * - * es el cracter para reemplazar los retornos de carro - * "blandos". Si no es especificado, por defecto es un espacio - * en blanco. - * $RETURNS$ - * MEMOTRAN() retorna , la cadena transformada. - * $DESCRIPTION$ - * Esta funcin retorna una cadena donde los caracteres de retorno de - * carro han sido convertidos a los caracteres especificados. - * $EXAMPLES$ - * * El siguiente ejemplo formatea un campo memo conteniendo un mensaje - * de error en una cadena adecuada para ser enviada a la funcin - * ALERT() - * - * cMensaje = MEMOTRAN( Errores->MENSAJE ) - * ALERT( cMensaje, aOpciones ) - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es totalmente compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera asociada es rtl - * $SEEALSO$ - * HARDCR(),STRTRAN() - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * HARDCR() - * $CATEGORY$ - * Cadenas - * $ONELINER$ - * Reemplaza los CHR(141) por retornos de carro normal CHR(13) - * $SYNTAX$ - * HARDCR( ) --> - * $ARGUMENTS$ - * es la cadena de caracteres a convertir. - * $RETURNS$ - * HARDCR() retorna , la cadena transformada. - * $DESCRIPTION$ - * Esta funcin retorna una cadena/memo donde los caracteres de retorno - * de carro automaticos "blandos" ( CHR(141) ) son convertidos a - * caracteres de retorno de carro forzado "duro" CHR(13). - * $EXAMPLES$ - * * El siguiente ejemplo asigna a una variable de cadena, el campo memo - * NOTAS existente en la base Clientes, transformado para mostrarlo - * por pantalla. - * cNotas = HARDCR( Clientes->NOTAS ) - * ? cNotas - * - * * El siguiente ejemplo envia a la impresora el contenido de un campo - * memo. - * - * SET DEVICE TO PRINTER - * DEVPOS( nFil, nCol) - * DEVOUT( HARDCR( Clientes->NOTAS ) ) - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es totalmente compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera asociada es rtl - * $SEEALSO$ - * MEMOTRAN(),STRTRAN() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * MEMOREAD() - * $CATEGORY$ - * Campo Memo - * $ONELINER$ - * Retorna el contenido de un archivo como cadena de caracteres - * $SYNTAX$ - * MEMOREAD( ) --> - * $ARGUMENTS$ - * Nombre del archivo a leer. Debe incluir la extensin. - * Si el archivo se encuentra en otro subdirectorio, se - * debe incluir el path. - * $RETURNS$ - * Retorna el contenido de un archivo de texto como una cadena de - * caracteres . - * El tamao mximo del archivo, que puede ser ledo, es el mismo que - * el tamao mximo de una cadena de caracteres (ms de 2 Mb). Harbour - * no tiene el lmite de 64 Kb como en Clipper. - * Si no puede ser encontrado o ledo, la funcin retorna - * una cadena de caracteres, vacia (""). - * $DESCRIPTION$ - * MEMOREAD() es una funcin que lee el contenido de un archivo de texto - * (hasta ahora) desde un archivo en disco (floppy, HD, CD-ROM, etc.) - * De esa forma Ud. puede manipular el contenido como cualquier cadena - * de caracteres asignarlo a un campo memo para ser guardado en una - * base de datos. - * - * La funcin MEMOREAD() es usada junto con MEMOWRIT() y MEMOEDIT() - * para obtener de disco, texto de diferentes fuentes y que podra ser - * objeto de edicin, bsqueda, reemplazo, visualizacin, etc. y luego - * ser escrito a la base de datos. - * - * Es usada para importar datos desde otras fuentes a la base de datos. - * - * Nota: - * MEMOREAD() no usa los seteos SET DEFAULT y SET PATH para buscar por - * . - * Esta funcin busca por en el directorio actual. - * Si el archivo no se encuentra, entonces MEMOREAD() busca en el path - * del D.O.S. - * - * Sobre un entorno de red, MEMOREAD() intenta abrir el archivo - * en modo de slo-lectura y compartido. Si el archivo es - * usado en modo exclusivo (no compartido) por otro proceso o programa - * la funcin devolver una cadena vacia (""). - * - * Es una de las funciones de Clipper ms til, realmente lo hace fcil. - * $EXAMPLES$ - * * Este ejemplo usa MEMOREAD() para asignar el contenido de un - * archivo de texto a una variable para una bsqueda posterior. - * - * cFile := "account.prg" - * cString := MEMOREAD( cFile ) - * - * IF AT( "Melina", cString) == 0 // chequea el copyright - * MEMOWRIT( cFile, cCopyright + cString ) // si falta, ponerlo ! - * ENDIF - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es totalmente compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera asociada es rtl - * $SEEALSO$ - * MEMOEDIT(),MEMOWRIT(),REPLACE - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * MEMOWRIT() - * $CATEGORY$ - * Campo Memo - * $ONELINER$ - * Escribe un campo memo una cadena a un archivo de texto en disco - * $SYNTAX$ - * MEMOWRIT( , , [] ) --> lExito - * $ARGUMENTS$ - * Nombre del archivo a leer. Debe incluir la extensin. - * Si el archivo se encuentra en otro subdirectorio, se - * debe incluir el path. - * - * Es un campo memo o una cadena de caracteres, a ser - * escrita en . - * - * Es una variable lgica que determina si el carcter - * de fin de archivo - CHR(26) - se escribe a disco. - * Este parmetro es opcional. Su valor por defecto es - * verdadero (.T.) - * $RETURNS$ - * La funcin devuelve verdadero (.T.) si la operacion de escritura fue - * exitosa, de otro modo, sta devuelve falso (.F.). - * $DESCRIPTION$ - * Esta es una funcin que escribe un campo memo una cadena de - * caracteres a un archivo de texto en disco (floppy, HD, CD-ROM, etc.) - * Si Ud. no especifica un path, MEMOWRIT() escribe en el - * directorio actual. Si existe ste ser sobreescrito. - * - * Nota: - * Existe un tercer parmetro opcional (que est ausente - * en Clipper), el cual le permite al programador cambiar en tiempo de - * ejecucin el comportamiento (por defecto) de escribir - siempre - - * el carcter de fin de archivo, CHR(26) como en Clipper. - * Si no existe un tercer parametro, nada cambia, EOF es escrito como - * en Clipper, lo mismo ocurre cuando es puesto en .T. - * Pero, si es puesto en .F., el carcter EOF no es - * escrito al final del archivo. - * - * La funcin MEMOWRIT() es usada junto con MEMOREAD() y MEMOEDIT() para - * grabar a disco texto de diferentes fuentes y que pudo haber sido - * objeto de edicin, bsqueda, reemplazo, visualizacin, etc. - * - * Esta funcin es usada para exportar la base de datos a otro formato. - * - * Nota: - * MEMOWRIT() no usa el seteo de directorio SET DEFAULT. - * - * Es una de las funciones de Clipper ms til, realmente lo hace fcil. - * $EXAMPLES$ - * * Este ejemplo usa MEMOWRIT() para escribir el contenido de una - * variable de caracteres a un archivo de texto - * - * cFile := "account.prg" - * cString := MEMOREAD( cFile ) - * - * IF AT( "Melina", cString) == 0 // chequea el copyright - * MEMOWRIT( cFile, cCopyright + cString ) // si falta, ponerlo ! - * ENDIF - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es totalmente compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera asociada es rtl - * $SEEALSO$ - * MEMOEDIT(),MEMOREAD() - * $END$ - */ - - - - diff --git a/harbour/examples/hbdoc/examples/es/memvar2.txt b/harbour/examples/hbdoc/examples/es/memvar2.txt deleted file mode 100644 index f726476e7b..0000000000 --- a/harbour/examples/hbdoc/examples/es/memvar2.txt +++ /dev/null @@ -1,195 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2003 Alejandro de Grate - * Documentacin en Espaol de: - * FIELD, LOCAL, MEMVAR - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $COMMANDNAME$ - * FIELD - * $CATEGORY$ - * Comando - * $ONELINER$ - * Declara una lista de nombres de campo de una base de datos - * $SYNTAX$ - * FIELD [, [in ] - * $ARGUMENTS$ - * Un nombre de campo vlido - * - * Nombres de campo adicionales - * - * Un nombre de alias vlido - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * Este comando declara los nombres de los campos y siguientes - * con una identificador opcional de alias para - * cada uno. - * Este comando le permite a Harbour resolver cualquier referencia a un - * campo especificado en la lista de campos, vindolo como un campo - * cuando no es referenciado por un alias. - * Si un campo no est mencionado en la lista y no est explicitamente - * marcado con el identificador de alias, ste puede ser visto como una - * variable de memoria, lo cual puede causar errores de ejecucin. - * - * Este comando no tiene efecto sobre variables de memoria sobre - * referencias a campos metidos dentro de una macro-expresin. - * $EXAMPLES$ - * FUNCTION MAIN - * FIELD iD - * FIELD Name - * USE TESTS NEW - * name := "Sales" - * Id := 5 - * USE - * RETURN NIL - * $TESTS$ - * Ver ../tests/testwarn.prg - * $STATUS$ - * R - * $COMPLIANCE$ - * Este comando trabaja exactamente como en CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * Ninguno - * $SEEALSO$ - * MEMVAR,PRIVATE,PUBLIC,STATIC - * $END$ - */ - - -/* $DOC$ - * $COMMANDNAME$ - * LOCAL - * $CATEGORY$ - * Comando - * $ONELINER$ - * Crea e inicializa una variable de memoria un array LOCAL - * $SYNTAX$ - * LOCAL [:= ] - * LOCAL [:= ], ..., [:= ] - * $ARGUMENTS$ - * Nombre de variable de Memoria array. - * - * Valor a ser asignado a la variable array - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * Este comando Crea una variable de memoria un array LOCAL - * El nombre de cualquiera es especificado en . - * Si ms de una variable est siendo inicializada con la sentencia - * LOCAL, separe cada una de ellas con una coma. - * Si una variable un array le va a ser asignado un valor de inicio - * esa expresin puede ser especificada en , usando el operador - * de asignacin en lnea <:=> - * - * Nota: - * Si el modo de compilacin "Fuertemente Tipeado" (Strong type) es - * usado, el compilador chequear si el valor recibido coincide con el - * tipo especificado en . - * - * Las Variables LOCALes son smbolos generados en tiempo de ejecucin - * y son resueltos en tiempo de compilacin (???). - * La visibilidad y tiempo de vida de una variable array LOCAL est - * limitada a la funcin procedimiento en la cual sta es definida. - * - * Ninguna macro-expansin es permitida de una sentencia de declaracin - * LOCAL. - * - * Ningn comando de Harbour distinto a FUNCTION, PROCEDURE, PUBLIC, - * PRIVATE, PARAMETERS, MEMVAR, STATIC y FIELD, pueden preceder a la - * sentencia LOCAL (esto esta mal) - * - * Las referencias a un array LOCAL pueden no ser inicializadas (por - * ej. asignarle un valor) en la misma lnea de comando junto con la - * sentencia LOCAL. Esto puede ser hecho luego en el programa. - * - * Variables y arrays de tipo LOCAL no son afectadas por el comando - * RELEASE. - * $EXAMPLES$ - * Function Main2() - * Local n , lVar - * - * n := IIF( lVar, 'A', 3 ) - * n := 2 - * n := 'a' - * n := seconds() + 2 - * n := int( seconds() + 2 ) - * Return NIL - * $TESTS$ - * Ver ../tests/testwarn.prg por ms ejemplos - * $STATUS$ - * R - * $COMPLIANCE$ - * Este comando trabaja exactamente como en CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * Ninguno - * $SEEALSO$ - * FIELD,PRIVATE,PUBLIC,STATIC,MEMVAR - * $END$ - */ - -/* $DOC$ - * $COMMANDNAME$ - * MEMVAR - * $CATEGORY$ - * Comando - * $ONELINER$ - * Declara variables PRIVATE, PUBLIC y arrays. - * $SYNTAX$ - * MEMVAR - * $ARGUMENTS$ - * Nombre de variable de Memoria - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * Este comando le dice al compilador como resolver alguna referencia - * a una variable de memoria designada dentro de esta lista si posee - * un alias explcito con el prefijo "M->" bien "MEMVAR->" - * Solamente aquellas variables de memoria que no contengan ese prefijo - * son afectadas por este comando. Aquellas variables de memoria dentro - * de expansiones macro, no son afectadas por este comando. - * - * La declaracin MEMVAR debe aparecer antes que cualquier comando - * ejecutable; esta es similar a las sentencias LOCAL, STATIC, FIELD, - * PARAMETERS, FUNCTION y PROCEDURE - * $EXAMPLES$ - * MEMVAR y As Numeric - * Function Main2() - * LOCAL n , lVar - * - * n := IIF( lVar, 'A', 3 ) - * n := 2 - * n := 'a' - * n := seconds() + 2 - * n := int( seconds() + 2 ) - * y := n - * ? y - * Return NIL - * $TESTS$ - * Ver ../tests/testwarn.prg por ms ejemplos - * $STATUS$ - * R - * $COMPLIANCE$ - * Este comando trabaja exactamente como en CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * Ninguno - * $SEEALSO$ - * LOCAL,STATIC,FIELD,PRIVATE,PUBLIC - * $END$ - */ diff --git a/harbour/examples/hbdoc/examples/es/misc.txt b/harbour/examples/hbdoc/examples/es/misc.txt deleted file mode 100644 index bca3feeade..0000000000 --- a/harbour/examples/hbdoc/examples/es/misc.txt +++ /dev/null @@ -1,257 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2003 Alejandro de Grate - * Documentacin en Espaol de: - * OS(), VERSION(), GETENV(), __RUN(), TONE(), RUN - * - * Copyright 2000 Chen Kedem - * Documentacin en Ingls de: TONE() - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * OS() - * $ONELINER$ - * Retorna el sistema operativo subyacente. - * $SYNTAX$ - * OS() --> - * $CATEGORY$ - * DOS - * $RETURNS$ - * el actual sistema operativo - * $DESCRIPTION$ - * Esta funcin devuelve el actual sistema operativo como una cadena - * de caracteres. - * $EXAMPLES$ - * ? OS() - * $TESTS$ - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta es una funcin compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * El cdigo fuente esta en ../source/rtl/version.c - * La librera es rtl - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * VERSION() - * $CATEGORY$ - * Entorno - * $ONELINER$ - * Retorna la Versin de HARBOUR - * $SYNTAX$ - * VERSION() --> - * $ARGUMENTS$ - * Ninguno - * $RETURNS$ - * Cadena conteniendo la versin de Harbour - * $DESCRIPTION$ - * Esta funcin devuelve la actual versin de Harbour. - * $EXAMPLES$ - * // Visualiza algo similar a: Harbour Alpha build 40.0 Intl. (Flex) - * ? QOUT( VERSION() ) - * $TESTS$ - * $STATUS$ - * S - * $COMPLIANCE$ - * Esta es una funcin compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * El cdigo fuente esta en ../source/rtl/version.c - * La librera es rtl - * $SEEALSO$ - * OS() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * GETENV() - * $CATEGORY$ - * Entorno - * $ONELINER$ - * Obtiene datos de las Variables de Entorno del Sistema Operativo - * $SYNTAX$ - * GETENV(, ) --> - * $ARGUMENTS$ - * Variable de Entorno a obtener - * - * Valor opcional a retornar si la variable - * no es encontrada. - * $RETURNS$ - * Valor de la variable de Entorno - * $DESCRIPTION$ - * Esta funcin produce una cadena que es el valor de la variable de - * Entorno , la cual es almacenada a nivel del sistema - * operativo con el comando SET del mismo. - * Si ninguna variable de Entorno puede ser encontrada, el valor que - * retorne la funcin ser si ste es pasado, de lo - * contrario una cadena vaca. - * $EXAMPLES$ - * QOUT( GETENV('PATH')) - * QOUT( GETENV('CONFIG')) - * QOUT( GETENV('HARBOURCMD', '-n -l -es2')) - * - * $TESTS$ - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta es una funcin compatible con CA-Cl*pper. - * El parmetro es una extensin de Harbour. - * $PLATFORMS$ - * Todas - * $FILES$ - * El cdigo fuente esta en ../source/rtl/gete.c - * La librera es rtl - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * __RUN() - * $CATEGORY$ - * DOS - * $ONELINER$ - * Corre/Ejecuta un programa externo. - * $SYNTAX$ - * __RUN( ) - * $ARGUMENTS$ - * Comando a ejecutar - * $DESCRIPTION$ - * Este Comando ejecuta un programa externo. Por favor asegrese que - * Ud. tiene sufuciente memoria libre para poder ejecutar el programa - * externo. - * No lo use para correr programas que permanecen residentes (en el - * caso del sistema operativo DOS) porque puede causar muchos problemas - * - * Nota: El comando RUN es preprocesado en esta funcin. - * Se considera una mala prctica usar esta funcin directamente - * Use el comando RUN en su lugar. - * $EXAMPLES$ - * __Run( "edit " + cMyTextFile ) // Corre un Editor externo - * __Run( "command" ) // Da el prompt del DOS (slo DOS) - * - * $TESTS$ - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta es una funcin compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * El cdigo fuente esta en ../source/rtl/run.c - * La librera es rtl - * $SEEALSO$ - * RUN - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * TONE() - * $CATEGORY$ - * Miscelanea - * $ONELINER$ - * Suena un tono con una frecuencia y duracin especificada. - * $SYNTAX$ - * TONE( , ) --> NIL - * $ARGUMENTS$ - * Un valor numrico no negativo que especifica la - * frecuencia del tono en Hertzios (ciclos por segundo) - * - * Un valor numrico positivo que especifica la duracin - * del tono en unidades de 1/18 avo de segundo. - * $RETURNS$ - * TONE() siempre devuelve NIL. - * $DESCRIPTION$ - * TONE() es una funcin de sonido que podra ser usada para irritar - * al usuario final, a su perro y al vecindario que lo rodea. - * La frecuencia est limitada al rango 0 to 32767 Hz. Las frecuencias - * por debajo de 20 Hz son inaudibles. - * Si hay decimales en los argumentos estos se truncan. - * $EXAMPLES$ - * IF lOk // Suena bien - * TONE( 500, 1 ) - * TONE( 4000, 1 ) - * TONE( 2500, 1 ) - * ELSE // Suena mal - * TONE( 300, 1 ) - * TONE( 499, 5 ) - * TONE( 700, 5 ) - * ENDIF - * - * $TESTS$ - * TONE( 800, 1 ) // igual que ? CHR(7) - * TONE( 32000, 200 ) // algun perro alrededor ? - * TONE( 261, 1 ) // nota musical - C (DO medio) - * TONE( 400, 0 ) // pitido corto - * TONE( 700 ) // - * TONE( 10, 18.2 ) // demora de 1 segundo - * TONE( -1 ) // demora de 1/18.2 segundo - * TONE( ) // demora de 1/18.2 segundo - * - * $TESTS$ - * $STATUS$ - * S - * $COMPLIANCE$ - * Esta es una funcin compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * CHR(),SET BELL - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * RUN - * $CATEGORY$ - * Comando - * $ONELINER$ - * Corre/Ejecuta un programa externo. - * $SYNTAX$ - * RUN - * $ARGUMENTS$ - * Comando a ejecutar - * $DESCRIPTION$ - * Este Comando ejecuta un programa externo. Por favor asegrese que - * Ud. tiene sufuciente memoria libre para poder ejecutar el programa - * externo. - * No lo use para correr programas que permanecen residentes (en el - * caso del sistema operativo DOS) porque puede causar muchos problemas. - * $EXAMPLES$ - * RUN "edit " + cMyTextFile // Corre un Editor externo - * RUN "command" // Da el prompt del DOS (slo DOS) - * $TESTS$ - * $STATUS$ - * R - * $COMPLIANCE$ - * Este es un Comando compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * El cdigo fuente esta en ../source/rtl/run.c - * La librera es rtl - * $SEEALSO$ - * RUN - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/nation.txt b/harbour/examples/hbdoc/examples/es/nation.txt deleted file mode 100644 index b4b847ebbe..0000000000 --- a/harbour/examples/hbdoc/examples/es/nation.txt +++ /dev/null @@ -1,132 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2000 Alejandro de Grate - * Documentacin en Espaol de: ISAFFIRM(), ISNEGATIVE(), NATIONMSG() - * - * Copyright 1999 Jose Lalin - * Documentacin en Ingles de: ISAFFIRM(), ISNEGATIVE(), NATIONMSG() - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * ISAFFIRM() - * $CATEGORY$ - * Nacion - * $ONELINER$ - * Chequea si el caracter pasado es el caracter de afirmacin - * $SYNTAX$ - * ISAFFIRM( ) --> - * $ARGUMENTS$ - * es un char cadena de caracteres - * $RETURNS$ - * Verdadero si el caracter pasado es el caracter de - * afirmacin, Falso de otro modo. - * $DESCRIPTION$ - * Esta funcin es usada para chequear si la entrada del usuario es - * verdadera no, de acuerdo al mdulo msgxxx usado. - * En Clipper el mdulo por defecto depende de la versin usada, en - * Harbour el mdulo por defecto es el Ingls. - * En ingls la opcin vlida es "Y", en espaol "S" - * $EXAMPLES$ - * // Esperar hasta que el usuario ingrese "Y" - * DO WHILE ! ISAFFIRM( cYesNo ) - * ACCEPT "Esta Seguro ?: " TO cYesNo - * END DO - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es totalmente compatible con CA-Cl*pper. - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * ISNEGATIVE(),NATIONMSG() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * ISNEGATIVE() - * $CATEGORY$ - * Nacion - * $ONELINER$ - * Chequea si el caracter pasado es el caracter de negacin - * $SYNTAX$ - * ISNEGATIVE( ) --> - * $ARGUMENTS$ - * es un char cadena de caracteres - * $RETURNS$ - * Verdadero si el caracter pasado es el caracter de - * negacin, Falso de otro modo. - * $DESCRIPTION$ - * Esta funcin es usada para chequear si la entrada del usuario es - * verdadera no, de acuerdo al mdulo msgxxx usado. - * En Clipper el mdulo por defecto depende de la versin usada, en - * Harbour el mdulo por defecto es el Ingls. - * En ingls la opcin vlida es "N", en espaol "N" - * $EXAMPLES$ - * // Esperar hasta que el usuario ingrese "N" - * DO WHILE ! ISNEGATIVE( cYesNo ) - * ACCEPT "Esta Seguro ?: " TO cYesNo - * END DO - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es totalmente compatible con CA-Cl*pper. - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * ISAFFIRM(),NATIONMSG() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * NATIONMSG() - * $CATEGORY$ - * Nacion - * $ONELINER$ - * Retorna cadenas de mensajes internacionales. - * $SYNTAX$ - * NATIONMSG( ) --> - * $ARGUMENTS$ - * es el nmero de Mensaje que Ud. quiere obtener. - * $RETURNS$ - * Si es un selector de mensaje vlido, entonces se - * retorna el mensaje. - * Si es NIL, retorna "Invalid Argument", y si no es de - * tipo NUMERIC esta retorna una cadena vacia. - * $DESCRIPTION$ - * NATIONMSG() retorna las descripciones internacionales de mensajes. - * En Clipper el mdulo por defecto depende de la versin usada, en - * Harbour el mdulo por defecto es el Ingls. - * $EXAMPLES$ - * // Visualiza "Seguro Y/N: " y espera hasta que el usuario entra "Y" - * // Y/N es la cadena NATIONMSG( 12 ) con el mdulo natmsg por - * // defecto. - * DO WHILE ! ISAFFIRM( cYesNo ) - * ACCEPT "Esta Seguro " + NATIONMSG( 12 ) + ": " TO cYesNo - * END DO - * - * $STATUS$ - * C - * $COMPLIANCE$ - * Esta funcin es totalmente compatible con CA-Cl*pper. - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * ISAFFIRM(),ISNEGATIVE() - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/objfunc.txt b/harbour/examples/hbdoc/examples/es/objfunc.txt deleted file mode 100644 index 1b1361644d..0000000000 --- a/harbour/examples/hbdoc/examples/es/objfunc.txt +++ /dev/null @@ -1,815 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2000 Alejandro de Grate - * Documentacin en Espaol de: - * __objHasData(), __objHasMethod(), __objGetMsgList(), - * __objGetMethodList(), __objGetValueList(), - * __ObjSetValueList(), __objAddMethod(), - * __objAddInline(), __objAddData(), __objModMethod(), - * __objModInline(), __objDelMethod(), __objDelInline(), - * __objDelData(), __objDerivedFrom() - * - * Copyright 1999-2000 Chen Kedem - * Documentacin en Ingles de: - * __objHasData(), __objHasMethod(), __objGetMsgList(), - * __objGetMethodList(), __objGetValueList(), - * __ObjSetValueList(), __objAddMethod(), - * __objAddInline(), __objAddData(), __objModMethod(), - * __objModInline(), __objDelMethod(), __objDelInline(), - * __objDelData(), __objDerivedFrom() - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * __objHasData() - * $CATEGORY$ - * Manejo de objetos - * $ONELINER$ - * Determina cuando un smbolo existe en un objeto como DATA - * $SYNTAX$ - * __objHasData( , ) --> lExiste - * $ARGUMENTS$ - * es el objeto a inspeccionar - * - * es el nombre del smbolo a buscar - * $RETURNS$ - * __objHasData() retorna .T. si el dado existe como DATA - * (variable de instancia) en el objeto - * $STATUS$ - * R - * $COMPLIANCE$ - * __objHasData() es una extensin de Harbour. - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * __ObjGetMethodList(),__objGetMsgList(),__objHasMethod() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * __objHasMethod() - * $CATEGORY$ - * Manejo de objetos - * $ONELINER$ - * Determina cuando un smbolo existe en un objeto como METHOD - * $SYNTAX$ - * __objHasMethod( , ) --> lExist - * $ARGUMENTS$ - * es el objeto a inspeccionar - * - * es el nombre del smbolo a buscar - * $RETURNS$ - * __objHasMethod() retorna .T. si el dado existe como - * METHOD (funcin de clase) en el Objeto - * $STATUS$ - * R - * $COMPLIANCE$ - * __objHasMethod() es una extensin de Harbour. - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * __ObjGetMethodList(),__objGetMsgList(),__objHasData() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * __objGetMsgList() - * $CATEGORY$ - * Manejo de objetos - * $ONELINER$ - * Retorna los nombres de todos los DATA o METHOD para un Objeto dado - * $SYNTAX$ - * __objGetMsgList( , [], [nClassType] ) --> aNombres - * $ARGUMENTS$ - * es un Objeto a inspeccionar - * - * es un valor lgico opcional que especifica la informacin - * a retornar. Un valor .T. instruye a la funcin a devolver una lista - * todos los nombres DATA, un valor de .F. instruye a la funcin a - * devolver una lista de todos los nombres de METHODos. - * El valor por defecto es .T. - * - * es un cdigo numrico opcional para seleccionar cual - * tipo de clase se va retornar. - * El valor por defecto es HB_MSGLISTALL, retornando la lista entera. - * $RETURNS$ - * __objGetMsgList() devuelve un array de cadenas con los - * nombres de todos los DATA o todos los METHOD para un objeto dado. - * __objGetMsgList() podra retornar un array vacio, {} si el objeto - * dado no contiene la informacin solicitada. - * $DESCRIPTION$ - * __objGetMsgList() es una funcin de soporte de clases de bajo nivel - * que le permite a Ud. encontrar todas las variables de instancia o - * los nombre de los metodos para un Objeto dado. - * - * Si es es especificada, la siguiente tabla muestra los valores para - * que le permiten a Ud. distinguir entre DATA y - * CLASSDATA: - * - * - * hboo.ch Valor Significado - * - * HB_MSGLISTALL 0 Todos los tipos - * HB_MSGLISTCLASS 1 CLASSDATA solamente - * HB_MSGLISTPURE 2 DATA solamente - *
- * - * DATA son variables de instancia usables dentro de cada objeto desde - * una clase, donde cada Objeto tiene sus propios DATAs. - * - * Las CLASSDATA son compartidas por todos los objetos desde una Clase, - * asi el valor cambiado dentro del Objeto1 sera reflejado cuando se - * acceda la CLASSDATA desde el Objeto2. - * $EXAMPLES$ - * // Muestra informacin sobre la clase TBrowse - * oB := TBrowseNew( 0, 0, 24, 79 ) - * aData := __objGetMsgList( oB, .T. ) - * aClassData := __objGetMsgList( oB, .T., HB_MSGLISTCLASS ) - * aMethod := __objGetMsgList( oB, .F. ) - * - * FOR i = 1 to len ( aData ) - * ? "nombre de DATA:", aData[ i ] - * NEXT - * - * FOR i = 1 to len ( aClassData ) - * ? "nombre de CLASSDATA:", aClassData[ i ] - * NEXT - * - * FOR i = 1 to len ( aMethod ) - * ? "nombre de METHOD:", aMethod[ i ] - * NEXT - * - * $STATUS$ - * R - * $COMPLIANCE$ - * __objGetMsgList() es una extensin de Harbour. - * $FILES$ - * El archivo de cabecera es hboo.ch - * La librera es rtl - * $SEEALSO$ - * __ObjGetMethodList(),__ObjGetValueList(),__objHasData(),__objHasMethod() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * __objGetMethodList() - * $CATEGORY$ - * Manejo de objetos - * $ONELINER$ - * Retorna un array con los nombres de todos los METHOD de un Objeto - * $SYNTAX$ - * __objGetMethodList( ) --> aNombreMetodos - * $ARGUMENTS$ - * es el objeto a inspeccionar - * $RETURNS$ - * __objGetMethodList() devuelve un array de cadenas - * con los nombres de todos los METHOD para un objeto dado. - * __objGetMethodList() podria retornar un array vacio, {} si el - * objeto dado no contiene ningun metodo. - * $DESCRIPTION$ - * __objGetMethodList() es una funcin de soporte de clases de bajo - * nivel que le permite a Ud. encontrar todos los nombres de las - * funciones de clase para un Objeto dado. - * Es el equivalente a __objGetMsgList( oObjeto, .F. ). - * $EXAMPLES$ - * // Muestra informacin sobre la clase TBrowse - * oB := TBrowseNew( 0, 0, 24, 79 ) - * aMethod := __objGetMethodList( oB ) - * - * FOR i = 1 to len ( aMethod ) - * ? "METHOD name:", aMethod[ i ] - * NEXT - * - * $STATUS$ - * R - * $COMPLIANCE$ - * __objGetMethodList() es una extensin de Harbour. - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * __objGetMsgList(),__ObjGetValueList(),__objHasData(),__objHasMethod() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * __objGetValueList() - * $CATEGORY$ - * Manejo de objetos - * $ONELINER$ - * Retorna un array con los nombres de DATA y valores de un Objeto - * $SYNTAX$ - * __objGetValueList( , [] ) --> aData - * $ARGUMENTS$ - * es el objeto a inspeccionar - * - * es un array opcional con los nombres de los DATA que Ud. - * desea excluir de la inspeccion. - * $RETURNS$ - * __objGetValueList() retorna un array bidimensional que contiene - * pares de nombre del smbolo DATA y el valor de DATA. - * __objGetValueList() podria retornar un array vacio, {} si el - * objeto dado no contiene la informacin solicitada. - * $DESCRIPTION$ - * __objGetValueList() es una funcin de soporte de clases de bajo - * nivel que retorna un array con los nombres de DATA y valores. - * Cada elemento del array es un par de: - * aData[ i, HB_OO_DATA_SYMBOL ] contiene nombre del smbolo - * aData[ i, HB_OO_DATA_VALUE ] contiene el valor de DATA - * $EXAMPLES$ - * // Muestra informacin sobre la clase TBrowse - * oB := TBrowseNew( 0, 0, 24, 79 ) - * aData := __objGetValueList( oB ) - * - * FOR i = 1 to len ( aData ) - * ? "Nombre de DATA:", aData[ i, HB_OO_DATA_SYMBOL ], ; - * " valor =", aData[ i, HB_OO_DATA_VALUE ] - * NEXT - * - * $STATUS$ - * R - * $COMPLIANCE$ - * __objGetValueList() es una extensin de Harbour. - * $FILES$ - * El archivo de cabecera es hboo.ch - * La librera es rtl - * $SEEALSO$ - * __objGetMethodList(),__objGetMsgList(),__objHasData(),__objHasMethod(),__ObjSetValueList() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * __ObjSetValueList() - * $CATEGORY$ - * Manejo de objetos - * $ONELINER$ - * Establece un Objeto con un array de nombres de DATA y valores - * $SYNTAX$ - * __ObjSetValueList( , ) --> oObjeto - * $ARGUMENTS$ - * es el objeto a establecer - * - * es un array bidimensional con un par de variables de - * instancia y valores para asignar a aquellas variables. - * $RETURNS$ - * __ObjSetValueList() retorna una referencia a . - * $DESCRIPTION$ - * __ObjSetValueList() es una funcin de soporte de clases de bajo - * nivel que le permite a Ud. establecer un grupo de variables de - * instancia con valores. - * Cada elemento del array en es un par de: - * aData[ i, HB_OO_DATA_SYMBOL ] contiene nombre de variable a setear - * aData[ i, HB_OO_DATA_VALUE ] contiene el nuevo valor de variable - * $EXAMPLES$ - * // set some TBrowse instance variable - * oB := TBrowse():New() - * aData := array( 4, 2 ) - * aData[ 1, HB_OO_DATA_SYMBOL ] = "nTop" - * aData[ 1, HB_OO_DATA_VALUE ] = 1 - * aData[ 2, HB_OO_DATA_SYMBOL ] = "nLeft" - * aData[ 2, HB_OO_DATA_VALUE ] = 10 - * aData[ 3, HB_OO_DATA_SYMBOL ] = "nBottom" - * aData[ 3, HB_OO_DATA_VALUE ] = 20 - * aData[ 4, HB_OO_DATA_SYMBOL ] = "nRight" - * aData[ 4, HB_OO_DATA_VALUE ] = 70 - * __ObjSetValueList( oB, aData ) - * ? oB:nTop // 1 - * ? oB:nLeft // 10 - * ? oB:nBottom // 20 - * ? oB:nRight // 70 - * - * $STATUS$ - * R - * $COMPLIANCE$ - * __ObjSetValueList() es una extensin de Harbour. - * $FILES$ - * El archivo de cabecera es hboo.ch - * La librera es rtl - * $SEEALSO$ - * __ObjGetValueList() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * __objAddMethod() - * $CATEGORY$ - * Manejo de objetos - * $ONELINER$ - * Agrega un METHOD a una clase ya existente - * $SYNTAX$ - * __objAddMethod( , , ) --> oObjeto - * $ARGUMENTS$ - * es el objeto con el cual se va a trabajar - * - * es el nombre del smbolo del nuevo METHOD a agregar - * - * es un puntero a la funcin a asociar con el mtodo - * $RETURNS$ - * __objAddMethod() retorna una referencia a . - * $DESCRIPTION$ - * __objAddMethod() es una funcin de soporte de clases de bajo - * nivel que agrega un nuevo METHOD a un Objeto. - * - * El permanece sin cambios si el smbolo con el nombre - * ya existe en . - * - * Note que es un especial puntero a una funcin que fue - * creado usando el operador @ , vea un ejemplo a continuacion. - * $EXAMPLES$ - * // crea un nueva clase THappy y le agrega un mtodo Smile - * oHappy := HBClass():New( "THappy" ) - * __objAddMethod( oHappy, "Smile", @MySmile() ) - * ? oHappy:Smile( 1 ) // :) - * ? oHappy:Smile( 2 ) // ;) - * ? oHappy:Smile( 3 ) // *SMILE* - * - * STATIC FUNCTION MySmile( nType ) - * LOCAL cSmile - * DO CASE - * CASE nType == 1 - * cSmile := ":)" - * CASE nType == 2 - * cSmile := ";)" - * CASE nType == 3 - * cSmile := "*SMILE*" - * ENDCASE - * RETURN cSmile - * - * $STATUS$ - * R - * $COMPLIANCE$ - * __objAddMethod() es una extensin de Harbour. - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * __objAddInline(),__objAddData(),__objDelMethod(),__ObjGetMethodList(),__objGetMsgList(),__objHasMethod(),__objModMethod() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * __objAddInline() - * $CATEGORY$ - * Manejo de objetos - * $ONELINER$ - * Agrega un INLINE a una clase ya existente - * $SYNTAX$ - * __objAddInline( , , ) --> oObjeto - * $ARGUMENTS$ - * es el objeto con el cual se va a trabajar - * - * es el nombre del smbolo del nuevo INLINE a agregar - * - * es un codeblock a asociar con el mtodo INLINE - * $RETURNS$ - * __objAddInline() retorna una referencia a . - * $DESCRIPTION$ - * __objAddInline() es una funcin de soporte de clases de bajo - * nivel que agrega un nuevo mtodo INLINE a un Objeto. - * - * El permanece sin cambios si el smbolo con el nombre - * ya existe en . - * $EXAMPLES$ - * // crea un nueva clase THappy y le agrega un mtodo INLINE Smile - * oHappy := HBClass():New( "THappy" ) - * bInline := { | nType | { ":)", ";)", "*SMILE*" }[ nType ] } - * - * __objAddInline( oHappy, "Smile", bInline ) - * - * ? oHappy:Smile( 1 ) // :) - * ? oHappy:Smile( 2 ) // ;) - * ? oHappy:Smile( 3 ) // *SMILE* - * - * $STATUS$ - * R - * $COMPLIANCE$ - * __objAddInline() es una extensin de Harbour. - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * __objAddData(),__objAddMethod(),__objDelInline(),__ObjGetMethodList(),__objGetMsgList(),__objHasMethod() ,__objModInline() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * __objAddData() - * $CATEGORY$ - * Manejo de objetos - * $ONELINER$ - * Agrega un DATA a una clase ya existente - * $SYNTAX$ - * __objAddData( , ) --> oObjeto - * $ARGUMENTS$ - * es el objeto con el cual se va a trabajar - * - * es el nombre del smbolo del nuevo DATA a agregar - * $RETURNS$ - * __objAddData() retorna una referencia a . - * $DESCRIPTION$ - * __objAddData() es una funcin de soporte de clases de bajo - * nivel que agrega un nuevo DATA a un Objeto. - * - * El permanece sin cambios si el smbolo con el nombre - * ya existe en . - * $EXAMPLES$ - * // crea un nueva clase THappy y le agrega un DATA lHappy - * oHappy := HBClass():New( "THappy" ) - * - * __objAddData( oHappy, "lHappy" ) - * oHappy:lHappy := .T. - * - * IF oHappy:lHappy - * ? "Happy, Happy, Joy, Joy !!!" - * ELSE - * ? ":(..." - * ENDIF - * - * $STATUS$ - * R - * $COMPLIANCE$ - * __objAddData() es una extensin de Harbour. - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * __objAddInline(),__objAddMethod(),__objDelData(),__objGetMsgList(),__ObjGetValueList(),__objHasData(),__ObjSetValueList() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * __objModMethod() - * $CATEGORY$ - * Manejo de objetos - * $ONELINER$ - * Modifica (reemplaza) un METHOD en una clase ya existente - * $SYNTAX$ - * __objModMethod( , , ) --> oObjeto - * $ARGUMENTS$ - * es el objeto con el cual se va a trabajar - * - * es el nombre del smbolo del METHOD a modificar - * - * es un puntero a una nueva funcin a asociar con - * el metodo. - * $RETURNS$ - * __objModMethod() retorna una referencia a . - * $DESCRIPTION$ - * __objModMethod() es una funcin de soporte de clases de bajo - * nivel que modifica un METHOD en un Objeto y lo reemplaza con - * una nueva funcin. - * El permanece sin cambios si el smbolo con el nombre - * ya existe en . - * __objModMethod() es usado en el mecanismo de herencia. - * - * Note que es un especial puntero a una funcin que fue - * creado usando el operador @ , vea un ejemplo a continuacion. - * - * $EXAMPLES$ - * // crea un nueva clase THappy y le agrega un mtodo Smile - * oHappy := HBClass():New( "THappy" ) - * __objAddMethod( oHappy, "Smile", @MySmile() ) - * ? oHappy:Smile( 1 ) // :) - * ? oHappy:Smile( 2 ) // ;) - * - * // reemplaza el mtodo Smile con una nueva funcin - * __objAddMethod( oHappy, "Smile", @YourSmile() ) - * ? oHappy:Smile( 1 ) // *SMILE* - * ? oHappy:Smile( 2 ) // *WINK* - * - * STATIC FUNCTION MySmile( nType ) - * LOCAL cSmile - * DO CASE - * CASE nType == 1 - * cSmile := ":)" - * CASE nType == 2 - * cSmile := ";)" - * ENDCASE - * RETURN cSmile - * - * STATIC FUNCTION YourSmile( nType ) - * LOCAL cSmile - * DO CASE - * CASE nType == 1 - * cSmile := "*SMILE*" - * CASE nType == 2 - * cSmile := "*WINK*" - * ENDCASE - * RETURN cSmile - * - * $STATUS$ - * R - * $COMPLIANCE$ - * __objModMethod() es una extensin de Harbour. - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * __objAddMethod(),__objDelMethod(),__ObjGetMethodList(),__objGetMsgList(),__objHasMethod() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * __objModInline() - * $CATEGORY$ - * Manejo de objetos - * $ONELINER$ - * Modifica (reemplaza) un mtodo INLINE en una clase ya existente - * $SYNTAX$ - * __objModInline( , , ) --> oObjeto - * $ARGUMENTS$ - * es el objeto con el cual se va a trabajar - * - * es el nombre del smbolo del mtodo INLINE a - * modificar. - * - * es un nuevo codeblock a asociar con el mtodo INLINE - * $RETURNS$ - * __objModInline() retorna una referencia a . - * $DESCRIPTION$ - * __objModInline() es una funcin de soporte de clases de bajo - * nivel que modifica un mtodo INLINE en un Objeto y lo reemplaza con - * una nuevo bloque de codigo. - * - * El permanece sin cambios si el smbolo con el nombre - * no existe en . - * - * __objModInline() es usado en el mecanismo de herencia. - * $EXAMPLES$ - * // crea un nueva clase THappy y le agrega un mtodo INLINE Smile - * oHappy := HBClass():New( "THappy" ) - * bMyInline := { | nType | { ":)", ";)" }[ nType ] } - * bYourInline := { | nType | { "*SMILE*", "*WINK*" }[ nType ] } - * - * __objAddInline( oHappy, "Smile", bMyInline ) - * ? oHappy:Smile( 1 ) // :) - * ? oHappy:Smile( 2 ) // ;) - * - * // reemplaza el mtodo INLINE Smile con un nuevo codeblock - * __objModInline( oHappy, "Smile", bYourInline ) - * ? oHappy:Smile( 1 ) // *SMILE* - * ? oHappy:Smile( 2 ) // *WINK* - * - * $STATUS$ - * R - * $COMPLIANCE$ - * __objModInline() es una extensin de Harbour. - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * __objAddInline(),__objDelInline(),__ObjGetMethodList(),__objGetMsgList(),__objHasMethod() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * __objDelMethod() - * $CATEGORY$ - * Manejo de objetos - * $ONELINER$ - * Borra un METHOD de una clase - * $SYNTAX$ - * __objDelMethod( , ) --> oObjeto - * $ARGUMENTS$ - * es el objeto con el cual se va a trabajar - * - * es el nombre del smbolo del METHOD o del mtodo - * INLINE a ser borrado (removido) del Objeto. - * $RETURNS$ - * __objDelMethod() retorna una referencia a . - * $DESCRIPTION$ - * __objDelMethod() es una funcin de soporte de clases de bajo nivel - * que borra (remueve) un METHOD o un mtodo INLINE de un Objeto. - * - * El permanece sin cambios si el smbolo con el nombre - * no existe en . - * - * __objDelInline() es exactamente la misma que __objDelMethod(). - * $EXAMPLES$ - * // crea un nueva clase THappy y le agrega un mtodo Smile - * oHappy := HBClass():New( "THappy" ) - * - * __objAddMethod( oHappy, "Smile", @MySmile() ) - * ? __objHasMethod( oHappy, "Smile" ) // .T. - * - * // borra el mtodo Smile - * __objDelMethod( oHappy, "Smile" ) - * ? __objHasMethod( oHappy, "Smile" ) // .F. - * - * STATIC FUNCTION MySmile( nType ) - * LOCAL cSmile - * DO CASE - * CASE nType == 1 - * cSmile := ":)" - * CASE nType == 2 - * cSmile := ";)" - * ENDCASE - * RETURN cSmile - * - * $STATUS$ - * R - * $COMPLIANCE$ - * __objDelMethod() es una extensin de Harbour. - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * __objAddInline(),__objAddMethod(),__ObjGetMethodList(),__objGetMsgList(),__objHasMethod(),__objModInline(),__objModMethod() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * __objDelInline() - * $CATEGORY$ - * Manejo de objetos - * $ONELINER$ - * Borra un METHOD INLINE de una clase - * $SYNTAX$ - * __objDelInline( , ) --> oObjeto - * $ARGUMENTS$ - * es el objeto con el cual se va a trabajar - * - * es el nombre del smbolo del METHOD o del mtodo - * INLINE a ser borrado (removido) del Objeto. - * $RETURNS$ - * __objDelInMethod() retorna una referencia a . - * $DESCRIPTION$ - * __objDelInMethod() es una funcin de soporte de clases de bajo nivel - * que borra (remueve) un METHOD o un mtodo INLINE de un Objeto. - * - * El permanece sin cambios si el smbolo con el nombre - * no existe en . - * $EXAMPLES$ - * // crea un nueva clase THappy y le agrega un mtodo Smile - * oHappy := HBClass():New( "THappy" ) - * __objAddMethod( oHappy, "Smile", @MySmile() ) - * ? __objHasMethod( oHappy, "Smile" ) // .T. - * - * // borra el mtodo Smile - * __objDelInMethod( oHappy, "Smile" ) - * ? __objHasMethod( oHappy, "Smile" ) // .F. - * - * STATIC FUNCTION MySmile( nType ) - * LOCAL cSmile - * DO CASE - * CASE nType == 1 - * cSmile := ":)" - * CASE nType == 2 - * cSmile := ";)" - * ENDCASE - * RETURN cSmile - * - * $STATUS$ - * R - * $COMPLIANCE$ - * __objDelMethod() es una extensin de Harbour. - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * __objAddInline(),__objAddMethod(),__ObjGetMethodList(),__objGetMsgList(),__objHasMethod(),__objModInline(),__objModMethod() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * __objDelData() - * $CATEGORY$ - * Manejo de objetos - * $ONELINER$ - * Borra un DATA (variable de instancia) de una clase - * $SYNTAX$ - * __objDelMethod( , ) --> oObjeto - * $ARGUMENTS$ - * es el objeto con el cual se va a trabajar - * - * es el nombre del smbolo DATA a ser borrado - * (removido) del Objeto. - * $RETURNS$ - * __objDelData() retorna una referencia a . - * $DESCRIPTION$ - * __objDelData() es una funcin de soporte de clases de bajo nivel - * que borra (remueve) un DATA de un Objeto. - * - * El permanece sin cambios si el smbolo con el nombre - * no existe en . - * $EXAMPLES$ - * // crea un nueva clase THappy y le agrega un DATA lHappy - * oHappy := HBClass():New( "THappy" ) - * - * __objAddData( oHappy, "lHappy" ) - * ? __objHasData( oHappy, "lHappy" ) // .T. - * - * // borra el DATA, lHappy - * __objDelData( oHappy, "lHappy" ) - * ? __objHasData( oHappy, "lHappy" ) // .F. - * - * $STATUS$ - * R - * $COMPLIANCE$ - * __objDelData() es una extensin de Harbour. - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * __objAddData(),__objGetMsgList(),__ObjGetValueList(),__objHasData(),__ObjSetValueList() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * __objDerivedFrom() - * $CATEGORY$ - * Manejo de objetos - * $ONELINER$ - * Determina cuando una clase es derivada de otra clase - * $SYNTAX$ - * __objDerivedFrom( , ) --> lIsParent - * $ARGUMENTS$ - * es el objeto a inspeccionar - * - * es el objeto que puede ser un padre. puede - * ser o bien un Objeto o una cadena de caracteres con el - * nombre de la clase. - * $RETURNS$ - * __objDerivedFrom() retorna un valor logico TRUE (.T.) si el - * es derivado de . - * $DESCRIPTION$ - * __objDerivedFrom() es una funcin de soporte de clases de bajo - * nivel que chequea si una clase es una Superclase de la otra, o en - * otras palabras si la clase es una clase hija o - * descendiente de . - * $EXAMPLES$ - * // Crea tres clases y chequea sus relaciones - * - * #include "hbclass.ch" - * FUNCTION main() - * LOCAL oSuper, oObjeto, oDress - * oSuper := TMood():New() - * oObjeto := THappy():New() - * oDress := TShirt():New() - * ? __objDerivedFrom( oObjeto, oSuper ) // .T. - * ? __objDerivedFrom( oSuper, oObjeto ) // .F. - * ? __objDerivedFrom( oObjeto, oDress ) // .F. - * RETURN NIL - * - * CLASS TMood - * METHOD New() INLINE Self - * ENDCLASS - * - * CLASS THappy FROM TMood - * METHOD Smile() INLINE qout( "*smile*" ) - * ENDCLASS - * - * CLASS TShirt - * DATA Color - * DATA Size - * METHOD New() INLINE Self - * ENDCLASS - * - * $STATUS$ - * R - * $COMPLIANCE$ - * __objDerivedFrom() es una extensin de Harbour. - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * __objHasData(),__ObjHasMethod() - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/pcode.txt b/harbour/examples/hbdoc/examples/es/pcode.txt deleted file mode 100644 index 606a0a4482..0000000000 --- a/harbour/examples/hbdoc/examples/es/pcode.txt +++ /dev/null @@ -1,144 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2001 Antonio Linares - * Documentacin en Ingls - * - * Copyright 2001 Alejandro de Grate - * Traduccin al Espaol de pcode.txt - * - * Vea COPYING por los trminos de la licencia. - * - */ - - -El OBJ de Clipper y el modelo pcode (GNU|Open|Clipper project) -============================================================== - -Consideremos el siguiente ejemplo de Clipper, test.prg: - -function Main() - - ? "Hola mundo!" - -return nil - -Una vez que esto se compila dentro de un OBJ, qu es lo que hay dentro -de l ? -En efecto, lo que nosostros tenemos es un equivalente a la siguiente -aplicacin de lenguaje C: - -SYMBOL symbols[] = { ... }; - -void MAIN( void ) -{ - BYTE pcode[] = { ... }; - - VirtualMachine( pcode, symbols ); -} - -Bsicamente, el cdigo fuente de test.prg ha sido convertido en una -secuencia de bytes pcode contenidos en el array pcode[] = {...} -Todo lo que nuestra funcin MAIN hace es invocar, en tiempo de ejecucin -a la funcin de VirtualMachine() que procesar aquellos bytes de pcodes. - -Vamos a revisar la estructura de pcodes de test.prg con ms detalle: - -0000 (2A) LINE 0 2A 00 00 -0003 (2A) LINE 3 2A 03 00 -0006 (13) SYMF [QOUT] 13 02 00 -0009 (01) PUSHC "Hello world!" 01 ... -0018 (27) DO(1) 27 01 00 -001B (2A) LINE 5 2A 05 00 -001E (7B) UNDEF 7B -001F (79) SAVE_RET 79 -0020 (1E) JMP 0023 1E 00 00 -0023 (60) ENDPROC 60 - -Nosotros podemos definir un archivo hbpcode.h para leer mejor aquellos -pcode: - ----------------------- -hbpcode.h - -#define LINE 0x2A -#define SYMF 0x13 -#define PUSHC 0x01 -#define DO 0x27 -#define UNDEF 0x7B -... ----------------------- - -As finalmente esto quedara como: - -BYTE pcode[] = - { LINE, 0, 0, - LINE, 3, 0, - SYMF, 2, 0, - PUSHC, 'H', 'o', 'l', 'a', ' ', 'm', 'u', 'n', 'd', 'o', '!', '0', - DO, 1, 0, - LINE, 5, 0, - UNDEF, - SAVE_RET, - JMP, 0, 0, - ENDPROC }; - -Y qu es SYMBOL symbols[] ? -Cliper crea una tabla de smbolos en el archivo OBJ que luego ser usada -para crear una tabla dinmica de smbolos compartida por la aplicacin -entera. cada uno de esos smbolos tiene la siguiente estructura: - - typedef struct - { - char * szName; // Clipper de hecho mantiene un array aqu (11 bytes) - BYTE bScope; - LPVOID pVoid; - } SYMBOL; - -#define PUBLIC 0 // el alcance de la funcin ! - -SYMBOL symbols[] = { { "MAIN", PUBLIC, MAIN }, - { "QQOUT", PUBLIC, QQOUT } }; - -Recordemos que el nombre de una funcin (MAIN, QQOUT) es la direccin de -la funcin, as nuestra tabla de smbolos estar lista para usarla para -saltar y ejecutar cualquier funcin enlazada (linkeada). - -De hecho, el pcode SYMF 2, 0 en nuestro ejemplo, instruir a la funcin -VirtualMachine(), para usar el 2do smbolo que es QQOUT. - -Vamos a leer el pcode: - -LINE 0, 0 => Nosotros estamos ubicados en la lnea 0 -LINE 3, 0 => Nosotros estamos ubicados en la lnea 3 -SYMF 2, 0 => Vamos a llamar a QQOUT desde nuestra tabla de smbolos -PUSHC ... => Esta cadena va a ser usada como un parmetro -DO 1, 0 => ok, saltemos a QQOUT y recordemos que le dimos 1 parmetro -LINE 5, 0 => Estamos de vuelta desde QQOUT y estamos ubicados en lnea 5 -UNDEF => Nosotros vamos a retornar este valor (NIL) -SAVE_RET => Ok, retornemoslo -JMP 0 => No saltamos dondequiera, continuamos con el prximo pcode -ENDPROC => Es el fin. hemos completado la ejecucin de esta funcin - -Todas estas funciones sern evaluadas desde nuestra funcin -VirtualMachine(), (Clipper la llama _plankton() ). Todas las funciones -terminan usando ENDPROC, as cuando VirtualMachine() encuentra ENDPROC -sabe que ha alcanzado el final de una funcin pcode. - -Ahora que nosotros entendemos claramente el modelo bsico, nosotros -estamos en condiciones de comenzar a implementar "reglas de produccin" -en nuestra sintaxis yacc (harbour.y) para generar el archivo de salida -especfico (test.c) con la estructura de arriba ( nosotros podemos -fcilmente generar el archivo OBJ para l). - -Continuar... - -Antonio Linares - - - diff --git a/harbour/examples/hbdoc/examples/es/pragma.txt b/harbour/examples/hbdoc/examples/es/pragma.txt deleted file mode 100644 index 5cf5cf024e..0000000000 --- a/harbour/examples/hbdoc/examples/es/pragma.txt +++ /dev/null @@ -1,115 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2001 Jose Lalin - * Documentacin en Ingls - * - * Copyright 2001 Alejandro de Grate - * Traduccin al Espaol de pragma.txt - * - * Vea COPYING por los trminos de la licencia. - * - */ - - -DIRECTIVA #pragma -================= - - -INTRODUCCION -============ -Este archivo explica qu es y cmo usar la directiva #pragma con Harbour. -Primariamente esto le da control sobre los switches de la lnea de -comandos del compilador, desde adentro de su cdigo fuente. - - -QUE ES ? -======== -#pragma es una directiva usada dentro del cdigo fuente en muchos -compiladores para cambiar el comportamiento del compilador en tiempo -de compilacin. - - -USO -=== - -La directiva #pragma puede ser usada en dos formas: -1- el modo switch -2- modo comando - -La sintaxis es: #pragma [=On/Off] - #pragma -CompilerFlag[+|-] - -Ud. puede usar ambos modos mezclados en el mismo mdulo y en maysculas -minsculas sin preocuparse. - -Para habilitar deshabilitar un comando un switch Ud simplemente haga: - - * Modo Comando Modo Switch - -------------------------------------------------------------- - * #pragma =On/Off #pragma /+/- - - Ejemplo: - #pragma AddDebugInfo=Off /* Suprime informacin de depuracin */ - #pragma /B+ /* Agrega informacin de depuracin - desde aqu */ - - -IMPLEMENTACION -============== - -Esta es la lista de los comandos soportados y switches: - - * Comando Switch - ----------------------------------------------- - * AUTOMEMVARS = /A<+/-> - * DEBUGINFO = /B<+/-> - * ENABLEWARNINGS = /W<+/-> - * EXITSEVERITY = /E - * FORCEMEMVARS = /V<+/-> - * LINEINFO = /L<+/-> - * NOSTARTPROC = /N<+/-> - * PREPROCESSING = /P<+/-> - * WARNINGLEVEL = /W - * SHORTCUTTING = /Z<+/-> - - Los switches tienen el mismo comportamiento que los del compilador - y los comandos son sinnimos de los switches. - - * TRACEPRAGMAS (Rastreo de pragmas) - Este comando muestra la actividad de los pragmas en tiempo de - compilacin cuando estn habilitados. - - NOTA: Ud. puede usar el modo de comando abreviado tipeando solamente - los ocho primeros caracteres. - - -NOTAS: -====== -Esta directiva no es soportada en la versin aislada del preprocesador -de Harbour. - - -EJEMPLOS -======== -#pragma NoStartProc=Off -/* #pragma /N- */ - -function Test() -return nil - -Esto es lo mismo que llamar a Harbour con el switch -n en la lnea de -comandos pero con el gran beneficio que si Ud. olvida pasar el switch, -este podr ser usado de todas maneras, porque est incluido dentro del -cdigo fuente. - - - - - - diff --git a/harbour/examples/hbdoc/examples/es/rdd.txt b/harbour/examples/hbdoc/examples/es/rdd.txt deleted file mode 100644 index c4244f2eb9..0000000000 --- a/harbour/examples/hbdoc/examples/es/rdd.txt +++ /dev/null @@ -1,234 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2003 Alejandro de Grate - * Documentacin en Espaol de: - * DB*(), ORD*(), RDD*() - * - * Copyright 1999 Luiz Rafael Culik - * Documentacin en Ingls de: - * DB*(), ORD*(), RDD*() - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * RDDLIST() - * $CATEGORY$ - * Base de Datos - * $ONELINER$ - * Retorna un array con los Manejadores de Bases de Datos disponibles - * $SYNTAX$ - * RDDLIST([]) --> aRDDLista - * $ARGUMENTS$ - * es un entero que representa el tipo de RDD que Ud. desea - * listar. Las constantes RDT_FULL y RDT_TRANSFER - * representan los dos tipos de RDDs actualmente disponibles - * - * Resumen de Tipo de RDDs - * - * Constante Valor Significado - * - * RDT_FULL 1 Implementacin Completa de RDD - * RDT_TRANSFER 2 Solamente driver Importar/Exportar - * - * - * RDT_FULL identifica a los RDDs que tienen todas las capacidades que - * se asocian con un RDD. - * - * RDT_TRANSFER identifica a RDDs de capcidad limitada. Estos solamente - * pueden transferir registros entre archivos. Ud. no puede usar estos - * limitados drivers para abrir un archivo en un rea de trabajo. - * Los manejadores SDF y DELIM son ejemplos de este tipo de RDD. - * Ellos solamente son usados en la implementacin de APPEND FROM y - * COPY TO con archivos SDF DELIMITED. - * $RETURNS$ - * RDDLIST() retorna un array unidimensional de los nombres de RDD - * registrados con la aplicacin como . - * $DESCRIPTION$ - * RDDLIST() es una funcin que devuelve una array de una dimensin - * que contiene los nombres de todos los RDD disponibles. - * - * Si Ud. no especifica , sern devueltos todos los RDD - * disponibles sin importar el tipo. - * $EXAMPLES$ - * En este ejemplo RDDLIST() retorna un array conteniendo las cadenas - * de caracteres: "DBF", "SDF", "DELIM", "DBFCDX", and "DBFNTX": - * - * REQUEST DBFCDX - * . - * . < sentencias > - * . - * aRDDs := RDDLIST() // Retorna - * // {"DBF", SDF", "DELIM", "DBFCDX", "DBFNTX" } - * - * - * En este ejemplo RDDLIST() retorna un array conteniendo las - * cadenas de caracteres: "SDF" and "DELIM": - * - * #include "rddsys.ch" - * . - * . < sentencias > - * . - * aImpExp := RDDLIST( RDT_TRANSFER ) - * - * $TESTS$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * - * $SEEALSO$ - * RDDNAME() - * $INCLUDE$ - * El archivo de cabecera es rddsys.ch - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * RDDNAME() - * $CATEGORY$ - * Base de Datos - * $ONELINER$ - * Retorna el nombre del RDD actualmente activo - * $SYNTAX$ - * RDDNAME() --> cNombreRDD - * $ARGUMENTS$ - * Ninguno - * $RETURNS$ - * Retorna una cadena de caracteres, el nombre registrado del RDD activo - * en el rea de trabajo actual en el rea especificada. - * $DESCRIPTION$ - * RDDNAME() es una funcin que devuelve una cadena de caracteres con el - * nombre registrado del RDD activo en el rea de trabajo actual en el - * rea especificada. - * - * Ud. puede especificar un rea de trabajo distinta de la actual usando - * un alias con la funcin. - * $EXAMPLES$ - * USE Customer VIA "DBFNTX" NEW - * USE Sales VIA "DBFCDX" NEW - * - * ? RDDNAME() // Retorna: DBFCDX (area actual) - * ? Customer->( RDDNAME() ) // Retorna: DBFNTX (area especificada) - * ? Sales->( RDDNAME() ) // Retorna: DBFCDX (area especificada) - * $TESTS$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * - * $SEEALSO$ - * RDDLIST() - * $INCLUDE$ - * - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * RDDSETDEFAULT() - * $CATEGORY$ - * Base de Datos - * $ONELINER$ - * Establece retorna el RDD por defecto para la aplicacin. - * $SYNTAX$ - * RDDSETDEFAULT( [] ) --> cPreviousDefaultRDD - * - * $ARGUMENTS$ - * es una cadena de caracteres, el nombre del RDD que - * va a ser hecho el nuevo RDD por defecto para la - * aplicacin. - * $RETURNS$ - * RDDSETDEFAULT() retorna una cadena de caracteres conteniendo el - * nombre del manejador por defecto anterior . - * $DESCRIPTION$ - * RDDSETDEFAULT() es una funcin que devuelve el nombre del manejador - * (driver) por defecto anterior y opcionalmente - * establece el manejador actual, especificado por . - * - * Si no es especificado, el nombre del manejador por - * defecto actual es devuelto y ste contina siendo el manejador por - * defecto. El manejador por defecto es el driver que Harbour usa si Ud. - * no especifica explcitamente un RDD con la clusula VIA en el comando - * USE. - * - * Esta funcin reemplaza a la funcin DBSETDRIVER() - * $EXAMPLES$ - * // Si el manejador por defecto no es DBFNTX, ponerlo por defecto - * - * IF ( RDDSETDEFAULT() != "DBFNTX" ) - * cOldRdd := RDDSETDEFAULT( "DBFNTX" ) - * ENDIF - * $TESTS$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * - * $SEEALSO$ - * DBSETDRIVER() - * $INCLUDE$ - * - * $END$ - */ - - -/* $DOC$ - * $FUNCNAME$ - * __RDDSETDEFAULT() - * $CATEGORY$ - * Base de Datos - * $ONELINER$ - * Establece retorna el RDD por defecto para la aplicacin. - * $SYNTAX$ - * __RDDSETDEFAULT( [] ) --> cPreviousDefaultRDD - * $ARGUMENTS$ - * es una cadena de caracteres, el nombre del RDD que - * va a ser hecho el nuevo RDD por defecto para la - * aplicacin. - * $RETURNS$ - * __RDDSETDEFAULT() retorna una cadena de caracteres conteniendo el - * nombre del manejador por defecto anterior . - * $DESCRIPTION$ - * __RDDSETDEFAULT() es una funcin que devuelve el nombre del manejador - * (driver) por defecto anterior y opcionalmente - * establece el manejador actual, especificado por . - * - * Si no es especificado, el nombre del manejador por - * defecto actual es devuelto y ste contina siendo el manejador por - * defecto. El manejador por defecto es el driver que Harbour usa si Ud. - * no especifica explcitamente un RDD con la clusula VIA en el comando - * USE. - * Esta es una funcin de bajo nivel y debe usarse RDDSETDEFAULT() en su - * lugar. - * Esta funcin reemplaza a la funcin DBSETDRIVER() - * $EXAMPLES$ - * // Si el manejador por defecto no es DBFNTX, ponerlo por defecto - * - * IF ( __RDDSETDEFAULT() != "DBFNTX" ) - * cOldRdd := __RDDSETDEFAULT( "DBFNTX" ) - * ENDIF - * $TESTS$ - * - * $STATUS$ - * R - * $COMPLIANCE$ - * - * $SEEALSO$ - * DBSETDRIVER() - * $INCLUDE$ - * - * $END$ - */ - - - diff --git a/harbour/examples/hbdoc/examples/es/readme.txt b/harbour/examples/hbdoc/examples/es/readme.txt deleted file mode 100644 index a6eb5bc1e1..0000000000 --- a/harbour/examples/hbdoc/examples/es/readme.txt +++ /dev/null @@ -1,131 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2001 - * Documentacin en Ingls de: readme.txt - * - * Copyright 2002 Alejandro de Grate - * Documentacin en Espaol de: readme.txt - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * PANORAMA - * $CATEGORY$ - * Documento - * $ONELINER$ - * Leame de HARBOUR - * $DESCRIPTION$ - * - * El Proyecto Harbour - * - * ************************************************************ - * * Este archivo contiene informacin sobre como obtener, * - * * instalar y usar Harbour. * - * * Por favor lalo -completamente- antes de solicitar ayuda * - * ************************************************************ - * - * Harbour es una implementacin libre (en todo sentido) de un - * compilador de lenguaje xBase. Este est designado para ser compatible - * con el cdigo fuente del compilador CA-Cl*pper (c). - * Esto significa que si Ud. tiene algn cdigo que debera compilar - * usando CA-Cl*pper(c) entonces este debera compilar tambin bajo - * Harbour. - * - * La pgina web del Proyecto Harbour es: - * http://www.harbour-project.org/ - * - * El estado del proyecto y cualquier otra informacin est siempre - * disponible desde el sitio web. - * Hay tres listas de correo de Harbour. la lista de correo de los - * desarrolladores, la lista de correo de los usuarios de Harbour y la - * lista de correo de Conversacin sobre temas relacionados a Harbour, - * aunque cualquiera es bienvenido para unirse a las discusiones. - * - * Nos gustara que Ud. se uniera al equipo de desarrollo de Harbour. - * Si Ud. esta interesado, puede subscribirse a nuestra lista de correo - * y comenzar contribuyendo a este proyecto pblico libre. - * - * Por favor sintase con libertad de hacer preguntas, reportar ideas, - * sugestiones, correcciones, cdigo, etc. - * Con la ayuda de todos Uds., el compilador Harbour y las libreras de - * ejecucin se har realidad muy pronto. - * - * - * Qu es lo que esta distribucin contiene ? - * ========================================== - * - * Esta distribucin es solamente una distribucin de cdigo fuente. - * Esta no contiene ningn archivo ejecutable. Las versiones ejecutables - * de Harbour estn disponibles desde el sitio web. - * Las versiones ejecutables de Harbour NO crean programas ejecutables - * Harbour hasta este momento produce cdigo de lenguaje C de salida, - * el cual debe ser compilado con la VM (Mquina Virtual de Harbour) y - * las libreras de soporte para crear programas funcionales. - * Por favor haga tests, corriendo Harbour contra su cdigo fuente en - * Clipper y reportando cualquier problema que pudiera ocurrir. - * - * Muy importante: El pre-procesador esta ahora trabajando correctamente - * - * - * Instalacin - * ----------- - * - * 1. Deszipee el archivo zip de Harbour usando pkunzip equivalente. - * Por ej.: pkunzip -d build37.zip - * Esto crear el directorio Harbour y todos los subdirectorios - * relevantes. - * - * 2. Compile Harbour usando su compilador de lenguaje C. Archivos make - * para diferentes plataformas estn incluidos. - * - * - * --- COPYRIGHT --- - * - * Qu informacin de copyright tenemos ? - * - * - * --- LICENCIA --- - * - * Informacin sobre la Licencia de uso de Harbour est disponible en - * el archivo license.txt - * - * - * --- RENUNCIA --- - * - * Los participantes del Proyecto Harbour no asumen responsibilidad por - * errores u omisiones en estos materiales. - * - * ESTOS MATERIALES SON PROVISTOS "COMO ESTAN" SIN NINGUNA GARANTIA - * DE NINGUN TIPO, SEA EXPRESA O IMPLICITA, INCLUYENDO PERO NO - * LIMITADA A LAS GARANTIAS IMPLICITAS DE COMERCIALIZACION, O EL - * USO PARA UN PROPOSITO PARTICULAR. - * - * Los participantes del Proyecto Harbour no garantizan la exactitud - * completitud del cdigo, informacin, texto, salida cualquier otro - * tem contenido dentro de esos materiales. Los participantes del - * Proyecto Harbour no sern responsables por ningn dao especial, - * directo, indirecto, incidental, consecuente, incluyendo pero no - * limitado a la prdida de ingresos ganancias, los cuales pueden - * resultar del uso mal uso de estos materiales. - * - * La informacin en el Proyecto Harbour est sujeta a cambios sin - * previo aviso y no representa ningn compromiso futuro para los - * participantes del Proyecto Harbour. - * - * El Proyecto Harbour - * - * $SEEALSO$ - * Licencia - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/sayget.txt b/harbour/examples/hbdoc/examples/es/sayget.txt deleted file mode 100644 index 0a74c62ceb..0000000000 --- a/harbour/examples/hbdoc/examples/es/sayget.txt +++ /dev/null @@ -1,230 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2003 Alejandro de Grate - * Documentacin en Espaol de: - * @...GET, @...SAY - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $COMMANDNAME$ - * @...GET - * $CATEGORY$ - * Comando - * $ONELINER$ - * Crea un objeto GET y lo visualiza en pantalla - * $SYNTAX$ - * @ , [SAY [PICTURE ] COLOR ] - * GET [PICTURE ] [COLOR ] - * [WHEN ] [VALID / RANGE ,] - * $ARGUMENTS$ - * La fila donde se visualiza el SAY/GET - * - * La columna donde se visualiza el SAY/GET - * - * Mensaje a visualizar - * - * Expresin de Caracteres para el PICTURE del SAY - * - * Color a ser Usado por la expresin SAY. - * - * El nombre de la variable/campo - * - * Expresin de Caracteres para el PICTURE del GET - * - * Expresin lgica para permitir el GET. - * - * Expresin lgica para validar la entrada del GET - * - * Valor inferior de RANGE - * - * Valor superior de RANGE. - * - * Cadena de Color a ser usada por la expresin GET - * $RETURNS$ - * Ninguno - * $DESCRIPTION$ - * Este comando agrega un objeto GET al array pblico reservado llamado - * GETLIST[] y lo muestra en pantalla. El campo variable a ser - * agregada al objeto GET es especificada en y es visualizada - * en las coordenadas fila, columna , . - * - * Si la clusula SAY es usada el mensaje ser visualizado - * comenzando en ,, mientras que la variable de campo - * ser visualizada en ROW(), COL()+ 1. - * - * Si la clusula PICTURE es usada para la expresin SAY, el molde - * es usado, todas las reglas de formato contenidas en l se - * aplicarn. Vea la funcin TRANSFORM I, para mayor informacin. - * - * Si es especificado, la clusula PICTURE de ser - * usada para el objeto GET y todas las reglas de formato sern - * aplicadas. Vea las reglas de formato para GET en la tabla ms abajo. - * - * Si la clusula WHEN es especificada, entonces se evala por - * una condicin lgica (.T.) y en ese caso el objeto GET ser activado - * De otro modo el objeto GET ser saltado y ninguna informacin ser - * obtenida a travs de la pantalla. El nombre de una funcin definida - * por el usuario que retorne true (.T.) false ( F.) un codeblock - * puede ser especificado en . Esta clusula no ser activada - * hasta que un comando READ una funcin READMODAL() sea ejecutada. - * - * Si la clusula VALID es especificada, se evala por una - * condicin lgica (.T.), si se cumple, el GET actual se considera - * vlido y la operatoria del GET continuar hasta encontrar el prximo - * objeto GET activo. De lo contrario el cursor permanecer en este - * objeto GET hasta que la operacin se aborte la condicin en - * se cumpla (.T.). El nombre de una funcin definida por - * el usuario que retorne true (.T.) false ( F.) un codeblock - * puede ser especificado en . Esta clusula no ser activada - * hasta que un comando READ una funcin READMODAL() sea ejecutada. - * - * Si la clusula RANGE (rango) es especificada, en lugar de la clusula - * VALID, los dos valores que limitan el rango deben ser especificados - * en y . La variable que se evala debe ser del mismo - * tipo que las que constituyen el rango. Si la variable es del - * tipo de fecha (DATE), y deben ser tambin del tipo - * DATE. Si la variable es del tipo NUMERICo y - * deben ser tambin del tipo numrico. Si un valor falla el test RANGE, - * un mensaje de "OUT OF RANGE" (fuera de rango) aparecer en el area - * SCOREBOARD (fila = 0, col. = 60). El mensaje de RANGE puede ser - * desactivado si el comando SET SCOREBOARD la funcion SET() apropiada - * es puesta a .F. - * - * - * - * Funcin Reglas de Formateo del GET - * @A Permite solamente caracteres alfabticos - * @B Los nmeros sern justificados a la izquierda - * @C Todos los nmeros positivos sern seguidos por CR - * @D Todas las fechas usarn el formato SET DATE - * @E Las fechas estarn en formato Britnico y los nmeros - * en formato Europeo. - * @K Permite que un valor sugerido sea visto dentro del GET - * pero borrado si se presiona alguna tecla que no sea la - * de cursores cuando el cursor esta en la primera posicin - * en el rea del GET. - * @R Los caracteres que se indican sern insertados - * @S Permite el desplazamiento horizontal de un campo - * variable que es de caracteres de ancho. - * @X Todos los nmeros negativos sern seguidos por DB - * @Z Visualiza los valores numricos cero como blancos - * @! Fuerza la conversin a maysculas de los caracteres - * @( Visualiza los nmeros negativos en parentesis con - * espacios adelante - * @) Visualiza los nmeros negativos en parentesis sin - * espacios adelante - *
- * - * - * - * - * Molde Reglas de Formateo del GET - * A Slo caracteres alfabticos son permitidos - * N Slo caracteres alfabticos y numricos son permitidos - * X Cualquier caracter es permitido - * L Slo T F son permitidos para datos lgicos - * Y Slo Y N son permitidos para datos lgicos - * 9 Slo digitos, incluyendo signos sern permitidos - * # Slo digitos, signos y espacios sern permitidos - * ! Caracteres alfabticos son convertidos a Maysculas - * S El signo Pesos ser visualizado en lugar de espacios, delante - * del tipo de dato numrico (aqui visto cmo una "S") - * * El signo Asterisco ser visualizado en lugar de espacios - * delante del tipo de dato numrico - * . Punto, define la posicin del punto decimal - * , Coma, define la posicin del separado de miles. - *
- * - * Nota: - * Las funciones de formateo para PICTURE pueden ser agrupadas juntas - * cuando sean usandas conjuntamente con los moldes para PICTURE. - * Sin embargo un espacio en blanco debe ser insertado en la cadena de - * PICTURE si existen ambas: funciones y moldes. - * $EXAMPLES$ - * FUNCTION Main() - * LOCAL cVar := Space(50) - * LOCAL nId := 0 - * CLS - * @ 3,1 SAY "Nombre" GET cVar PICTURE "@!S 30" - * @ 4,1 SAY "Ident." GET nId PICTURE "999.999" - * READ - * ? "El nombre que Ud. ingres es:", cVar - * ? "La Ident. que Ud. ingres es:", nId - * RETURN NIL - * $TESTS$ - * Ver ejemplos - * $STATUS$ - * R - * $COMPLIANCE$ - * Este comando es totalmente compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera asociada es rtl - * $SEEALSO$ - * @...SAY,READ,TRANSFORM() - * $END$ - */ - -/* $DOC$ - * $COMMANDNAME$ - * @...SAY - * $CATEGORY$ - * Comando - * $ONELINER$ - * Visualiza datos en las coordenadas dadas en el dispositivo actual - * $SYNTAX$ - * @ , SAY [ PICTURE ] [COLOR ] - * $ARGUMENTS$ - * La fila donde se visualiza el SAY - * - * La columna donde se visualiza el SAY - * - * Valor a visualizar - * - * Formato para el PICTURE - * - * Cadena de Color - * $RETURNS$ - * Ninguno - * $DESCRIPTION$ - * Este comando visualiza el contenido de en las coordenadas - * , . Una clusula PICTURE puede ser especificada en - * . Si el dispositivo actual es establecido a la impresora, la - * salida ir a la impresora; Por defecto todas las salidas son - * dirigidas a la pantalla. - * - * Para una lista completa de los Moldes y Funciones para PICTURES, vea - * el comando @...GET - * $EXAMPLES$ - * FUNCTION Main - * CLS - * @ 2,1 SAY "Harbour" - * @ 3,1 SAY "is" COLOR "b/r+" - * @ 4,1 SAY "Power" PICTURE "@!" - * RETURN NIL - * $TESTS$ - * Ver ejemplos - * $STATUS$ - * R - * $COMPLIANCE$ - * Este comando es totalmente compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera asociada es rtl - * $SEEALSO$ - * @...GET,SET DEVICE,TRANSFORM() - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/setmode.txt b/harbour/examples/hbdoc/examples/es/setmode.txt deleted file mode 100644 index 99abaac5ad..0000000000 --- a/harbour/examples/hbdoc/examples/es/setmode.txt +++ /dev/null @@ -1,80 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2000 Alejandro de Grate - * Documentacin en Espaol de: - * SETMODE() - * - * See COPYING for licensing terms. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * SETMODE() - * $CATEGORY$ - * Entorno - * $ONELINER$ - * Cambia el modo de video a un nmero dado de filas y columnas - * $SYNTAX$ - * SETMODE( , ) --> lSatisfactorio - * $ARGUMENTS$ - * es el nmero de filas para el modo de video deseado. - * - * es el nmero de columnas para el modo de video deseado. - * - * $RETURNS$ - * SETMODE() devuelve verdadero si el cambio en el modo de video fue - * satisfactorio, de otra manera devuelve falso. - * - * $DESCRIPTION$ - * SETMODE() es una funcin que cambia el modo de video (dependiendo de - * la combination de tarjeta de video y monitor), para que coincida con - * el nmero de filas y columnas especificado. - * Ntese que slo hay realmente unas pocas combinaciones de pares de - * filas/columnas que produzcan el cambio en el modo de video. - * Los siguientes estan disponibles para D.O.S: - * 12 filas x 40 columnas 12 filas x 80 columnas - * 25 filas x 40 columnas 25 filas x 80 columnas - * 28 filas x 40 columnas 28 filas x 80 columnas - * 50 filas x 40 columnas 43 filas x 80 columnas - * 50 filas x 80 columnas - * Algunas modos slo estan disponibles para monitor color y/o VGA. - * Cualquier cambio producido en el tamao de la pantalla es actualizado - * en los valores devueltos por MAXROW() y MAXCOL(). - * - * $EXAMPLES$ - * El primer ejemplo cambia al modo de visualizacion de 12 lineas: - * - * IF SETMODE( 12, 40) - * ? "Oye hombre, eres tu chicato ?" - * ELSE - * ? "Mam treme los anteojos !" - * ENDIF - * - * El prximo ejemplo cambia al modo de visualizacion de 50 lineas: - * IF SETMODE( 50, 80) - * ? "Este maravilloso modo de video ha sido seteado" - * ELSE - * ? "Oye Manuel que este monitor no est hecho de goma !" - * ENDIF - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Algunos de estos modos no estan disponibles en Clipper - * $PLATFORMS$ - * DOS - * $FILES$ - * El Achivo fuente es ..\source\rtl\gtdos\gtdos.c - * $SEEALSO$ - * MAXCOL(), MAXROW() - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/statics.txt b/harbour/examples/hbdoc/examples/es/statics.txt deleted file mode 100644 index 19bff4d95a..0000000000 --- a/harbour/examples/hbdoc/examples/es/statics.txt +++ /dev/null @@ -1,83 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2001 Antonio Linares - * Documentacin en Ingls de statics.txt - * - * Copyright 2001 Alejandro de Grate - * Traduccin al Espaol de statics.txt - * - * Vea COPYING por los trminos de la licencia. - * - */ - - - -VARIABLES ESTTICAS -=================== - -Comenc la implementacin de Clases y creacin de objetos cuando -Harbour an no estaba manejando variables estticas. (Harbour las -reconoca pero no generaba el pcode apropiado para ellas) . - -As Yo podra hacer una introduccin al manejo de las variables -estticas como es, un sofisticado sistema, que Harbour esta yendo -a implementar. - -Es algo conocido pblicamente que las variables estticas en Clipper -estn localizadas al final del segmento de datos. Esto ha causado -todo tipo de problemas. Esto explica por qu, cuando he diseado -FiveWin lo hice en una forma que no pudiera causar ningn problema -en el futuro. - -En Harbour todas las variables estticas (y quiero significar en todos -los PRGs) son almacenadas en un slo array de Harbour (un array del -lenguaje Clipper), esto garantiza que podemos tener tantas variables -estticas como deseamos sin limites (slo limitados por la memoria -disponible). -Este array aStatics no es visible desde la aplicacin (nivel PRG). - -Basicamente lo que sucede cuando una funcin es llamada y esta -funcin usa variables estticas, es que la pila establece un puntero -al sector del array donde estn nuestras variables estaticas, as -desde este momento en adelante, acceder a la static1, static2, ... -es acceder a algn elemento de ese array. - - static1 = statics[ statics_base_for_this_function + 1 ] - - ... - - staticn = statics[ statics_base_for_this_function + n ] - -En orden de implementar esto nostros solo usamos dos nuevos opcodes: -_STATICS y _SFRAME. -_STATICS, hace crecer el array global de estaticas lo suficiente para -para soportar nuestras variables estaticas recin definidas: - - _STATICS --> ASize( aStatics, Len( aStatics ) + ) - - _SFRAME --> le dice a la pila (stack) en que ubicacin dentro del - array aStatics estamos nosotros. - -_STATICS, es slo llamada una vez en el todo el PRG desde una funcin -de inicio llamada _INITSTATICS (STATICS$ y SINIT en Clipper). - -Esta funcin almacena en un lugar astuto (su propio puntero en la -tabla de smbolos !) nuestra base esttica y luego _SFRAME -simplemente la toma de all y la establece en la pila. -Esta funcin _INITSTATICS ejecutar cualquier inicializacin que -nuestras globales estticas puedan tener definidas en aquel PRG). - -Uds. van a ver el cdigo de todo esto. Solo quera darles una -clara idea sobre como Harbour hace esta magia :-) - -Antonio Linares - - - - diff --git a/harbour/examples/hbdoc/examples/es/strotype.txt b/harbour/examples/hbdoc/examples/es/strotype.txt deleted file mode 100644 index 1fe39e7480..0000000000 --- a/harbour/examples/hbdoc/examples/es/strotype.txt +++ /dev/null @@ -1,129 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2001 - * Documentacin en Ingls de: strotype.txt - * - * Copyright 2002 Alejandro de Grate - * Documentacin en Espaol de: strotype.txt - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * Fuertemente tipeado - * $CATEGORY$ - * Documento - * $ONELINER$ - * Chequeo de Tipo en Tiempo de Compilacin - * $DESCRIPTION$ - * El Strong Type Checking, podra ser tambin descripto como - * "Chequeo de tipo en Tiempo de Compilacin". - * Como Ud. podra saber Clipper genera un error en Tiempo de Ejecucin - * ("Type Mismatch") cuando nosotros intentamos realizar algunas - * operaciones con el tipo equivocado de variable. - * - * Ejemplos: - * - * LOCAL Var1 := "A" - * - * ? Var1 * 3 // Error - * - * @ Var1, 7 SAY 'Hello' // Error - * - * ? SubStr( "Hello", Var1 ) // Error - * - * Las 3 lneas superiores podran todas resultar en un error de Tiempo - * de Ejecucin, porque Var1 es del tipo CHARACTER, pero las lneas de - * arriba la usan como si fuera del tipo NUMERIC. - * - * Usando un chequeo de Tipo Fuerte, Chequeo de Tipo en Tiempo de - * Compilacin, el problema de arriba podra haber sido descubierto y - * y reportado en tiempo de compilacin, antes que esperar que el - * inevitable problema sea descubierto cuando finalmente nosotros - * ejecutemos el programa. - * - * Los lenguajes fuertemente tipeados permiten al programador "decirle" - * al compilador (declarar) cual es el tipo de cada variable, as el - * compilador puede advertirle al programador, cuando esa variable - * declarada (Strong Typed), es usada en un contexto el cual es - * incompatible con su tipo declarado. - * - * Por ejemplo si nosotros le "contamos" al compilador que la Var1 de - * arriba es del tipo CHARACTER (LOCAL Var1 AS CHARACTER), el compilador - * de Harbour, podra en devolucin advertirnos que nosotros intentamos - * realizar el calculo: - * - * Var1 * 3 - * - * porque el compilador sabe que nosotros no podemos realizar la - * mutiplicacin de un CHARACTER. (Nosotros podramos hacerlo en algn - * contexto pero eso esta mas all del alcance de esta discusin). - * Similarmente nosotros podramos haber sido advertidos cuando - * intentamos usar Var1 como un numero de Fila ( @ Var1 ), como el - * segundo operando de la funcin SUBSTR(), SUBSTR( "Hello", Var1) - * porque el compilador sabe que esas operaciones requieren un tipo - * NUMERIC antes que CHARACTER. - * - * Lo de arriba puede ahorrarnos un montn de tiempo, sealandonos un - * problema del cual no podemos escapar, porque ese cdigo nunca - * funcionar correctamente una vez ejecutado. - * As que antes de esperar al ciclo de testeo, para que tales problemas - * sean descubiertos, (y algunas veces an despus de que nosotros - * hemos distribuido nuestras aplicaciones) en su lugar nosotros podemos - * saber de esos problemas tan pronto como nosotros tipeamos: - * - * HARBOUR ProgName -w3 - * - * Harbour tambin ofrece un modo hbrido, donde puede reportar este - * tipo de problemas, an sin el requerimiento que el programador - * declare el tipo de variables. Esta caracterstica es referida como - * Chequeo Adaptativo de Tipo (Adaptive Type Checking). - * No es necesario que el programador haga ningn cambio en el cdigo - * para tomar ventaja de sta caracterstica. Todos los 3 errores de - * arriba podran haber sido reportados tan efectivamente como si el - * programador hubiera declarado Var1 como de Tipo Fuerte. - * - * Harbour podra haber sido capaz de reportar tales problemas en - * tiempo de compilacin, porque la asignacin Var1 := "A" implica que - * Var1 es del tipo CHARACTER, hasta que a sta le sea asignado otro - * valor. As entonces Harbour podra "recordar" que Var1 a "adaptado" - * el tipo CHARACTER, y as la multiplicacin subsecuente Var1 * 3 - * ser reportada como un error, tan pronto como Ud. intente compilar - * tal cdigo. - * - * La parte hermosa de este modo hbrido, es que a diferencia de las - * variables Strong Typed, Ud. no tiene que declarar el cdigo, as - * que no son necesarios cambios en el cdigo fuente, el Tipo en su - * lugar es asumido por implicacin (el Tipo del valor asignado). - * El otro beneficio es que, es completamente correcto asignar un nuevo - * valor de diferente tipo, en cualquier momento, a esa variable no - * declarada (variante). Tan pronto como nosotros asignemos un nuevo - * tipo, el compilador entonces nos proteger de usar la variable en un - * contexto incompatible, dado que la variable a "adaptado" este Tipo - * tan pronto como nosotros le hemos asignado un valor, el cual implica - * un Tipo. - * - * Mientras el Chequeo Adaptativo de Tipo puede ser completamente - * efectivo en reportar muchos errores comunes, para tener todos los - * beneficios del Chequeo en Tiempo de Compilacin es recomendado - * declarar el Tipo de las variables, cuando sea posible. - * - * Las caractersticas del Tipo fuerte (Strong Type), tambin permiten - * la declaracin de parmetros esperados (incluyendo opcionales) de las - * funciones definidas por el usuario, asi como tambin el tipo - * retornado. - * Similarmente, Ud. puede declarar el tipo de cualquier variable de - * Clase, Mtodos y Parmetros de Mtodos. - * - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/subcodes.txt b/harbour/examples/hbdoc/examples/es/subcodes.txt deleted file mode 100644 index 368ebf285f..0000000000 --- a/harbour/examples/hbdoc/examples/es/subcodes.txt +++ /dev/null @@ -1,1385 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2002 Alejandro de Grate - * Documentacin en Espaol de: - * subcodes.txt - * - * Documentacin en Ingls Luiz Rafael Culik - * - * Proposition: - * - * If the error is raised in the same condition as in Clipper then - * the same subcode number should be used. - * Errors specific to the Harbour and generated in RTL modules - * should start from 3000 - * Errors generated in tools functions should start from 4000 - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* ************************************************************************** */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1003 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Intento de acceder a una variable inexistente u oculta (hidden) - * $DESCRIPTION$ - * La variable especificada no fue hallada. - * Si esta variable es un campo de una base de datos, asegurese que la - * base de datos este abierta. - * Si esta es una variable privada o publica entonces Ud. primero debe - * crearla usando la sentencia PRIVATE o PUBLIC. - * $FUNCTION$ - * - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1068 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Tipo de argumento no vlido - * $DESCRIPTION$ - * El dato usado no es del tipo LOGICO. - * $FUNCTION$ - * - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1068 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Error de limite al intentar acceder al array - * $DESCRIPTION$ - * Se intenta obtener un valor desde un dato que no es array. - * $FUNCTION$ - * - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1069 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Error de limite al intentar acceder al array - * $DESCRIPTION$ - * Se intenta establecer un valor a un dato que no es array. - * $FUNCTION$ - * - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1078 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Tipo de argumento no vlido - * $DESCRIPTION$ - * Los tipos de los argumentos comparados no coinciden. - * $FUNCTION$ - * == - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1072 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Tipo de argumento no vlido - * $DESCRIPTION$ - * Los tipos de los argumentos comparados no coinciden. - * $FUNCTION$ - * <> - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1073 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Tipo de argumento no vlido - * $DESCRIPTION$ - * Los tipos de los argumentos comparados no coinciden. - * $FUNCTION$ - * < - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1074 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Tipo de argumento no vlido - * $DESCRIPTION$ - * Los tipos de los argumentos comparados no coinciden. - * $FUNCTION$ - * <= - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1075 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Tipo de argumento no vlido - * $DESCRIPTION$ - * Los tipos de los argumentos comparados no coinciden. - * $FUNCTION$ - * > - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1076 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Tipo de argumento no vlido - * $DESCRIPTION$ - * Los tipos de los argumentos comparados no coinciden. - * $FUNCTION$ - * >= - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1077 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Tipo de argumento no vlido - * $DESCRIPTION$ - * La operacin no esta permitida para los argumentos pasados. - * El argumento no es un valor del tipo LOGICAL. - * $FUNCTION$ - * !, .NOT. - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1078 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Tipo de argumento no vlido - * $DESCRIPTION$ - * El tipo de uno ambos argumentos no es del tipo LOGICAL. - * $FUNCTION$ - * .AND. - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1079 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Tipo de argumento no vlido - * $DESCRIPTION$ - * El tipo de uno ambos argumentos no es del tipo LOGICAL. - * $FUNCTION$ - * .OR. - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1076 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Tipo de argumento no vlido - * $DESCRIPTION$ - * El valor del argumento no puede ser incrementado. - * $FUNCTION$ - * ++ - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1081 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Tipo de argumento no vlido - * $DESCRIPTION$ - * La operacin de suma no esta permitida para los argumentos usados. - * $FUNCTION$ - * + - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1082 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Tipo de argumento no vlido - * $DESCRIPTION$ - * La operacin de resta no esta permitida para los argumentos - * usados. - * $FUNCTION$ - * - - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1100 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Tipo de argumento Incorrecto - * $DESCRIPTION$ - * El argumento especificado no es una cadena. - * $FUNCTION$ - * RTRIM(), TRIM() - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1101 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Tipo de argumento Incorrecto - * $DESCRIPTION$ - * El argumento especificado no es una cadena. - * $FUNCTION$ - * LTRIM() - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1102 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a la funcin - * $DESCRIPTION$ - * El primer argumento pasado a la funcin no es una cadena. - * $FUNCTION$ - * UPPER() - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1103 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a la funcin - * $DESCRIPTION$ - * El primer argumento pasado a la funcin no es una cadena. - * $FUNCTION$ - * LOWER() - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1104 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Tipo de argumento Incorrecto - * $DESCRIPTION$ - * El argumento especificado no es un valor numerico. - * $FUNCTION$ - * CHR - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1105 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a la funcin - * $DESCRIPTION$ - * Los argumentos pasados a la funcin son de un tipo incorrecto. - * $FUNCTION$ - * SPACE() - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1106 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a la funcin - * $DESCRIPTION$ - * Los argumentos pasados a la funcin son de un tipo incorrecto. - * $FUNCTION$ - * REPLICATE() - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1107 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Tipo de argumento Incorrecto - * $DESCRIPTION$ - * El argumento especificado no es una cadena. - * $FUNCTION$ - * ASC() - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1108 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Tipo de argumento Incorrecto - * $DESCRIPTION$ - * El argumento especificado no es una cadena. - * $FUNCTION$ - * AT() - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1076 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Tipo de argumento no vlido - * $DESCRIPTION$ - * Los argumentos del operador pesos '$' no son cadenas. - * $FUNCTION$ - * Simbolo pesos ($) - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1110 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a la funcin - * $DESCRIPTION$ - * El primer argumento pasado a la funcin no es una cadena. - * $FUNCTION$ - * SUBSTR() - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1110 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a la funcin - * $DESCRIPTION$ - * El tipo de argumento pasado no es una cadena ni un array. - * $FUNCTION$ - * LEN() - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1112 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a la funcin - * $DESCRIPTION$ - * El argumento (o argumentos) pasados a la funcin son del tipo - * incorrecto. - * $FUNCTION$ - * YEAR() - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1113 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a la funcin - * $DESCRIPTION$ - * El argumento (o argumentos) pasados a la funcin son del tipo - * incorrecto. - * $FUNCTION$ - * MONTH - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1114 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a la funcin - * $DESCRIPTION$ - * El argumento (o argumentos) pasados a la funcin son del tipo - * incorrecto. - * $FUNCTION$ - * DAY() - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1115 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a la funcin - * $DESCRIPTION$ - * El argumento (o argumentos) pasados a la funcin son del tipo - * incorrecto. - * $FUNCTION$ - * DOW() - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1116 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a la funcin - * $DESCRIPTION$ - * El argumento (o argumentos) pasados a la funcin son del tipo - * incorrecto. - * $FUNCTION$ - * CMONTH() - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1117 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a la funcin - * $DESCRIPTION$ - * El argumento (o argumentos) pasados a la funcin son del tipo - * incorrecto. - * $FUNCTION$ - * CDOW() - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1120 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a la funcin - * $DESCRIPTION$ - * El argumento (o argumentos) pasados a la funcin son del tipo - * incorrecto. - * $FUNCTION$ - * DTOS - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1122 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Tipo de argumento Incorrecto - * $DESCRIPTION$ - * El argumento (o argumentos) pasados a la funcin son del tipo - * incorrecto. - * $FUNCTION$ - * TRANSFORM() - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1124 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Tipo de argumento Incorrecto - * $DESCRIPTION$ - * El primer argumento pasado a la funcin no es una cadena. - * $FUNCTION$ - * LEFT() - * $STATUS$ - * Clipper - * $SEEALSO$ - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1126 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a la funcin - * $DESCRIPTION$ - * El primer argumento pasado a la funcin no es una cadena. - * $FUNCTION$ - * STRTRAN() - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1132 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Error de limite al acceder al array - * $DESCRIPTION$ - * El indice especificado para el array es mayor que el numero de - * elementos en el array. - * $FUNCTION$ - * - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1133 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Error de Limites en la asignacin al array - * $DESCRIPTION$ - * El indice especificado para el array es mayor que el numero de - * elementos en el array. - * $FUNCTION$ - * - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1068 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Error de Limites en la asignacin del elemento al array - * $DESCRIPTION$ - * El indice especificado para el array es mayor que el numero de - * elementos en el array. - * $FUNCTION$ - * - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1085 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a la funcin - * $DESCRIPTION$ - * El argumento (o argumentos) pasados a la funcin no son del tipo - * numerico. - * $FUNCTION$ - * MOD - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1089 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a la funcin - * $DESCRIPTION$ - * El argumento (o argumentos) pasados a la funcin no son del tipo - * numerico. - * $FUNCTION$ - * ABS() - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1090 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a la funcin - * $DESCRIPTION$ - * El argumento (o argumentos) pasados a la funcin no son del tipo - * numerico. - * $FUNCTION$ - * INT() - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1092 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a la funcin - * $DESCRIPTION$ - * El argumento (o argumentos) pasados a la funcin no son del tipo - * numerico. - * $FUNCTION$ - * MIN() - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1093 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a la funcin - * $DESCRIPTION$ - * El argumento (o argumentos) pasados a la funcin no son del tipo - * numerico. - * $FUNCTION$ - * MAX() - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1094 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a la funcin - * $DESCRIPTION$ - * El argumento (o argumentos) pasados a la funcin no son del tipo - * numerico. - * $FUNCTION$ - * ROUND - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1095 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a la funcin - * $DESCRIPTION$ - * El argumento (o argumentos) pasados a la funcin no son del tipo - * numerico. - * $FUNCTION$ - * LOG() - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1096 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a la funcin - * $DESCRIPTION$ - * El argumento (o argumentos) pasados a la funcin no son del tipo - * numerico. - * $FUNCTION$ - * EXP() - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1097 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a la funcin - * $DESCRIPTION$ - * El argumento (o argumentos) pasados a la funcin no son del tipo - * numerico. - * $FUNCTION$ - * SQRT() - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1098 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a la funcin - * $DESCRIPTION$ - * El argumento (o argumentos) pasados a la funcin no son del tipo - * caracter. - * $FUNCTION$ - * VAL() - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/1099 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a la funcin - * $DESCRIPTION$ - * El argumento (o argumentos) pasados a la funcin no son del tipo - * numerico. - * $FUNCTION$ - * STR() - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* ************************************************************************** */ - -/* $DOC$ - * $SUBCODE$ - * BASE/2010 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Tipo de argumento Incorrecto - * $DESCRIPTION$ - * El argumento pasado no era una cadena conteniendo el nombre de - * archivo a copiar. - * $FUNCTION$ - * __COPYFILE() - * $COMPLIANCE$ - * Especifico de Harbour - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/2012 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Error de archivo - * $DESCRIPTION$ - * Un error ha ocurrido durante el intento de abrir, crear o escribir - * durante la operacin de copia. - * $FUNCTION$ - * __COPYFILE() - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/2017 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a la funcin - * $DESCRIPTION$ - * El primer argumento pasado no es un array, y/o el segundo argumento - * no es un codeblock - * $FUNCTION$ - * AEVAL() - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/2020 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a la funcin - * $DESCRIPTION$ - * El valor asado es negativo. Solamente valores mayores a cero son - * permitidos. - * $FUNCTION$ - * SET DECIMALS - * SET EPOCH - * SET MARGIN - * SET MESSAGE - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - -/* ************************************************************************** */ - - -/* $DOC$ - * $SUBCODE$ - * BASE/3001 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Tipo de argumento Incorrecto - * $DESCRIPTION$ - * El tipo de argumento pasado no es un objeto. Solamente datos del - * tipo OBJECT pueden ser clonados por esta funcin. - * $FUNCTION$ - * OCLONE() - * $STATUS$ - * Especifico de Harbour - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/3002 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * La Superclase no retorna un objeto - * $DESCRIPTION$ - * El argumento pasado no es un nombre de una clase definida o la - * clase especificada no tiene una Superclase. - * $FUNCTION$ - * __INSTSUPER() - * $STATUS$ - * Especifico de Harbour - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/3003 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * No se puede encontrar la Superclase - * $DESCRIPTION$ - * El argumento pasado no es un nombre de una clase definida. - * $FUNCTION$ - * __INSTSUPER() - * $STATUS$ - * Especifico de Harbour - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/3004 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * No se puede modificar un item DATA en una calse - * $DESCRIPTION$ - * Un intento de modificar un miembro de una case fue hecho. - * Solamente INLINE y METHOD pueden ser modificados. - * $FUNCTION$ - * CLASSMOD() - * $STATUS$ - * Especifico de Harbour - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/3005 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Incorrect arguments type - * $DESCRIPTION$ - * O bien el primer argumento no era un objeto o el segundo argumento - * no era una cadena. - * $FUNCTION$ - * ISMESSAGE(), OSEND() - * $STATUS$ - * Especifico de Harbour - * $SEEALSO$ - * - * $END$ - */ - - -/* $DOC$ - * $SUBCODE$ - * BASE/3007 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Tipo de argumento Incorrecto - * $DESCRIPTION$ - * Los argumentos pasados estan causando un conflicto en el manejo - * de la solicitud. - * No hay ningun sentido en esperar por siempre cuando no hay - * eventos de entrada ! - * $FUNCTION$ - * INKEY() - * $STATUS$ - * Especifico de Harbour - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/3008 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Tipo de argumento no vlido - * $DESCRIPTION$ - * Los argumentos pasado no son una cadena. Deberia ser una cadena - * con un nombre de variable o array unidimensional de cadenas. - * $FUNCTION$ - * __MVPRIVATE(), __MVPUBLIC() - * $STATUS$ - * Especifico de Harbour - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/3009 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento incorrecto pasado a la funcin __MVGET - * $DESCRIPTION$ - * La funcin __MVGET espera solamente un argumento: una cadena con un - * nombre de variable. El valor de esta variable sera devuelto. - * $FUNCTION$ - * __MVGET() - * $STATUS$ - * Especifico de Harbour - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/3010 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento incorrecto pasado a la funcin __MVPUT - * $DESCRIPTION$ - * La funcin __MVPUT espera al menos un argumento: una cadena con un - * nombre de variable. El valor de esta variable sera establecido. - * $FUNCTION$ - * __MVPUT() - * $STATUS$ - * Especifico de Harbour - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/3011 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a la funcin - * $DESCRIPTION$ - * Se intento obtener el argumento de la funcin, que no fue pasado. - * El numero de los argumentos requeridos es mayor que el numero - * de argumentos pasados. - * $FUNCTION$ - * PVALUE() - * $STATUS$ - * Especifico de Harbour - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/3012 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a la funcin - * $DESCRIPTION$ - * El primer argumento no es una cadena con el nombre de la - * function / procedure que deberia ser llamado. - * $FUNCTION$ - * DO - * $STATUS$ - * Especifico de Harbour - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/3101 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a una funcin object/class - * $DESCRIPTION$ - * Uno de los argumentos no es del tipo requerido. - * $FUNCTION$ - * __OBJ*() - * $STATUS$ - * Especifico de Harbour - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/3102 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Error al intentar modificar o borrar un smbolo de la clase - * $DESCRIPTION$ - * Un smbolo deberia ser modificado o borrado de una clase, pero el - * smbolo no existe. - * $FUNCTION$ - * __OBJ*() - * $STATUS$ - * Especifico de Harbour - * $SEEALSO$ - * - * $END$ - */ - -/* $DOC$ - * $SUBCODE$ - * BASE/3103 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Error al intentar agregar un smbolo a la clase - * $DESCRIPTION$ - * Un smbolo deberia ser agregado a la clase, pero el smbolo ya - * existe. - * $FUNCTION$ - * __OBJ*() - * $STATUS$ - * Especifico de Harbour - * $SEEALSO$ - * - * $END$ - */ - - /* ************************************************************************** */ - -/* $DOC$ - * $SUBCODE$ - * TOOLS/4001 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Argumento no vlido pasado a la funcin - * $DESCRIPTION$ - * El segundo argumento pasado a la funcin no es una cadena. - * $FUNCTION$ - * ISLEAPYEAR() - * $STATUS$ - * Especifico de Harbour - * $SEEALSO$ - * - * $END$ - */ - -/* ************************************************************************** */ - -/* $DOC$ - * $SUBCODE$ - * TERM/2013 - * $CATEGORY$ - * Errores de ejecucion - * $ONELINER$ - * Error al crear el archivo - * $DESCRIPTION$ - * El archivo especificado no puede ser creado debido a algun error - * del sistema operativo. - * $FUNCTION$ - * SET, SET ALTERNATE TO - * $STATUS$ - * Clipper - * $SEEALSO$ - * - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/tbrowse.txt b/harbour/examples/hbdoc/examples/es/tbrowse.txt deleted file mode 100644 index 7b4f448a69..0000000000 --- a/harbour/examples/hbdoc/examples/es/tbrowse.txt +++ /dev/null @@ -1,374 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2002 Alejandro de Grate - * Documentacin en Espaol de: - * TBrowseNew() - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $CLASSDOC$ - * $FUNCNAME$ - * TBrowseNew() - * $CATEGORY$ - * Clase TBrowse - * $ONELINER$ - * Crea un Objeto Browse - * $CONSTRUCTOR$ - * TBrowseNew( ,,, ) --> - * $ARGUMENTS$ - * Fila Superior - * - * Columna Superior Izquierda - * - * Fila Inferior - * - * Columna Inferior Derecha - * $RETURNS$ - * Un nuevo Objeto Browse - * $DESCRIPTION$ - * Esta funcin establece una ventana de desplazamiento en las - * coordenadas establecidas por , , , - * Para visualizar una base de datos use la funcin TBrowseDB() en - * su lugar. - * $DATANOLINK$ - * :aColumns Array para guardar todas las columnas del browse - * - * :autoLite Valor Lgico para controlar el color brillante - * - * :cargo Variable definida por el usuario - * - * :colorSpec Tabla de Color para la visualizacin del TBrowse - * - * :colPos Columna de posicin actual del cursor - * - * :colSep Caracter separador de Columnas - * - * :footSep Caracter separador de Notas al pie - * - * :freeze Nmero de columnas a Congelar - * - * :goBottomBlock Codeblock ejecutado por TBrowse:goBottom() - * - * :goTopBlock Codeblock ejecutado por TBrowse:goTop() - * - * :headSep Caracter separador de Encabezados - * - * :hitBottom Indica el fin de los datos disponibles - * - * :hitTop Indica el comienzo de los datos disponibles - * - * :leftVisible Indica la posicin de la columna no congelada - * ms a la izquierda en la pantalla - * - * :nBottom Nmero de la Fila Inferior para la visualizacin - * del objeto TBrowse - * - * :nLeft Columna ms a la Izquierda para la visualizacin - * del objeto TBrowse - * - * :nRight Columna ms a la Derecha para la visualizacin - * del objeto TBrowse - * - * :nTop Nmero de la Fila Superior para la visualizacin - * del objeto TBrowse - * - * :rightVisible Indica la posicin de la columna no congelada - * ms a la Derecha en la pantalla - * - * :rowCount Nmero de filas de datos visibles en el TBrowse - * - * :rowPos Fila de posicin actual del cursor - * - * :skipBlock Codeblock usado para la reposicion de datos - * - * :stable Indica si el objeto TBrowse es estable - * - * :aRedraw Array de items lgicos indicando si es apropiado - * cuales filas necesitan ser redibujadas - * - * :RelativePos Indica la posicin del registro relativa a la - * posicin del primer registro en la pantalla - * - * :lHeaders Variable interna que indica cuando hay cabeceras - * de columnas para dibujar - * - * :lFooters Variable interna que indica cuando hay pie de - * columnas para dibujar - * - * :aRect El rectangulo especificado con ColorRect() - * - * :aRectColor Los colores para usar en el rectangulo especificado - * con ColorRect() - * - * :aKeys Mantiene las teclas de movimiento por defecto - * - * $METHODSLINK$ - * AddColumn() Agrega un nuevo objeto TBColumn al Browse actual - * - * Applykey() Ejecuta el movimiento de teclas del Browse - * - * SetKey() Agrega una nueva tecla al diccionario de teclado - * $METHODSNOLINK$ - * New(nTop, nLeft, nBottom, nRight) - * Crea una nueva clase Browse y establece los - * valores por defecto - * - * Down() Mueve el cursor una fila hacia abajo - * - * End() Mueve el cursor a la columna de datos ms hacia - * la derecha que est visible. - * - * GoBottom() Reposiciona los datos fuentes al final del archivo - * - * GoTop() Reposiciona los datos fuentes al inicio del - * archivo - * - * Home() Mueve el cursor a la columna visible ms hacia la - * izquierda - * - * Left() Mueve el cursor una columna hacia la izquierda - * - * PageDown() Reposiciona los datos fuentes hacia abajo - * - * PageUp() Reposiciona los datos fuentes hacia arriba - * - * PanEnd() Mueve el cursor a la columna de datos ms a la - * derecha - * - * PanHome() Mueve el cursor a la columna de datos ms a la - * izquierda - * - * PanLeft() Se desplaza hacia la izquierda sin cambiar la - * posicin del cursor - * - * PanRight() Se desplaza hacia la derecha sin cambiar la - * posicin del cursor - * - * Right() Mueve el cursor una columna hacia la derecha - * - * Up() Mueve el cursor una fila hacia arriba - * - * ColCount() Retorna el nmero actual de columnas - * - * ColorRect() Altera el color de un grupo rectangular de celdas - * - * ColWidth(nCol) Retorna el ancho de visualizacin de una columna - * particular - * - * Configure( nMode) Reconfigura los seteos internos del objeto - * TBrowse. es un parmetro no - * documentado en CA-Cl*pper - * - * LeftDetermine() Determina la columna no congelada ms a la - * izquierda en la pantalla - * - * DeHilite() Saca el color brillante a la celda actual - * - * DelColumn( nPos ) Borra un objeto Column de un Browse - * - * ForceStable() Ejecuta una estabilizacin total - * - * GetColumn( nColumn ) Obtiene un objeto TBColumn especfico - * - * Hilite() Resalta la celda actual - * - * InsColumn( nPos, oCol) Inserta un objeto TBColumn de un Browse - * - * Invalidate() Fuerza un redibujo completo durante la - * prxima estabilizacin - * - * RefreshAll() Causa que todos los datos sean recalculados - * durante la prxima estabilizacin - * - * RefreshCurrent() Causa que la fila actual sea rellenada y - * redibujada en la prxima estabilizacin - * - * SetColumn( nColumn, oCol) Reemplaza un objeto TBColumn con otro - * - * Stabilize() Ejecuta una estabilizacin incremental - * - * DispCell( nCol, cColor) Visualiza una sola celda en el color dado - * - * $EXAMPLES$ - * Vea el archivo ../tests/testbrw.prg - * $TESTS$ - * Vea el archivo ../tests/testbrw.prg - * $STATUS$ - * S - * $COMPLIANCE$ - * Estas funciones son compatibles con CA-Cl*pper 5.2 - * Los mtodos Applykey() y Setkey() solamente son visibles si la - * compatibilidad con Clipper 5.3 ( HB_COMPAT_C53 ) est definida. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera asociada es rtl - * $SEEALSO$ - * TBROWSENEW(),TBCOLUMNNEW() - * $END$ - */ - - -/* $CLASSDOC$ - * $METHOD$ - * SetKey() - * $CATEGORY$ - * TBrowse Method - * $ONELINER$ - * Obtiene y/o Establece un bloque de cdigo asociado a una tecla - * $SYNTAX$ - * SetKey( [,] ) --> bOldBlock - * $ARGUMENTS$ - * Un cdigo de tecla (inkey) vlido - * - * Una acin opcional a asociar con el valor de la tecla - * $RETURNS$ - * Si al presionar una tecla, se cambia el codeblock - * se devolver el bloque previo, de otro modo este - * mtodo devolver el codeblock actual. - * $DESCRIPTION$ - * Este mtodo Obtiene y opcionalmente Establece un bloque de cdigo - * que es asociado con el valor de una tecla. - * La tabla inferior muestra las definiciones de teclas/codeblocks - * - * - * Valor Tecla Bloque de Cdigo - * - * K_DOWN {|Ob, nKey| Ob:Down(), 0} - * K_END {|Ob, nKey| Ob:End(), 0} - * K_CTRL_PGDN {|Ob, nKey| Ob:GoBottom(), 0} - * K_CTRL_PGUP {|Ob, nKey| Ob:GoTop(), 0} - * K_HOME {|Ob, nKey| Ob:Home(), 0} - * K_LEFT {|Ob, nKey| Ob:Left(), 0} - * K_PGDN {|Ob, nKey| Ob:PageDown(), 0} - * K_PGUP {|Ob, nKey| Ob:PageUp(), 0} - * K_CTRL_END {|Ob, nKey| Ob:PanEnd(), 0} - * K_CTRL_HOME {|Ob, nKey| Ob:PanHome(), 0} - * K_CTRL_LEFT {|Ob, nKey| Ob:PanLeft(), 0} - * K_CTRL_RIGHT {|Ob, nKey| Ob:PanRight(),0} - * K_RIGHT {|Ob, nKey| Ob:Right(), 0} - * K_UP {|Ob, nKey| Ob:Up(), 0} - * K_ESC {|Ob, nKey| -1 } - *
- * - * Los manejadores de tecla pueden ser consultados, agregados, - * reemplazados y removidos del dicccionario interno de teclado. - * Por ejemplo - * - * oTb:SETKEY( K_TAB, {|oTb, nKey| -1} ) - * - * Un manejador de teclas por defecto, puede ser declarado al - * especificar un valor de cero para . esto asocia el codeblock - * que ser evaluado cada vez que TBrowse:Applykey() sea llamado con - * un valor de tecla que no este contenida en el diccionario. - * Por ejemplo - * - * oTb:SetKey( 0, {|oTb, nKey| DefKeyHandler( otb, nkey) }) - * Esto llama a una funcin llamada DefKeyHandler() cuando nKey no - * est contenida en el diccionario. - * - * Para remover una definicin presion de tecla/codeblock, especifique - * NIl para - * oTb:SetKey( K_ESC, NIL ) - * $EXAMPLES$ - * oTb:SeyKey( K_F10, {|otb,nkey| ShowListByname(otb) } - * $STATUS$ - * S - * $COMPLIANCE$ - * El mtodo Setkey() solamente es visible si la compatibilidad con - * Clipper 5.3 ( HB_COMPAT_C53 ) est definida. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera asociada es rtl - * $SEEALSO$ - * Applykey() - * $END$ - */ - -/* $CLASSDOC$ - * $METHOD$ - * Applykey() - * $CATEGORY$ - * TBrowse Method - * $ONELINER$ - * Evala un codeblock asociado con una tecla especifica - * $SYNTAX$ - * ApplyKey( ) --> nResultado - * $ARGUMENTS$ - * Un cdigo de tecla (inkey) vlido - * $RETURNS$ - * Valor devuelto para el codeblock evaluado - * Ver Tabla abajo - * - * - * Valor Significado - * -1 El usuario solicita que el browse pierda foco de entrada - * 0 El codeblock asociado con fue evaluado - * 1 Imposible de localizar en el diccionario, la tecla - * no fu procesada - *
- * $DESCRIPTION$ - * Este mtodo evala un bloque de cdigo asociado con que - * est contenida en el diccionario TBrowse:setkey() - * $EXAMPLES$ - * WHILE .T. - * oTb:forceStable() - * - * IF( oTb:applykey( inkey(0) ) == -1 ) - * EXIT - * ENDIF - * - * ENDDO - * $STATUS$ - * S - * $COMPLIANCE$ - * El mtodo Applykey() solamente es visible si la compatibilidad con - * Clipper 5.3 ( HB_COMPAT_C53 ) est definida. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera asociada es rtl - * $SEEALSO$ - * SetKey() - * $END$ - */ - -/* $CLASSDOC$ - * $METHOD$ - * AddColumn() - * $CATEGORY$ - * TBrowse Method - * $ONELINER$ - * Agrega una nueva Column a un Objeto TBrowse - * $SYNTAX$ - * AddColumn( oCol ) --> Self - * $ARGUMENTS$ - * Es un Objeto TBColumn - * $RETURNS$ - * El Objeto actual - * $DESCRIPTION$ - * Este mtodo agrega un nuevo Objeto TBColumn especificado como - * al objeto de browsing asignado. - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es compatible con CA-Cl*pper 5.2 - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera asociada es rtl - * $SEEALSO$ - * TBColumnNew() - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/tclass.txt b/harbour/examples/hbdoc/examples/es/tclass.txt deleted file mode 100644 index 53e4377768..0000000000 --- a/harbour/examples/hbdoc/examples/es/tclass.txt +++ /dev/null @@ -1,76 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2000 Alejandro de Grate - * Documentacin en Espaol de: - * - * Copyright 2000 Brian Hays - * Documentacin en Ingles - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * HBClass() - * $CATEGORY$ - * Clases - * $ONELINER$ - * HBClass() es usada en la creacin de todas las clases - * $SYNTAX$ - * oClass := HBClass():New("TMyClass") - * - * HBClass() es usualmente utilizada para definir una clase con los - * comandos definidos en hbclass.h: - * CLASS HBGetList // Llama a HBClass() para crear la clase - * ... // HBGetList - * ENDCLASS - * $ARGUMENTS$ - * - * $RETURNS$ - * Una instancia de la Clase HBClass. Un objeto especial, el mtodo - * :New() puede entonces crear las clases que Ud. define. - * $DESCRIPTION$ - * HBClass es una clase que ... - * Los mtodos de clase son los siguientes: - * - * New() Crea una nueva instancia de la clase - * - * $EXAMPLES$ - * FUNCTION TestObject() - * LOCAL oObject - * - * oObject := HBClass():New("TMyClass") - * oObject:End() - * - * RETURN NIL - * - * $STATUS$ - * R - * $COMPLIANCE$ - * La sintaxis Orientada a Objetos en Harbour es compatible con - * CA-Cl*pper. - * Pero Clipper solamente permite la creacin de objetos a partir - * de unas pocas clases estandares, y NO le permite al programador - * crear nuevas clases. - * En Harbour, Ud. puede crear sus propias clases completamente con - * Mtodos, Variables de Instancia, Variables de Clase y Herencia. - * Aplicaciones enteras pueden ser designadas y codificadas en el - * estilo Orientado a Objetos. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * __objHasData(),Programacion Orientada a Objeto,CLASS - * $END$ - */ - - - diff --git a/harbour/examples/hbdoc/examples/es/tgetlist.txt b/harbour/examples/hbdoc/examples/es/tgetlist.txt deleted file mode 100644 index 1468f9600a..0000000000 --- a/harbour/examples/hbdoc/examples/es/tgetlist.txt +++ /dev/null @@ -1,74 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2002 Alejandro de Grate - * Documentacin en Espaol de: - * - * Copyright 1999 Chen Kedem - * Documentacin en Ingls de: READVAR() - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * READVAR() - * $CATEGORY$ - * Data input and output - * $ONELINER$ - * Retorna el nombre de la variable del actual GET MENU - * $SYNTAX$ - * READVAR( [] ) --> cViejoNombreVar - * $ARGUMENTS$ - * es el nuevo nombre de la variable a establecer - * $RETURNS$ - * READVAR() retorna el viejo nombre de la variable . - * Si ninguna variable fue establecida anteriormente, READVAR() retorna - * una cadena vaca. - * $DESCRIPTION$ - * READVAR() es establecida dentro del comando READ MENU TO para - * mantener el nombre en maysculas de la variable del GET / MENU TO - * actual y volverla de nuevo al viejo valor cuando aquellos comandos - * finalizan. - * Ud. no debera normalmente establecer un nombre de variable, sino - * usarlo para obtener el nombre de la variable de un GET cuando se - * ejecuta una clausula VALID WHEN. durante la ejecucin de un - * SET KEY y Ud. esta dentro de un READ MENU TO. - * $EXAMPLES$ - * // Visualiza un menu, presione para ver el nombre de la - * // variable de MENU TO - * CLS - * @ 1, 10 PROMPT "insecto chupador de sangre que infecta camas" - * @ 2, 10 PROMPT "germen; infeccion viral " - * @ 3, 10 PROMPT "defecto; snag; (fuente de) malfuncionamiento" - * @ 4, 10 PROMPT "pequeo microfono oculto " - * @ 6, 10 SAY "(Presione F1 por una pista)" - * SET KEY 28 TO ShowVar - * MENU TO What_Is_Bug - * - * PROCEDURE ShowVar - * ALERT( READVAR() ) // WHAT_IS_BUG in red ALERT() box - * RETURN - * - * $STATUS$ - * R - * $COMPLIANCE$ - * READVAR() trabaja exactamente como la funcin READKEY() de Clipper. - * Note sin embargo que el parmetro no est documentado - * y es usado internamente por CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * La Librera es rtl - * $SEEALSO$ - * @...GET,@...PROMPT,MENU TO,READ,SET KEY,__AtPrompt(),__MenuTo() - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/tlabel.txt b/harbour/examples/hbdoc/examples/es/tlabel.txt deleted file mode 100644 index 31a3090efd..0000000000 --- a/harbour/examples/hbdoc/examples/es/tlabel.txt +++ /dev/null @@ -1,100 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2002 Alejandro de Grate - * Documentacin en Espaol de: LABEL FORM - * - * Copyright 1999 Luiz Rafael Culik - * Documentacion en Ingls - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * LABEL FORM - * $CATEGORY$ - * Comando - * $ONELINER$ - * Visualiza etiquetas en la pantalla en algn dispositivo alterno - * $SYNTAX$ - * LABEL FORM [TO PRINTER] [TO FILE ] - * [] [WHILE ] [FOR ] - * [SAMPLE] [NOCONSOLE] - * $ARGUMENTS$ - * Nombre del archivo de etiquetas - * - * Nombre de un archivo alterno - * - * Expresin de una condicin de ambito alcance - * - * Expresin lgica de una Condicin WHILE - * - * Expresin lgica de una Condicin FOR - * $DESCRIPTION$ - * Este comando permite imprimir etiquetas basadas en el formato - * establecido en el archivo LBL, a un archivo especificado en - * . - * Por defecto la salida ir a la pantalla, sin embargo esta salida - * puede ser redirigida bien a la impresora usando la clusula - * TO PRINTER, bien a un archivo usando la clusula TO FILE. - * - * Si la clusula TO FILE es especificada, el nombre del archivo de - * texto ASCII conteniendo las etiquetas generadas ser . - * - * Si ninguna extensin de archivo es especificada, la extensin .txt - * es agregada. - * - * es la condicin de alcance para este comando. Alcances - * vlidos incluyen: - * NEXT (nmero de registros a ser visualizados donde - * es el nmero de registros) - * RECORD (un registro especfico a ser impreso) - * REST (todos los registros comenzando desde la posicin del registro - * actual. - * ALL (todos los registros) - * Por defecto es ALL (todo). - * - * Ambas expresiones lgicas pueden trabajar en conjuncin con la otra - * Donde es la expresin lgica para la condicin FOR (para los - * registros a ser visualizados dentro de un rango dado). - * es la expresin lgica para la condicin WHILE (para los - * registros a ser visualizados hasta que se deje de cumplir la - * condicin. - * - * Si la clusula SAMPLE es especificada, etiquetas de prueba sern - * generadas. - * - * Si la clusula NOCONSOLE es especificada, la salida a la consola ser - * desactivada mientras este comando este siendo ejecutado. - * - * Este comando sigue el criterio de ambito establecido en el comando - * SET PATH TO. El camino puede ser especifficado junto con la letra - * del disco en . - * $EXAMPLES$ - * FUNCTION MAIN() - * USE Test New - * LABEL FORM EE - * USE - * RETURN NIL - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Este comando es totalmente compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * REPORT FORM - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/tracing.txt b/harbour/examples/hbdoc/examples/es/tracing.txt deleted file mode 100644 index 597144fa65..0000000000 --- a/harbour/examples/hbdoc/examples/es/tracing.txt +++ /dev/null @@ -1,211 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2001 Gonzalo A. Diethelm - * Documentacin en Ingls - * - * Copyright 2001 Alejandro de Grate - * Traduccin al Espaol - * - * Vea COPYING por los trminos de la licencia. - * - */ - - -INTRODUCCION AL SEGUIMIENTO DE LA EJECUCION (rastrear) -====================================================== - -Este archivo explica como habilitar el seguimiento en Harbour. - - -SEGUIMIENTO -=========== - -Harbour implementa el seguimiento al agregar llamadas a la siguiente -macro en cdigo C: - - HB_TRACE(level, ("parametros estilo printf", arg1, arg2)); - -El nivel epecificado por la llamada a HB_TRACE afecta a Harbour en -dos formas: tiempo de compilacin y tiempo de ejecucin. - - -TIEMPO DE COMPILACION -===================== - -En tiempo de compilacin, la macro chequea cuando la constante del -preprocesador HB_TR_LEVEL es establecida a alguno de los siguientes -valores: - - #define HB_TR_ALWAYS 0 - #define HB_TR_FATAL 1 - #define HB_TR_ERROR 2 - #define HB_TR_WARNING 3 - #define HB_TR_INFO 4 - #define HB_TR_DEBUG 5 - -Si no es establecida a alguna de estas, la macro es seteada al valor -HB_TR_DEFAULT, la cual est actualmente establecida (en hbtrace.h) a -HB_TR_WARNING. - -Cuando el usuario explcitamente establece HB_TR_LEVEL este es -establecido por el compilador, sus efectos son como sigue: cualquier -llamada en el cdigo con un nivel mayor que HB_TR_LEVEL son borradas -del cdigo; estas llamadas simplemente desaparecen, y no hay efecto en -la perfomance del cdigo despus de eso. - - -TIEMPO DE EJECUCIN -=================== - -En tiempo de ejecucin, el usuario puede establecer la variable de -entorno HB_TR_LEVEL a una de: - - HB_TR_ALWAYS - HB_TR_FATAL - HB_TR_ERROR - HB_TR_WARNING - HB_TR_INFO - HB_TR_DEBUG - -con el siguiente efecto: cualquiera de las llamadas a HB_TRACE que -fueron dejadas por el compilador y que tenga un nivel inferior igual -a HB_TR_LEVEL imprimir sus argumentos a la salida stderr (pantalla). - - -EJEMPLOS -======== - -HB_TR_LEVEL HB_TR_LEVEL Descripcin -compilacin ejecucin ----------------------------------------------------------------------- -HB_TR_INFO HB_TR_ERROR Todas las llamadas con niveles HB_DEBUG - son eliminadas del cdigo, as ellas no - tienen efecto en la perfomance; solamente - llamadas con niveles de HB_TR_ERROR, - HB_TR_FATAL y HB_TR_ALWAYS son impresas. - -HB_TR_WARNING HB_TR_INFO Todas las llamadaa con niveles HB_INFO y - HB_DEBUG son eliminadas del cdigo, as - ellas no tienen efecto en la perfomance; - solamente llamadas con niveles de - HB_TR_ERROR, HB_TR_FATAL y HB_TR_ALWAYS - son impresas. Note como estableciendo - HB_TR_INFO en tiempo de ejecucin no - tiene ningn efecto, porque el cdigo fu - compilado con un menor nivel de rastreo. - -Por ejemplo, Yo compilo Harbour en WinNT con gcc (MINGW32), as -usualmente establezco la variable de entorno HB_USER_CFLAGS a algo as: - - export HB_USER_CFLAGS="-DHARBOUR_USE_WIN_GTAPI -DHB_TR_LEVEL=HB_TR_INFO" - -y me aseguro que tengo todo el seguimiento para los niveles INFO, -WARNING, ERROR, FATAL y ALWAYS. Si obtengo demasiada informacin, -en tiempo de ejecucin, yo puedo cambiar la variable de entorno a: - - export HB_TR_LEVEL=HB_TR_WARNING - -y mantener alejado todo el seguimiento del nivel INFO. En este caso -todas las llamadas a la funcin de seguimiento para el nivel INFO -sern hechas de todas formas, as que habr un prdida de perfomance. - - -USO -=== - -Cuando Harbour es compilado / ejecutado con algn nivel de seguimiento -y, entonces usado para compilar una aplicacin regular de Harbour, la -aplicacin producir MONTONES de informacin a la salida stderr. -Si Ud. est usando un sensible shell de comando (como ser bash) Ud. -puede redirigir la salida stderr a un archivo como en: - - mi_aplic >rastro.txt - - -REDIRECCION -=========== - -La salida generada mientras se efecta el seguimiento, va a stderr por -defecto. Ud. puede controlar esto en tiempo de ejecucin al establecer -la variable de entorno HB_TR_OUTPUT al nombre del archivo donde Ud. -podra querer que la salida de seguimiento sea dirigida. Si hay algn -problema abriendo el archivo para escritura, la salida se revierte a -stderr. - - -RASTREANDO EL PREPROCESADOR Y EL COMPILADOR -=========================================== - -Usualmente, Ud, no desear habilitar el seguimiento en el preprocesador -y en el compilador; de otra menera Ud. ver la salida de seguimiento -mientras compila a Harbour mismo. Si Ud. REALMENTE quiere habilitar el -seguimiento en el pre-procesador y/o el compilador, Ud. debe definir -en adicin a como se describe arriba, la siguiente variable, y entonces -recompilar el preprocesador / compilador: - - HB_TRACE_UTILS - -El valor no tiene ninguna importancia. - - -SEGUIMIENTO Y EJECUCION -======================= - -Es tambin posible habilitar y deshabilitar el seguimiento en tiempo -de ejecucin y averiguar y establecer el nivel de seguimiento. Desde -cdigo C: - -* Para averiguar el estado actual de seguimiento, y opcionalmente - cambiar el estado actual a un valor dado (el cual debera estar - en el rango [0,1], de otra manera, el estado actual permanece sin - cambios): - - hb_tracestate( estado ); - - Por lo tanto, para slo averiguar el estado actual, Ud. puede llamar - en forma segura: - - estado_actual = hb_tracestate(-1); - - - Para desactivar completamente el seguimiento: - - hb_tracestate(0); - - - Para activar el seguimiento: - - hb_tracestate(1); - - -* Para averiguar el nivel actual de seguimiento, y opcionalemente - cambiar el nivel actual a un valor dado (cual debera estar en el - rango [0,5], de otra manera, el estado actual permanece sin cambios): - - hb_tracelevel( nivel ); - - - Por lo tanto, para slo averiguar el nivel actual, Ud. puede llamar - en forma segura: - - nivel_actual = hb_tracelevel(-1); - - - - -Hay funciones para ser llamadas desde cdigo Clipper: -(en realidad desde Harbour) - - current_state := HB_TRACESTATE( [new_state] ) - current_level := HB_TRACELEVEL( [new_level] ) - - - - - diff --git a/harbour/examples/hbdoc/examples/es/treport.txt b/harbour/examples/hbdoc/examples/es/treport.txt deleted file mode 100644 index 908c448979..0000000000 --- a/harbour/examples/hbdoc/examples/es/treport.txt +++ /dev/null @@ -1,126 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2002 Alejandro de Grate - * Documentacin en Espaol de: - * REPORT FORM - * - * Copyright 1999 Luiz Rafael Culik - * Documentacion - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * REPORT FORM - * $CATEGORY$ - * Comando - * $ONELINER$ - * Visualiza un reporte - * $SYNTAX$ - * REPORT FORM [TO PRINTER] [TO FILE ] - * [] [WHILE ] [FOR ] - * [PLAIN |HEADING ] [NOEJECT] [SUMMARY] - * [NOCONSOLE] - * $ARGUMENTS$ - * Nombre del archivo de reporte - * - * Nombre de un archivo alterno - * - * Ambito alcance - * - * Expresin lgica de una Condicin WHILE - * - * Expresin lgica de una Condicin FOR - * - * Encabezado del Reporte - * $RETURNS$ - * NIL - * $DESCRIPTION$ - * Este comando imprime un informe reporte llamado , - * el cual es un archivo estandar FRM. La extensin del archivo no es - * necesaria porque la extensin .frm es asumida por defecto. - * Los comandos SET PATH TO y SET DEFAULT TO afectan la bsqueda del - * archivo ; a menos que la unidad de disco y el path - * sean especificados en , REPORT buscar dentro del - * path especificado en el comando SET PATH y si no puede encontrar - * el modelo de reporte en el directorio actual. - * - * La salida del reporte ser desplazada basada en el valor de - * SET MARGIN TO. - * - * Por defecto la salida ir a la pantalla, sin embargo esta salida - * puede ser redirigida bien a la impresora usando la clusula - * TO PRINTER, bien a un archivo usando la clusula TO FILE. - * - * Si la clusula TO FILE es especificada, el nombre de un archivo - * alterno es especificado en . - * Si ninguna extensin de archivo es especificada, la extensin .txt - * es agregada. - * - * es la condicin de alcance para este comando. Alcances - * vlidos incluyen: - * NEXT (nmero de registros a ser visualizados donde - * es el nmero de registros) - * RECORD (un registro especfico a ser impreso) - * REST (todos los registros comenzando desde la posicin del registro - * actual. - * ALL (todos los registros) - * Por defecto es ALL (todo). - * - * Ambas expresiones lgicas pueden trabajar en conjuncin con la otra - * Donde es la expresin lgica para la condicin FOR (para - * registros a ser visualizados dentro de un rango dado). - * es la expresin lgica para la condicin WHILE (para los - * registros a ser visualizados hasta que se deje de cumplir la - * condicin. - * - * Si la clusula PLAIN es especificada, la fecha y los nmeros de - * pagina son suprimidos. En adicion no hay salto automtico de pgina - * y el ttulo del reporte y los encabezados de columna aparecen una - * sola vez al principio del reporte. - * - * Si la clusula HEADING es usada, es visualizado en el - * ttulo de cada pgina del reporte. El valor de es - * evaluado solamente una vez antes de la ejecucin del reporte; variar - * los valores de no est permitido. La clusula PLAIN - * tiene precedencia sobre la clusula HEADING si ambas son incluidas. - * - * Si la clusula NOEJECT es usada, la eyeccin de la pgina inicial - * en el reporte no ser realizado cuando la clusula TO PRINTER sea - * especificada. - * De otro modo esta clusula no tendr efecto. - * - * Si la clusula SUMMARY es especificada, el reporte contendr - * solamente grupos, subgrupos e informacin de totales. La informacin - * detallada del elemento ttulo ser ignorada. - * - * Si la clusula NOCONSOLE es especificada, la salida a la consola ser - * desactivada mientras este comando este siendo ejecutado. - * $EXAMPLES$ - * FUNCTION() MAIN - * USE Test New - * Report FORM EE - * USE - * RETURN NIL - * $STATUS$ - * R - * $COMPLIANCE$ - * Este comando es totalmente compatible con CA-Cl*pper. - * $PLATFORMS$ - * Todas - * $FILES$ - * La librera es rtl - * $SEEALSO$ - * LABEL FORM - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/var.txt b/harbour/examples/hbdoc/examples/es/var.txt deleted file mode 100644 index 673e391de3..0000000000 --- a/harbour/examples/hbdoc/examples/es/var.txt +++ /dev/null @@ -1,920 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2003 Alejandro de Grate - * Documentacin en Espaol de: - * __MVPUBLIC(), __MVPRIVATE(), __MVXRELEASE(), - * __MVRELEASE(), __MVSCOPE(), __MVCLEAR(), - * __MVDBGINFO(), __MVEXIST(), __MVGET(), __MVPUT(), MEMVARBLOCK(), - * FIELDBLOCK(), FIELDWBLOCK(), TYPE(), VALTYPE(), HB_ISBYREF() - * - * Copyright 1999 Ryszard Glab - * Documentacin en Ingls de: - * __MVPUBLIC(), __MVPRIVATE(), __MVXRELEASE(), - * __MVRELEASE(), __MVSCOPE(), __MVCLEAR(), - * __MVDBGINFO(), __MVGET(), __MVPUT(), MEMVARBLOCK(), - * TYPE() - * - * Copyright 1999 Chen Kedem - * Documentacin en Ingls de: FIELDBLOCK(), FIELDWBLOCK() - * - * Copyright 2001 Chen Kedem - * Documentacin en Ingls de: __MVEXIST() - * - * Copyright 2002 Walter Negro - * Documentacin en Ingls de: HB_ISBYREF() - * - * Vea COPYING por los trminos de la licencia. - * - */ - -/* $DOC$ - * $FUNCNAME$ - * __MVPUBLIC() - * $CATEGORY$ - * Variable Management - * $ONELINER$ - * Esta funcin crea una variable PUBLIC - * $SYNTAX$ - * __MVPUBLIC( ) - * $ARGUMENTS$ - * Es bien una cadena que contiene el nombre de la - * variable un array unidimensional de cadenas con - * nombres de variables. - * Los esqueletos comodines no estan permitidos. - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * Esta funcin puede ser llamada por el compilador Harbour bien por - * el usuario. - * El compilador siempre pasa un item de tipo IT_SYMBOL que almacena el - * nombre de la variable. - * Si una variable con el mismo nombre ya existe, entonces la nueva - * variable no es creada, el valor previo permanece sin cambios. - * Si esta es la primera variable con ese nombre, entonces la variable - * es inicializada con el valor .T. - * $EXAMPLES$ - * Ninguno disponible - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es una extensin de Harbour. - * $FILES$ - * La librera asociada es vm - * $SEEALSO$ - * __MVPRIVATE(),__MVXRELEASE() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * __MVPRIVATE() - * $CATEGORY$ - * Variable Management - * $ONELINER$ - * Esta funcin crea una variable PRIVATE - * $SYNTAX$ - * __MVPRIVATE( ) - * $ARGUMENTS$ - * Es bien una cadena que contiene el nombre de la - * variable un array unidimensional de cadenas con - * nombres de variables. - * Los esqueletos comodines no estan permitidos. - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * Esta funcin puede ser llamada por el compilador Harbour bien por - * el usuario. - * El compilador siempre pasa un item de tipo IT_SYMBOL que almacena el - * nombre de la variable. - * Si una variable con el mismo nombre ya existe, entonces el valor de - * la vieja variable es ocultado hasta que la nueva variable sea - * liberada. - * La nueva variable es siempre inicializada con el valor NIL. - * $EXAMPLES$ - * Ninguno disponible - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es una extensin de Harbour. - * $FILES$ - * La librera asociada es vm - * $SEEALSO$ - * __MVPUBLIC(),__MVRELEASE(),__MVXRELEASE() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * __MVXRELEASE() - * $CATEGORY$ - * Variable Management - * $ONELINER$ - * Libera un valor almacenado en una variable PRIVATE or PUBLIC - * $SYNTAX$ - * __MVXRELEASE( ) - * $ARGUMENTS$ - * Es bien una cadena que contiene el nombre de la - * variable un array unidimensional de cadenas con - * nombres de variables. - * Los esqueletos comodines no estan permitidos. - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * Esta funcin libera valores almacenados en variable de memoria. Esta - * NO DEBE ser llamada directamente, sino que debe ser puesta dentro - * del comando RELEASE. - * Si la variable liberada es una variable PRIVATE entonces la variable - * previamente ocultada con el mismo nombre se vuelve visible despus - * de salir del procedimiento donde la variable liberada fu creada. - * Si Ud. accede la variable liberada en el mismo procedimiento/funcin - * donde esta fu creada el valor NIL es devuelto. Ud. puede sin embargo - * asignar un nuevo valor a la variable liberada sin ningn efecto - * colateral. - * - * Esto libera la variable, an si esta variable fue creada en un - * procedimiento diferente. - * $EXAMPLES$ - * - * PROCEDURE MAIN() - * PRIVATE mPrivate - * mPrivate :="PRIVATE from MAIN()" - * ? mPrivate //PRIVATE from MAIN() - * Test() - * ? mPrivate //PRIVATE from MAIN() - * RETURN - * - * - * PROCEDURE Test() - * PRIVATE mPrivate - * mPrivate :="PRIVATE from Test()" - * ? mPrivate //PRIVATE from TEST() - * RELEASE mPrivate - * ? mPrivate //NIL - * mPrivate :="Again in Test()" - * RETURN - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es una extensin de Harbour. - * $FILES$ - * La librera asociada es vm - * $SEEALSO$ - * __MVPRIVATE(),__MVPUBLIC() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * __MVRELEASE() - * $CATEGORY$ - * Variable Management - * $ONELINER$ - * Esta funcin libera variables PRIVATE - * $SYNTAX$ - * __MVRELEASE( , ) - * $ARGUMENTS$ - * Cadena que contiene la mscara comodn para los nombres - * de variables que sern liberadas. Los comodines - * soportados son: '*' y '?' - * - * Valor lgico que esecifica si las variables - * que coinciden con la mscara debieran ser borradas (.T.) - * excluidas del borrado si es .F. - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * Esta funcin libera valores almacenados en variable de memoria. Esta - * NO DEBE ser llamada directamente, sino que debe ser puesta dentro - * del comando RELEASE ALL. - * Si la variable liberada es una variable PRIVATE entonces la variable - * previamente ocultada con el mismo nombre se vuelve visible despus - * de salir del procedimiento donde la variable liberada fu creada. - * Si Ud. accede la variable liberada en el mismo procedimiento/funcin - * donde esta fu creada el valor NIL es devuelto. Ud. puede sin embargo - * asignar un nuevo valor a la variable liberada sin ningn efecto - * colateral. - * Variables PUBLIC no son cambiadas por esta funcin. - * $EXAMPLES$ - * Ninguno - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es una extensin de Harbour. - * $FILES$ - * La librera asociada es vm - * $SEEALSO$ - * __MVPRIVATE() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * __MVSCOPE() - * $CATEGORY$ - * Variable Management - * $ONELINER$ - * Si la variable existe, entonces retorna su alcance - * $SYNTAX$ - * __MVSCOPE( ) - * $ARGUMENTS$ - * Una cadena con el nombre de una variable a chequear - * $RETURNS$ - * Los valores simblicos son definidos en ../include/hbmemvar.ch - * - * - * Macro Significado - * - * HB_MV_NOT_FOUND La variable no est declarada (no fu encontrada - * en la tabla de smbolos) - * HB_MV_UNKNOWN Si la variable No existe (pero fu encontrada - * en la tabla de smbolos) - * HB_MV_ERROR Si la informacin No puede ser obtenida (error - * de memoria error de argumento). - * HB_MV_PUBLIC para variables pblicas - * HB_MV_PRIVATE_GLOBAL para variables private declaradas fuera del - * actual FUNCTION/PROCEDURE - * HB_MV_PRIVATE_LOCAL para variables private declaradas dentro del - * actual FUNCTION/PROCEDURE - *
- * - * $EXAMPLES$ - * - * PROCEDURE MAIN() - * PUBLIC mPublic - * PRIVATE mPrivateGlobal - * - * CallProc() - * ? __mvScope( "mPrivateLocal" ) // HB_MV_UNKNOWN - * RETURN - * - * - * PROCEDURE CallProc() - * PRIVATE mPrivateLocal - * - * ? __mvScope( "mPublic" ) // HB_MV_PUBLIC - * ? __mvScope( "mPrivateGlobal" ) // HB_MV_PRIVATE_GLOBAL - * ? __mvScope( "mPrivateLocal" ) // HB_MV_PRIVATE_LOCAL - * ? __mvScope( "mFindMe" ) // HB_MV_NOT_FOUND - * - * IF( __mvScope( "mPublic" ) > HB_MV_ERROR ) - * ? "la Variable existe" - * ELSE - * ? "la Variable no fu creada an" - * ENDIF - * - * RETURN - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es una extensin de Harbour. - * $FILES$ - * El archivo de cabecera es ../include/hbmemvar.ch - * La librera asociada es vm - * $SEEALSO$ - * __MVPRIVATE(),__MVPUBLIC() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * __MVCLEAR() - * $CATEGORY$ - * Variable Management - * $ONELINER$ - * Borra todas las variables PRIVATE y PUBLIC - * $SYNTAX$ - * __MVCLEAR() - * $ARGUMENTS$ - * Ninguno - * $RETURNS$ - * Nada - * $DESCRIPTION$ - * Esta funcin borra todas las variables PRIVATE y PUBLIC. - * Esta es usada para implementar la sentencia CLEAR MEMORY. - * La memoria ocupada por todas las variables es liberada. - * Cualquier intento de acceder a la variable resultar en un error - * de ejecucin. - * Ud tiene que reusar la sentencia PRIVATE PUBLIC para crear de nuevo - * la variable que fue borrada por esta funcin. - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es una extensin de Harbour. - * $FILES$ - * La librera asociada es vm - * $SEEALSO$ - * __MVPRIVATE(),__MVPUBLIC() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * __MVDBGINFO() - * $CATEGORY$ - * Variable Management - * $ONELINER$ - * Retorna informacin sobre las variables para el debugger - * $SYNTAX$ - * __MVDBGINFO( [, [, @] ] ) - * $ARGUMENTS$ - * El alcance de las variables sobre las que la informacin - * es solicitada. - * Valores Soportados (definidos en hbmemvar.ch): - * HB_MV_PUBLIC - * HB_MV_PRIVATE (or any other value) - * - * La posicin de la variable solicitada en la lista de - * variables con el alcance especificado. Esta deberia - * comenzar desde la posicin 1 - * - * El valor es llenado con un nombre de variable si es - * pasada por referencia y es especificada - * $RETURNS$ - * El valor retornado depende del nmero de parmetros pasados - * $DESCRIPTION$ - * Esta funcin obtiene informacin acerca de las variables memvar. - * Esta devuelve bien el nmerode variables con un alcance dado - * (Cuando el primer argumento es pasado solamente) un valor de - * variable identificada por su posicin en la la lista de variables - * (Cuando el segundo argumento es pasado). - * Esta tambin devuelve el nombre de la variable si el tercer argumento - * opcional es pasado por referencia. - * - * Si la variable solicitada no existe (la posicin solicitada es mayor - * que el nmero de variables definidas), entonces el valor NIL es - * devuelto y el nombre de la variable es puesto a "?" - * - * Como la tabla dinmica de smbolos es usada para encontrar una - * variable PUBLIC, las variables PUBLICas son siempre ordenadas - * alfabticamente. Las variables PRIVATE son ordenadas en el orden - * de su creacin. - * - * Nota: - * Debido a la naturaleza dinmica de las variables memvar no hay - * garanta que sucesivas llamadas para recuperar el valor de la - * variable PUBLIC retornar el valor de la misma variable. - * $EXAMPLES$ - * #include - * - * LOCAL nCount, i, xValue, cName - * - * nCount =_mvDBGINFO( HB_MV_PUBLIC ) - * - * FOR i:=1 TO nCount - * xValue =__mvDBGINFO( HB_MV_PUBLIC, i, @cName ) - * ? i, cName, xValue - * NEXT - * - * $TESTS$ - * #include - * PROCEDURE MAIN() - * - * ? 'PUBLIC=', __mvDBGINFO( HB_MV_PUBLIC ) - * ? 'PRIVATE=', __mvDBGINFO( HB_MV_PRIVATE ) - * - * PUBLIC cPublic:='cPublic in MAIN' - * - * ? 'PUBLIC=', __mvDBGINFO( HB_MV_PUBLIC ) - * ? 'PRIVATE=', __mvDBGINFO( HB_MV_PRIVATE ) - * - * PRIVATE cPrivate:='cPrivate in MAIN' - * - * ? 'PUBLIC=', __mvDBGINFO( HB_MV_PUBLIC ) - * ? 'PRIVATE=', __mvDBGINFO( HB_MV_PRIVATE ) - * - * CountMemvars() - * - * ? 'Back in Main' - * ? 'PUBLIC=', __mvDBGINFO( HB_MV_PUBLIC ) - * ? 'PRIVATE=', __mvDBGINFO( HB_MV_PRIVATE ) - * - * RETURN - * - * - * PROCEDURE CountMemvars() - * LOCAL i, nCnt, xVal, cName - * PUBLIC ccPublic:='ccPublic' - * PRIVATE ccPrivate:='ccPrivate' - * - * ? 'In CountMemvars' - * ? 'PUBLIC=', __mvDBGINFO( HB_MV_PUBLIC ) - * ? 'PRIVATE=', __mvDBGINFO( HB_MV_PRIVATE ) - * - * PRIVATE cPublic:='cPublic' - * - * ? 'PUBLIC=', __mvDBGINFO( HB_MV_PUBLIC ) - * ? 'PRIVATE=', __mvDBGINFO( HB_MV_PRIVATE ) - * - * nCnt =__mvDBGINFO( HB_MV_PRIVATE ) +1 - * - * FOR i :=1 TO nCnt - * xVal =__mvDBGINFO( HB_MV_PRIVATE, i, @cName ) - * ? i, '=', cName, xVal - * NEXT - * - * nCnt = __mvDBGINFO( HB_MV_PUBLIC ) + 1 - * - * FOR i :=1 TO nCnt - * xVal = __mvDBGINFO( HB_MV_PUBLIC, i, @cName ) - * ? i, '=', cName, xVal - * NEXT - * - * RETURN - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin debera ser llamada solamente desde el depurador. - * $FILES$ - * La librera asociada es vm - * $SEEALSO$ - * __MVSCOPE() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * __MVEXIST() - * $CATEGORY$ - * Variable Management - * $ONELINER$ - * Determina si un nombre dado es una variable PUBLIC PRIVATE - * $SYNTAX$ - * __MVEXIST( ) --> - * $ARGUMENTS$ - * Cadena con el nombre de la variable a chequear - * $RETURNS$ - * __MVEXIST() retorna TRUE (.T.) si una MEMVAR llamada - * existe actualmente. - * $DESCRIPTION$ - * Esta funcin determina si una variable PUBLIC PRIVATE con el - * nombre existe no. - * $EXAMPLES$ - * LOCAL TheLocal - * STATIC TheStatic - * PUBLIC ThePublic - * PRIVATE ThePrivate - * ? __MVEXIST( "NotExist" ) // .F. - * ? __MVEXIST( "TheLocal" ) // .F. - * ? __MVEXIST( "TheStatic" ) // .F. - * ? __MVEXIST( "ThePublic" ) // .T. - * ? __MVEXIST( "ThePrivate" ) // .T. - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es una extensin de Harbour. - * $FILES$ - * La librera asociada es vm - * $SEEALSO$ - * MEMVAR, PRIVATE, PUBLIC - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * __MVGET() - * $CATEGORY$ - * Variable Management - * $ONELINER$ - * Esta funcin retorna el valor de una variable de memoria (MEMVAR) - * $SYNTAX$ - * __MVGET( ) --> - * $ARGUMENTS$ - * Cadena con el nombre de la variable - * $RETURNS$ - * el valor de la variable - * $DESCRIPTION$ - * Esta funcin devuelve el valor de una variable de memoria PRIVATE - * PUBLIC si la variable existe, de otro modo genera un error en tiempo - * de ejecucin. - * La variable es especificada por su nombre pasado como parmetro a la - * funcin. - * $EXAMPLES$ - * FUNCTION MEMVARBLOCK( cMemvar ) - * RETURN {|x| IIF( PCOUNT()==0, __MVGET( cMemvar ),; - * __MVPUT( cMemvar, x ) ) } - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es una extensin de Harbour. - * $FILES$ - * La librera asociada es vm - * $SEEALSO$ - * __MVPUT() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * __MVPUT() - * $CATEGORY$ - * Variable Management - * $ONELINER$ - * Esta funcin establece el valor de una variable de memoria - * $SYNTAX$ - * __MVGET( [, ] ) --> - * $ARGUMENTS$ - * Cadena con el nombre de la variable - * - * Un valor de cualquier tipo que puede ser establecido - * Si no es especificado, entonces NIL es asumido. - * $RETURNS$ - * Un valor asignado a la variable dada. - * $DESCRIPTION$ - * Esta funcin establece el valor de una variable de memoria PRIVATE - * PUBLIC si la variable existe, de otro modo genera un error en tiempo - * de ejecucin. - * La variable es especificada por su nombre pasado como parmetro a la - * funcin. - * Si un valor no es especificado, entonces NIL es asumido. - * $EXAMPLES$ - * FUNCTION MEMVARBLOCK( cMemvar ) - * RETURN {|x| IIF( PCOUNT()==0, __MVGET( cMemvar ),; - * __MVPUT( cMemvar, x ) ) } - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es una extensin de Harbour. - * $FILES$ - * La librera asociada es vm - * $SEEALSO$ - * __MVPUT() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * MEMVARBLOCK() - * $CATEGORY$ - * Variable Management - * $ONELINER$ - * Retorna un codeblock que establece/obtiene el valor de variable - * $SYNTAX$ - * MEMVARBLOCK( ) --> - * $ARGUMENTS$ - * Cadena con el nombre de la variable - * $RETURNS$ - * un codeblock que establece/obtiene el valor de variable - * $DESCRIPTION$ - * Esta funcin devuelve un codeblock que establece/obtiene el valor de - * una variable PRIVATE PUBLIC. Cuando este codeblock es evaluado - * sin ningn parmetro pasado, entonces este devuelve el valor actual - * de la variable dada. - * Si el segundo parmetro es pasado para la evaluacin del codeblock - * entonces este valor es usado para establecer el nuevo valor de la - * variable dada, el valor pasado es tambin retornado como un valor - * la evaluacin del codeblock. - * $EXAMPLES$ - * PROCEDURE MAIN() - * LOCAL cbSetGet - * PUBLIC xPublic - * - * cbSetGet = MEMVARBLOCK( "xPublic" ) - * EVAL( cbSetGet, "nuevo valor" ) - * ? "Valor de la variable xPublic:", EVAL( cbSetGet ) - * - * RETURN - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Esta funcin es compatible con CA-Cl*pper - * $FILES$ - * La Librera es rtl - * $SEEALSO$ - * __MVGET(),__MVPUT() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * FIELDBLOCK() - * $CATEGORY$ - * Code Block - * $ONELINER$ - * Retorna un codeblock que establece/obtiene el valor de un campo - * $SYNTAX$ - * FIELDBLOCK( ) --> bFieldBlock - * $ARGUMENTS$ - * Es una cadena que contiene el nombre de un campo. - * $RETURNS$ - * FIELDBLOCK() retorna un codeblock que cuando es evaluado puede - * obtener el valor del campo asignar un nuevo valor al campo. - * Si no es especificado es de otro tipo distinto a - * CHARACTER, FIELDBLOCK() retorna NIL. - * $DESCRIPTION$ - * FIELDBLOCK() retorna un codeblock que establece/obtiene el valor de - * un campo. - * Cuando este campo es evaluado sin ningn parmetro pasado entonces - * este devuelve el valor actual del campo dado. - * Si el codeblock es evaluado con un parmetro, entonces su valor es - * usado para establecer un nuevo valor para el campo, este valor es - * tambin retornado por el bloque. - * Si el bloque es evaluado y no hay ningn campo con el nombre - * en el rea actual de trabajo el codeblock devuelve NIL. - * - * Note que FIELDBLOCK() trabaja en el rea actual de trabajo, si Ud. - * necesita usar un rea de trabajo distinta a la actual, use - * FIELDWBLOCK() en su lugar. - * $EXAMPLES$ - * // Abre un archivo llamado Test que tiene un campo llamado "name" - * LOCAL bField - * bFiled := FIELDBLOCK( "name" ) - * USE Test - * - * ? 'Valor Original del campo "name" :', EVAL( bField ) - * EVAL( bField, "Mr X new name" ) - * ? 'Nuevo valor para el campo "name" :', EVAL( bField ) - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Si el bloque es evaluado y no hay ningn campo con el nombre - * en el rea actual de trabajo, el codeblock devuelve NIL. - * - * CA-Cl*pper produce un error BASE/1003 si el campo no existe. - * $FILES$ - * La Librera es rtl - * $SEEALSO$ - * EVAL(),FIELDWBLOCK(),MEMVARBLOCK() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * FIELDWBLOCK() - * $CATEGORY$ - * Code Block - * $ONELINER$ - * Retorna un codeblock que setea/obtiene un campo en una rea dada - * $SYNTAX$ - * FIELDWBLOCK( , ) --> bFieldBlock - * $ARGUMENTS$ - * Es una cadena que contiene el nombre de un campo. - * - * Nmero de rea de trabajo en la cual existe - * - * $RETURNS$ - * FIELDWBLOCK() retorna un codeblock que cuando es evaluado puede - * obtener el valor del campo asignar un nuevo valor al campo en un - * rea de trabajo dada. - * Si no es especificado es de otro tipo distinto a - * CHARACTER, si no es especificada no es NUMERICa - * FIELDWBLOCK() retorna NIL. - * $DESCRIPTION$ - * FIELDWBLOCK() retorna un codeblock que establece/obtiene el valor de - * un campo para un rea de trabajo dada. - * Cuando este campo es evaluado sin ningn parmetro pasado entonces - * este devuelve el valor actual del campo dado. - * Si el codeblock es evaluado con un parmetro, entonces su valor es - * usado para establecer un nuevo valor para el campo, este valor es - * tambin retornado por el bloque. - * Si el bloque es evaluado y no hay ningn campo con el nombre - * en el rea de trabajo especificada, el codeblock - * devuelve NIL. - * $EXAMPLES$ - * LOCAL bField - * // Este bloque trabaja sobre campo "name" que existe en el area 2 - * bFiled := FIELDBLOCK( "name", 2 ) - * - * // Abre el archivo llamado One en el area 1, - * // que tiene un campo llamado "name" - * SELECT 1 - * USE One - * - * // Abre el archivo llamado Two en el area 2, - * // que tambien tiene un campo llamado "name" - * SELECT 2 - * USE Two - * SELECT 1 - * ? "Nombres Originales: ", One->name, Two->name - * ? "Nombre para el archivo dos:", EVAL( bField ) - * EVAL( bField, "Two tiene un nuevo nombre" ) - * ? "y ahora: ", One->name, Two->name - * - * $STATUS$ - * R - * $COMPLIANCE$ - * Si el bloque es evaluado y no hay ningn campo con el nombre - * en el rea de trabajo dada, el codeblock devuelve NIL. - * - * CA-Cl*pper produce un error BASE/1003 si el campo no existe. - * $FILES$ - * La Librera es rtl - * $SEEALSO$ - * EVAL(),FIELDBLOCK(),MEMVARBLOCK() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * TYPE() - * $CATEGORY$ - * Miscelanea - * $ONELINER$ - * Obtiene el tipo de una expresin - * $SYNTAX$ - * TYPE( ) --> - * $ARGUMENTS$ - * debe ser una expresin de caracteres - * $RETURNS$ - * Una cadena indicando el tipo de la expresin pasada. - * - * - * cRetType Significado - * - * "A" Array - * "B" Block - * "C" Cadena de Caracteres - * "D" Fecha (Date) - * "L" Lgico - * "M" Memo - * "N" Numerico - * "O" Objeto - * "U" Variable NIL, local, static, no enlazada en la funcin - * "UE" Error sintaxis en expression argumentos invalidos - * "UI" Funcion con nombre no-reservado fue solicitada - *
- * - * $DESCRIPTION$ - * Esta funcin devuelve una cadena que representa el tipo de datos del - * argumento. Esta puede ser cualquier expresin vlida de Harbour. - * - * Si hay un error de sintaxis en la expresin pasada entonces - * "UE" es devuelto. - * - * Si hay una llamada a alguna funcin de Harbour no-reservada entonces - * "UI" es devuelto (en otras palabras, no hay llamada a la funcin UDF - * durante la determinacin de tipo - este es un comportamiento - * compatible con Clipper). Adicionalmente si la funcin de usuario - * solicitada no es enlazada dentro del ejecutable final, entonces "U" - * es devuelto. - * - * El tipo de dato de esta expresin es chequeado al invocar al - * compilador de macros y por la evaluacin del cdigo generado (si es - * que no hay errores de sintaxis). - * Esto causa que TYPE() no pueda determinar un tipo de variable LOCAL - * STATIC, solamente smbolos visibles en tiempo de ejecucin pueden - * ser chequeados. - * - * Ntese la sutil diferencia entre las funciones TYPE y VALTYPE. - * La funcin VALTYPE() no llama al compilador de macros, esta - * simplemente chequea el tipo del argumento pasado, que puede ser de - * cualquier tipo. - * La funcin TYPE() requiere un argumento de cadena de caracteres con - * una expresin vlida de Harbour. El tipo de dato de esta expresin - * es retornado. - * $EXAMPLES$ - * ? TYPE( "{ 1, 2 }" ) // prints "A" - * ? TYPE( "IIF(.T., SUBSTR('TYPE',2,1), .F.)" ) // prints "C" - * ? TYPE( "AT( 'OK', MyUDF())>0" ) // prints "UI" - * ? TYPE( "{ 1, 2 }[ 5 ]" ) // prints "UE" - * - * //-------------------------------------------------------- - * - * LOCAL c - * PRIVATE a:="A", b:="B" - * ? TYPE( "a + b + c" ) //prints: "U" (variable 'C' es local) - * - * //-------------------------------------------------------- - * - * LOCAL cFilter := SPACE( 60 ) - * ACCEPT "Ingrese la expresin de filtro:" TO cFilter - * - * IF( TYPE( cFilter ) $ "CDLMN" ) ) - * // Esta es una expresin vlida - * SET FILTER TO &cFilter - * ENDIF - * - * $STATUS$ - * R - * $COMPLIANCE$ - * - * - Incompatibilidad con Clipper: - * En el cdigo siguiente: - * - * PRIVATE lCond := 0 - * ? TYPE( "IIF( lCond, 'true', MyUDF() )" ) - * - * Clipper imprimir "UE" - en Harbour la salida ser "UI" - * - * - Si "UI" es retornada entonces la sintaxis de la expresin es - * correcta. Sin embargo argumentos invlidos pueden ser pasados - * a una function/procedure que cause errores de ejecucin durante - * la evaluacin de la expresin. - * $FILES$ - * La Librera es rtl - * $SEEALSO$ - * VALTYPE() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * VALTYPE() - * $CATEGORY$ - * Miscelanea - * $ONELINER$ - * Obtiene el tipo de dato de una expresin - * $SYNTAX$ - * VALTYPE( ) --> - * $ARGUMENTS$ - * es cualquier expresin vlida - * $RETURNS$ - * una caracter indicando el tipo de la expresin pasada - * $DESCRIPTION$ - * Esta funcin devuelve un slo carcter el cual representa el tipo de - * dato del argumento recibido. - * $EXAMPLES$ - * Ver Test - * - * $TESTS$ - * FUNCTION Test() - * ? ValType( Array( 1 ) ) --> "A" - * ? ValType( {|| 1 + 1 } ) --> "B" - * ? ValType( "HARBOUR" ) --> "C" - * ? ValType( Date() ) --> "D" - * ? ValType( .T. ) --> "L" - * ? ValType( 1 ) --> "N" - * ? ValType( TBrowse() ) --> "O" - * ? ValType( NIL ) --> "U" - * RETURN NIL - * - * $STATUS$ - * R - * $COMPLIANCE$ - * VALTYPE() es totalmente compatible con CA-Cl*pper. - * $FILES$ - * La Librera es rtl - * $SEEALSO$ - * TYPE() - * $END$ - */ - -/* $DOC$ - * $FUNCNAME$ - * HB_ISBYREF() - * $CATEGORY$ - * Miscelanea - * $ONELINER$ - * Informa si la variable es pasada por referencia. - * $SYNTAX$ - * HB_ISBYREF( @ ) --> - * $ARGUMENTS$ - * @ es la variable a testear pasada por referencia. - * $RETURNS$ - * Un valor lgico indicando si la variable es pasada por - * referencia a la funcin procedimiento actual. - * $DESCRIPTION$ - * Esta funcin devuelve un valor lgico indicando si la variable es - * pasada por referencia a la funcin procedimiento actual. - * - * ATENCION: - * La variable a testear debe ser pasada por referencia. Si no lo es - * la funcin retorna NIL. - * Esta funcin esta basada en la forma que Harbour maneja las variables - * por referencia. Cuando una variable es pasada de este modo, la - * funcin procedimiento que la recibe, recibe un puntero a la - * variable previa, sea esta la variable contenedora de los datos, un - * puntero a otra variable. La funcin observa si la variable pasada - * apunta a una variable comn a la variable pasada por referencia. - * $EXAMPLES$ - * Ver Test - * $TESTS$ - * FUNCTION Main() - * local cVar := "Test local" - * private nVar := 0 - * - * Test( @cVar, @nVar, cVar, nVar ) - * RETURN NIL - * - * PROCEDURE Test( Arg1, Arg2, Arg3, Arg4 ) - * ? hb_isbyref( @Arg1 ) // .T. - * ? hb_isbyref( @Arg2 ) // .T. - * ? hb_isbyref( @Arg3 ) // .F. - * ? hb_isbyref( @Arg4 ) // .F. - * RETURN - * - * $STATUS$ - * S - * $COMPLIANCE$ - * Esta funcin es una extensin de Harbour. - * $FILES$ - * La Librera es rtl - * $SEEALSO$ - * VALTYPE() - * $END$ - */ - - diff --git a/harbour/examples/hbdoc/examples/es/vm.txt b/harbour/examples/hbdoc/examples/es/vm.txt deleted file mode 100644 index 4994a3824d..0000000000 --- a/harbour/examples/hbdoc/examples/es/vm.txt +++ /dev/null @@ -1,380 +0,0 @@ -/* - * $Id$ - */ - -/* - * Las siguientes partes son derechos adquiridos de sus autores individuales. - * www - http://www.harbour-project.org - * - * Copyright 2001 Antonio Linares - * Documentacin en Ingls de vm.txt - * - * Copyright 2001 Alejandro de Grate - * Traduccin al Espaol de vm.txt - * - * Vea COPYING por los trminos de la licencia. - * - */ - - -La Mquina Virtual de Harbour (Virtual Machine VM) -==================================================== - -La VM es un bucle de ejecucin infinita mientras se ejecute el programa. -La VM esta formada por el bucle principal de ejecucin y varios -subsistemas, cada uno de los cuales puede ser tericamente reemplazado, -suponiendo que Ud. respete la interfaz de cada subsistema. - -El bucle principal de ejecucin esta definido en una funcion de C -llamada VirtualMachine(), la cual recibe 2 parametros: la intrucciones -pcode para ejecutar y la tabla local de smbolos (una porcin de la -tabla de smbolos OBJs (estatica) ) usada para ese pcode. -Por favor revise hbpcode.h para la implementacion actual de los pcode -de los opcodes. - -VM( pcode, local symbols ) - -La VM puede invocar a la VM de nuevo (a s misma). Esto permite al -lenguaje Clipper acceder a funciones y metodos Clipper y funciones -externas en lenguaje C una vez y otra vez. La VM organiza estos -mltiples accesos en una forma ordenada y totalmente controlada e -implementa servicios para acceder a esos mltiples niveles de ejecucin -(ProcName(), ProcLine(), depuracin y acceso a las variables de la pila). - -Los subsistemas VM son continuamente usados por el bucle principal de -ejecucin. Vamos a revisar esos subsistemas VM. - - - El Arranque: - La Pila (stack): - La tabla esttica de smbolos: - La tabla dinmica de smbolos: - Variables estticas y pblicas: - La memoria: - El sistema extendido: - Arrays Multidimensionales: - El motor de Objetos: - El subsistema macro: - El subsistema de areas de trabajo: - - -El Arranque: -============ -Controla la inicializacin de los diferentes subsistemas de la VM, -esta es invocada al principio de la aplicacin. Esta tambin controla -la salida de la aplicacin. - - - -La Pila (stack): -================ -La VM No usa la pila de la computadora directamente, esta usa en su -lugar su propia pila para manipular valores (parametros, valores -retornados y smbolos) como lo hace la pila de hardware. - - -La tabla esttica de smbolos: -============================= -Es creada por el compilador en tiempo de compilacin y agrupada por -el enlazador (linker) en los OBJs, Este subsistema es responsable por -un inmediato acceso a la ubicacin de las funciones y est altamente -relacionada a la tabla dinmica de smbolos en tiempo de ejecucin. -Esta tabla contiene muchos smbolos duplicados que sern optimizados -por la tabla dinmica de smbolos. - - -La tabla dinmica de smbolos: -============================== -Es dinmicamente generada desde el subsistema de inicio al principio -de la aplicacin. Esta organiza en una forma eficiente la tabla -esttica de smbolos creando un ndice alfabetico que permite, una -bsqueda dicotomica de los smbolos. Este subsistema es responsable -por el rpido acceso a los smbolos (funciones, variables, campos y -alias de las reas de trabajo). - - -Variables estticas y pblicas: -=============================== -Responsable por el almacenamiento de variables pblicas y estticas. - - -La memoria: -=========== -Responsable por la ubicacin, reubicacin, bloqueo, desbloqueo y -liberacin de memoria. - - -El sistema extendido: -===================== -Define la interfaz (_parc(), ..., _retc() ) desde un bajo nivel -(lenguaje C) hasta un alto nivel (lenguaje Clipper). Este subsistema -es responsable por conectar en una forma adecuada las funciones en -lenguaje C a la aplicacin entera. - - -Arrays Multidimensionales: -========================== -Este subsistema permite la creacin de arrays, y los servicios para -manipular estos en todas sus formas. Los arrays son extensivamente -usados por el lenguaje Clipper y tambin ellos son la fundacin de -los Objetos (los Objetos son slo arrays referidos a una Clase -especfica). - - -El motor de Objetos: -==================== -Responsable por la creacin de Clases y Objetos. Este tambin define -la forma de acceso a un mtodo especfico de clase para ser invocados -por la VM y provee todo tipo de informacin de clases que pueden ser -requeridos al tiempo de la ejecucin. - - -El subsistema macro: -==================== -Este implementa un compilador reducido que puede ser usado en tiempo -de ejecucin para generar pcodes para ser usados por la aplicacin. -En efecto esta es una parte de la especificaciones de yacc (Bison) -para Harbour. - - -El subsistema de reas de trabajo: -================================== -Responsable por el manejo de las bases de datos. Este subsistema -define la ubicacin donde las areas de trabajos sern almacenadas -y provee todas las funciones de acceso a esas areas de trabajo. -Este tambin implementa la interfaz para el controlador de base de -datos reemplazable. - -Pregunta: - - Los opcodes de Harbour imitarn a los de Clipper ? (habr una -relacin 1:1 entre ellos) Si es as, estn los opcodes de Clipper -descriptos en algn lado ?. - -Respuesta: - Lenguaje Clipper pcode de opcodes - DEFINE NOMBRE VALOR BYTES - #define NOP 0x00 1 - #define PUSHC 0x01 3 + literal - #define PUSHN 0x05 3 - #define POPF 0x06 3 - #define POPM 0x07 3 - #define POPQF 0x08 3 - #define PUSHA 0x09 3 - #define PUSHF 0x0A 3 - #define PUSHM 0x0B 3 - #define PUSHMR 0x0C 3 - #define PUSHP 0x0D 3 - #define PUSHQF 0x0E 3 - #define PUSHV 0x0F 3 - #define SFRAME 0x10 3 - #define SINIT 0x11 3 - #define SYMBOL 0x12 3 - #define SYMF 0x13 3 - #define BEGIN_SEQ 0x19 3 - #define JDBG 0x1A 3 - #define JF 0x1B 3 - #define JFPT 0x1C 3 - #define JISW 0x1D 3 - #define JMP 0x1E 3 - #define JNEI 0x1F 3 - #define JT 0x20 3 - #define JTPF 0x21 3 - #define PUSHBL 0x23 3 - #define ARRAYATI 0x24 3 - #define ARRAYPUTI 0x25 3 - #define CALL 0x26 3 - #define DO 0x27 3 - #define FRAME 0x28 3 - #define FUNC 0x29 3 - #define LINE 0x2A 3 - #define MAKEA 0x2B 3 - #define MAKELA 0x2C 3 - #define PARAMS 0x2D 3 - #define POPFL 0x2E 3 - #define POPL 0x2F 3 - #define POPS 0x30 3 - #define PRIVATES 0x31 3 - #define PUBLICS 0x33 3 - #define PUSHFL 0x34 3 - #define PUSHFLR 0x35 3 - #define PUSHI 0x36 3 - #define PUSHL 0x37 3 - #define PUSHLR 0x38 3 - #define PUSHS 0x39 3 - #define PUSHSR 0x3A 3 - #define PUSHW 0x3B 3 - #define SEND 0x3C 3 - #define XBLOCK 0x3D 3 - #define MPOPF 0x4A 5 - #define MPOPM 0x4B 5 - #define MPOPQF 0x4C 5 - #define MPUSHA 0x4D 5 - #define MPUSHF 0x4E 5 - #define MPUSHM 0x4F 5 - #define MPUSHMR 0x50 5 - #define MPUSHP 0x51 5 - #define MPUSHQF 0x52 5 - #define MPUSHV 0x53 5 - #define MSYMBOL 0x54 5 - #define MSYMF 0x55 5 - #define ABS 0x56 1 - #define AND 0x57 1 - #define ARRAYAT 0x58 1 - #define ARRAYPUT 0x59 1 - #define BREAK 0x5A 1 - #define DEC 0x5B 1 - #define DIVIDE 0x5C 1 - #define DOOP 0x5D 1 - #define EEQ 0x5E 1 - #define ENDBLOCK 0x5F 1 - #define ENDPROC 0x60 1 - #define END_SEQ 0x61 1 - #define EQ 0x62 1 - #define EVENTS 0x63 1 - #define FALSE 0x64 1 - #define GE 0x65 1 - #define GT 0x66 1 - #define INC 0x67 1 - #define LE 0x68 1 - #define LT 0x69 1 - #define MINUS 0x6A 1 - #define MULT 0x6B 1 - #define NE 0x6C 1 - #define NEGATE 0x6E 1 - #define NOP2 0x6F 1 - #define NOT 0x70 1 - #define NULL 0x71 1 - #define ONE1 0x72 1 - #define OR 0x73 1 - #define PCOUNT 0x74 1 - #define PLUS 0x75 1 - #define POP 0x76 1 - #define PUSHRV 0x77 1 - #define QSELF 0x78 1 - #define SAVE_RET 0x79 1 - #define TRUE 0x7A 1 - #define UNDEF 0x7B 1 - #define ZER0 0x7C 1 - #define ZZBLOCK 0x7D 1 - #define AXPRIN 0x7E 1 - #define AXPROUT 0x7F 1 - #define BOF 0x80 1 - #define DELETED 0x81 1 - #define EOF 0x82 1 - #define FCOUNT 0x83 1 - #define FIELDNAME 0x84 1 - #define FLOCK 0x85 1 - #define FOUND 0x86 1 - #define FSELECT0 0x87 1 - #define FSELECT1 0x88 1 - #define LASTREC 0x89 1 - #define LOCK 0x8A 1 - #define RECNO 0x8B 1 - #define BNAMES 0x8C 1 - #define LNAMES 0x8D 1 - #define SNAMES 0x8E 1 - #define SRCNAME 0x8F 1 - #define TYPE 0x90 1 - #define WAVE 0x91 1 - #define WAVEA 0x92 1 - #define WAVEF 0x93 1 - #define WAVEL 0x94 1 - #define WAVEP 0x95 1 - #define WAVEPOP 0x96 1 - #define WAVEPOPF 0x97 1 - #define WAVEPOPQ 0x98 1 - #define WAVEQ 0x99 1 - #define WSYMBOL 0x9A 1 - #define AADD 0x9B 1 - #define ASC 0x9C 1 - #define AT 0x9D 1 - #define CDOW 0x9E 1 - #define CHR 0x9F 1 - #define CMONTH 0xA0 1 - #define CTOD 0xA1 1 - #define DATE 0xA2 1 - #define DAY 0xA3 1 - #define DOW 0xA4 1 - #define DTOC 0xA5 1 - #define DTOS 0xA6 1 - #define EMPTY 0xA7 1 - #define QEXP 0xA8 1 - #define EXPON 0xA9 1 - #define INSTR 0xAA 1 - #define INT 0xAB 1 - #define LEFT 0xAC 1 - #define LEN 0xAD 1 - #define LOGQ 0xAE 1 - #define LOWER 0xAF 1 - #define LTRIM 0xB0 1 - #define MAX 0xB1 1 - #define MIN 0xB2 1 - #define MODULUS 0xB3 1 - #define MONTH 0xB4 1 - #define REPLICATE 0xB5 1 - #define ROUND 0xB6 1 - #define SECONDS 0xB7 1 - #define SPACE 0xB8 1 - #define QSQRT 0xB9 1 - #define STR1 0xBA 1 - #define STR2 0xBB 1 - #define STR3 0xBC 1 - #define SUB2 0xBD 1 - #define SUB3 0xBE 1 - #define TIME 0xBF 1 - #define TRIM 0xC0 1 - #define UPPER 0xC1 1 - #define VAL 0xC2 1 - #define VALTYPE 0xC3 1 - #define WORD 0xC4 1 - #define YEAR 0xC5 1 - #define TRANS 0xC6 1 - #define COL 0xC7 1 - #define DEVPOS 0xC8 1 - #define INKEY0 0xC9 1 - #define INKEY1 0xCA 1 - #define PCOL 0xCB 1 - #define PROW 0xCC 1 - #define ROW 0xCD 1 - #define SETPOS 0xCE 1 - #define SETPOSBS 0xCF 1 - -Harbour no implementar todos ellos porque nosotros queremos proveer -la mayor libertad a los programadores para extender y modificar -Harbour tanto como se necesite. Por ejemplo: -El lenguaje Clipper usa opcodes para Row(), Col(), Upper(), Space(), -Replicate(), InKey(), Year(), Month(), etc... donde nosotros slo -queremos llamar a una funcin estandar de lenguaje C, que use el -sistema extendido estndar y que pueda ser facilmente modificada. -As Harbour usar muchos menos opcodes que el lenguaje Clippper. -Esto ayudar a tener un compilador y una VM ms simple y fcil de -mantener. - -Pregunta: - - He visto que, por ejemplo Clipper tiene un opcode llamado -"PUSHWORD" (06), mientras Valkyirie lo llama "PUSHW"(3B): -Diferentes nombres, diferentes cdigos. No es deseable que el pCode -de Harbour sea binario-compatible con Clipper ?. Si fuera as la VM -de Harbour podra interpretar cdigo de Clipper y viceversa. - -Respuesta: - -Los opcodes de Harbour estan definidos en hbpcode.h -Nosotros estamos tratando que los mnemnicos sean muy fciles de -usar, as PUSHWORD parece mas fcil que PUSHW. Los valores de los -opcodes son de poco valor porque ellos son solo usados por una -sentencia switch del lenguaje C (en realidad hay una poderosa -optimizacin la cual es: usar el mismo pcode de los opcodes como un -ndice al array de punteros de las funciones de la VM, as la -velocidad de ejecucin de la VM puede incrementarse). -Clipper usa esto. - -Nosotros no estamos implementando totalmente el modelo de OBJs del -lenguaje Clipper (por ej. para proveer identificadores de nombre -de longitud mayor a 10 caracteres) as los OBJ de Harbour no sern -soportados por Clipper y viceversa. - - - diff --git a/harbour/harbour.spec b/harbour/harbour.spec index b6168d5b75..77e2766dfd 100644 --- a/harbour/harbour.spec +++ b/harbour/harbour.spec @@ -559,7 +559,7 @@ rm -rf $RPM_BUILD_ROOT %doc ChangeLog* %doc doc/*.txt %doc doc/%{readme} -%doc doc/en-EN/ +%doc doc/en/ %dir %{hb_etcdir} %verify(not md5 mtime) %config %{hb_etcdir}/hb-charmap.def