* make_deb.sh
* Removed wrong comment recently added.
(we will need to fix hbfimage compilation anyway)
* harbour-ce-spec
* harbour-w32-spec
* harbour.spec
* debian/control
* include/vm.api
* include/extend.api
* include/button.ch
* include/hbstack.h
* include/item.api
* include/rdd.api
* include/gt.api
* include/dbinfo.ch
* include/error.api
* include/filesys.api
* include/hbapigt.h
* include/clipdefs.h
* include/assert.ch
* include/fm.api
* include/extend.h
* source/compiler/genhrb.c
* config/os2/install.cf
* tests/db_brows.prg
* tests/debugtst.prg
* tests/ac_test.prg
* tests/testhtml.prg
* tests/tstcolor.prg
* doc/hdr_tpl.txt
* doc/man/harbour.1
* doc/dirstruc.txt
* doc/howtobld.txt
* doc/en/diskspac.txt
* doc/en/string.txt
* doc/en/rddord.txt
* doc/en/math.txt
* doc/en/error.txt
* doc/en/treport.txt
* doc/en/memvar2.txt
* doc/en/terminal.txt
* doc/en/dir.txt
* doc/en/rddmisc.txt
* doc/en/var.txt
* doc/en/nation.txt
* doc/en/dbstrux.txt
* doc/en/datetime.txt
* doc/en/memo.txt
* doc/en/tgetlist.txt
* doc/en/tlabel.txt
* doc/en/hb_compa.txt
* doc/en/array.txt
* doc/en/rdddb.txt
* doc/en/dbsdf.txt
* doc/en/tbrowse.txt
* doc/en/hvm.txt
* doc/en/input.txt
* doc/en/dbdelim.txt
* doc/en/browse.txt
* doc/en/menu.txt
* doc/en/file.txt
* doc/en/binnum.txt
* doc/en/tclass.txt
* doc/en/set.txt
* doc/en/misc.txt
* doc/en/sayget.txt
* doc/en/readme.txt
* doc/es/diskspac.txt
* doc/es/tlabel.txt
* doc/es/array.txt
* doc/es/dbsdf.txt
* doc/es/tbrowse.txt
* doc/es/math.txt
* doc/es/hvm.txt
* doc/es/treport.txt
* doc/es/input.txt
* doc/es/dbdelim.txt
* doc/es/browse.txt
* doc/es/memvar2.txt
* doc/es/command.txt
* doc/es/dir.txt
* doc/es/file.txt
* doc/es/eval.txt
* doc/es/binnum.txt
* doc/es/nation.txt
* doc/es/var.txt
* doc/es/tclass.txt
* doc/es/dbstrux.txt
* doc/es/misc.txt
* doc/es/datetime.txt
* doc/es/sayget.txt
* doc/es/memo.txt
* doc/es/readme.txt
* doc/es/tgetlist.txt
* doc/readme.txt
* contrib/hbct/ctnet.c
* contrib/hbct/video.c
* contrib/hbct/dattime3.c
* contrib/hbct/color.c
* contrib/hbnf/acctyear.prg
* contrib/hbnf/byteneg.prg
* contrib/hbnf/isshare.prg
* contrib/hbnf/sinkey.prg
* contrib/hbnf/dhkey.h
* contrib/hbnf/kspeed.c
* contrib/hbnf/prtscr.c
* contrib/hbnf/descendn.c
* contrib/hbnf/peek.c
* contrib/hbnf/scancode.prg
* contrib/hbnf/vidmode.prg
* contrib/hbnf/nwsem.prg
* contrib/hbnf/acctadj.prg
* contrib/hbnf/week.prg
* contrib/hbnf/vidcur.prg
* contrib/hbnf/iamidle.c
* contrib/hbnf/prtesc.prg
* contrib/hbnf/miltime.prg
* contrib/hbnf/proper.c
* contrib/hbnf/acctmnth.prg
* contrib/hbnf/savearr.prg
* contrib/hbnf/rand1.prg
* contrib/hbnf/madd.prg
* contrib/hbnf/dispmsg.prg
* contrib/hbnf/settime.prg
* contrib/hbnf/restsets.prg
* contrib/hbnf/page.prg
* contrib/hbnf/byt2bit.prg
* contrib/hbnf/setkeys.c
* contrib/hbnf/month.prg
* contrib/hbnf/byt2hex.prg
* contrib/hbnf/findith.prg
* contrib/hbnf/at2.prg
* contrib/hbnf/acctweek.prg
* contrib/hbnf/dispc.c
* contrib/hbnf/gcd.prg
* contrib/hbnf/pegs.prg
* contrib/hbnf/min2dhm.prg
* contrib/hbnf/acctqtr.prg
* contrib/hbnf/numlock.c
* contrib/hbnf/dosver.prg
* contrib/hbnf/nooccur.prg
* contrib/hbnf/dayofyr.prg
* contrib/hbnf/metaph.prg
* contrib/hbnf/ontick.c
* contrib/hbnf/menu1.prg
* contrib/hbnf/byteand.prg
* contrib/hbnf/sqzn.prg
* contrib/hbnf/bytexor.prg
* contrib/hbnf/ftidle.c
* contrib/hbnf/workdays.prg
* contrib/hbnf/byteor.prg
* contrib/hbnf/asum.prg
* contrib/hbnf/shift.c
* contrib/hbnf/sleep.prg
* contrib/hbnf/wda.prg
* contrib/hbnf/aavg.prg
* contrib/hbnf/woy.prg
* contrib/hbnf/origin.c
* contrib/hbnf/any2any.prg
* contrib/hbnf/chdir.c
* contrib/hbnf/adessort.prg
* contrib/hbnf/setdate.prg
* contrib/hbnf/netpv.prg
* contrib/hbnf/amedian.prg
* contrib/hbnf/blink.prg
* contrib/hbnf/stod.c
* contrib/hbnf/vertmenu.prg
* contrib/hbnf/qtr.prg
* contrib/hbnf/linked.prg
* contrib/hbnf/n2color.c
* contrib/hbnf/aredit.prg
* contrib/hbnf/alt.c
* contrib/hbnf/xbox.prg
* contrib/hbnf/ftround.prg
* contrib/hbnf/hex2dec.prg
* contrib/hbnf/nwuid.prg
* contrib/hbnf/dectobin.prg
* contrib/hbnf/bitset.prg
* contrib/hbnf/aemaxlen.prg
* contrib/hbnf/nwlstat.prg
* contrib/hbnf/invclr.prg
* contrib/hbnf/ctrl.c
* contrib/hbnf/lastday.prg
* contrib/hbnf/tempfile.prg
* contrib/hbnf/diskfunc.prg
* contrib/hbnf/scregion.prg
* contrib/hbnf/mouse2.prg
* contrib/hbnf/d2e.prg
* contrib/hbnf/ftisprn.c
* contrib/hbnf/pickday.prg
* contrib/hbnf/firstday.prg
* contrib/hbnf/daytobow.prg
* contrib/hbnf/anomatch.prg
* contrib/hbnf/pvid.prg
* contrib/hbnf/isbiton.prg
* contrib/hbnf/color2n.c
* contrib/hbnf/isbit.prg
* contrib/hbnf/putkey.c
* contrib/hbnf/cntryset.prg
* contrib/hbnf/datecnfg.prg
* contrib/hbnf/getenvrn.c
* contrib/hbnf/easter.prg
* contrib/hbnf/bytenot.prg
* contrib/hbnf/ntow.prg
* contrib/hbnf/poke.c
* contrib/hbnf/aeminlen.prg
* contrib/hbnf/floptst.prg
* contrib/hbnf/pchr.prg
* contrib/hbnf/savesets.prg
* contrib/hbnf/mkdir.c
* contrib/hbnf/year.prg
* contrib/hbnf/caplock.c
* contrib/hbnf/rmdir.c
* contrib/hbnf/calendar.prg
* contrib/hbnf/e2d.prg
* contrib/hbnf/elapsed.prg
* contrib/hbnf/sysmem.prg
* contrib/hbnf/bitclr.prg
* contrib/hbnf/eltime.prg
* contrib/hbnf/aading.prg
* contrib/hbnf/dfile.prg
* contrib/hbnf/elapmil.prg
* contrib/hbnf/setlastk.c
* contrib/hbnf/pending.prg
* contrib/hbnf/clrsel.prg
* contrib/rddads/doc/en/adsfuncs.txt
* contrib/rddads/doc/en/readme.txt
* contrib/hbclip/hbclip.ch
* contrib/hbclip/readme.txt
* contrib/hbmisc/doc/en/ht_dbf.txt
* utils/hbdoc/rtf.prg
* utils/hbdoc/fclass1.prg
* utils/hbdoc/genos2.prg
* utils/hbdoc/genng.prg
* utils/hbdoc/genasc.prg
* utils/hbdoc/genchm.prg
* utils/hbdoc/os2.prg
* utils/hbdoc/ng.prg
* utils/hbdoc/genhpc.prg
* utils/hbdoc/html.prg
* utils/hbdoc/ffile1.prg
* utils/hbdoc/ft_funcs.prg
* utils/hbdoc/hbdoc.prg
* utils/hbdoc/troff.prg
* utils/hbdoc/genhtm.prg
* utils/hbdoc/genpdf1.prg
* utils/hbdoc/gentrf.prg
* utils/hbdoc/genrtf.prg
* utils/hbmake/fclass1.prg
* utils/hbmake/prb_stak.prg
* utils/hbmake/ffile1.prg
* utils/hbmake/ft_funcs.prg
* utils/hbmake/pickfile.prg
* utils/hbmake/hbmutils.prg
* More cleanups, formatting (filename casing, CA-Cl*pper, etc).
254 lines
8.7 KiB
Plaintext
254 lines
8.7 KiB
Plaintext
/*
|
||
* $Id$
|
||
*/
|
||
|
||
/*
|
||
* Las siguientes partes son derechos adquiridos de sus autores individuales.
|
||
* www - http://www.harbour-project.org
|
||
*
|
||
* Copyright 2000-2003 Alejandro de G rate <alex_degarate@hotmail.com>
|
||
* Documentaci¢n en Espa¤ol de: MEMOTRAN(), HARDCR()
|
||
* MEMOREAD(), MEMOWRIT()
|
||
*
|
||
* Vea doc/license.txt por los t‚rminos de la licencia.
|
||
*
|
||
*/
|
||
|
||
/* $DOC$
|
||
* $FUNCNAME$
|
||
* MEMOTRAN()
|
||
* $CATEGORY$
|
||
* Cadenas
|
||
* $ONELINER$
|
||
* Reemplaza los retornos del carro/nueva linea de una cadena
|
||
* $SYNTAX$
|
||
* MEMOTRAN( <cCadena>, <cDuro>, <cBlando> ) --> <cCadenaConvertida>
|
||
* $ARGUMENTS$
|
||
* <cCadena> es la cadena de caracteres a convertir.
|
||
*
|
||
* <cDuro> es el car cter para reemplazar los retornos de carro "duro".
|
||
* Si no es especificado por defecto es el punto y coma.
|
||
*
|
||
* <cBlando> es el c racter para reemplazar los retornos de carro
|
||
* "blandos". Si no es especificado, por defecto es un espacio
|
||
* en blanco.
|
||
* $RETURNS$
|
||
* MEMOTRAN() retorna <cCadenaConvertida>, la cadena transformada.
|
||
* $DESCRIPTION$
|
||
* Esta funci¢n 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 funci¢n
|
||
* ALERT()
|
||
*
|
||
* cMensaje = MEMOTRAN( Errores->MENSAJE )
|
||
* ALERT( cMensaje, aOpciones )
|
||
* $STATUS$
|
||
* R
|
||
* $COMPLIANCE$
|
||
* Esta funci¢n es totalmente compatible con CA-Cl*pper.
|
||
* $PLATFORMS$
|
||
* Todas
|
||
* $FILES$
|
||
* La librer¡a 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( <cCadena> ) --> <cCadenaConvertida>
|
||
* $ARGUMENTS$
|
||
* <cCadena> es la cadena de caracteres a convertir.
|
||
* $RETURNS$
|
||
* HARDCR() retorna <cCadenaConvertida>, la cadena transformada.
|
||
* $DESCRIPTION$
|
||
* Esta funci¢n 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 funci¢n es totalmente compatible con CA-Cl*pper.
|
||
* $PLATFORMS$
|
||
* Todas
|
||
* $FILES$
|
||
* La librer¡a 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( <cArchivo> ) --> <cCadena>
|
||
* $ARGUMENTS$
|
||
* <cArchivo> Nombre del archivo a leer. Debe incluir la extensi¢n.
|
||
* 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 <cCadena>.
|
||
* El tama¤o m ximo del archivo, que puede ser le¡do, es el mismo que
|
||
* el tama¤o m ximo de una cadena de caracteres (m s de 2 Mb). Harbour
|
||
* no tiene el l¡mite de 64 Kb como en Clipper.
|
||
* Si <cArchivo> no puede ser encontrado o le¡do, la funci¢n retorna
|
||
* una cadena de caracteres, vacia ("").
|
||
* $DESCRIPTION$
|
||
* MEMOREAD() es una funci¢n 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 funci¢n MEMOREAD() es usada junto con MEMOWRIT() y MEMOEDIT()
|
||
* para obtener de disco, texto de diferentes fuentes y que podr¡a ser
|
||
* objeto de edici¢n, b£squeda, reemplazo, visualizaci¢n, 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
|
||
* <cArchivo>.
|
||
* Esta funci¢n busca por <cArchivo> 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
|
||
* <cArchivo> en modo de s¢lo-lectura y compartido. Si el archivo es
|
||
* usado en modo exclusivo (no compartido) por otro proceso o programa
|
||
* la funci¢n devolver una cadena vacia ("").
|
||
*
|
||
* Es una de las funciones de Clipper m s £til, realmente lo hace f cil.
|
||
* $EXAMPLES$
|
||
* * Este ejemplo usa MEMOREAD() para asignar el contenido de un
|
||
* archivo de texto a una variable para una b£squeda 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 funci¢n es totalmente compatible con CA-Cl*pper.
|
||
* $PLATFORMS$
|
||
* Todas
|
||
* $FILES$
|
||
* La librer¡a 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( <cArchivo>, <cCadena>, [<lEscribeEOF>] ) --> lExito
|
||
* $ARGUMENTS$
|
||
* <cArchivo> Nombre del archivo a leer. Debe incluir la extensi¢n.
|
||
* Si el archivo se encuentra en otro subdirectorio, se
|
||
* debe incluir el path.
|
||
*
|
||
* <cCadena> Es un campo memo o una cadena de caracteres, a ser
|
||
* escrita en <cArchivo>.
|
||
*
|
||
* <lEscribeEOF> Es una variable l¢gica que determina si el car cter
|
||
* de fin de archivo - CHR(26) - se escribe a disco.
|
||
* Este par metro es opcional. Su valor por defecto es
|
||
* verdadero (.T.)
|
||
* $RETURNS$
|
||
* La funci¢n devuelve verdadero (.T.) si la operacion de escritura fue
|
||
* exitosa, de otro modo, ‚sta devuelve falso (.F.).
|
||
* $DESCRIPTION$
|
||
* Esta es una funci¢n 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 <cArchivo> en el
|
||
* directorio actual. Si <cArchivo> existe ‚ste ser sobreescrito.
|
||
*
|
||
* Nota:
|
||
* Existe un tercer par metro opcional <lEscribeEOF> (que est ausente
|
||
* en Clipper), el cual le permite al programador cambiar en tiempo de
|
||
* ejecuci¢n el comportamiento (por defecto) de escribir - siempre -
|
||
* el car cter 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 <lEscribeEOF> es puesto en .T.
|
||
* Pero, si <lEscribeEOF> es puesto en .F., el car cter EOF no es
|
||
* escrito al final del archivo.
|
||
*
|
||
* La funci¢n MEMOWRIT() es usada junto con MEMOREAD() y MEMOEDIT() para
|
||
* grabar a disco texto de diferentes fuentes y que pudo haber sido
|
||
* objeto de edici¢n, b£squeda, reemplazo, visualizaci¢n, etc.
|
||
*
|
||
* Esta funci¢n 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 m s £til, realmente lo hace f cil.
|
||
* $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 funci¢n es totalmente compatible con CA-Cl*pper.
|
||
* $PLATFORMS$
|
||
* Todas
|
||
* $FILES$
|
||
* La librer¡a asociada es rtl
|
||
* $SEEALSO$
|
||
* MEMOEDIT(),MEMOREAD()
|
||
* $END$
|
||
*/
|
||
|
||
|
||
|
||
|