Funcion CAPTA y EDITA sobre harbour 3.44

[nelido]

Las funciones CAPTA y EDITA permiten automatizar los procesos de entrada de datos y la impresión de informes respectivamente de cualquier aplicación sobre tablas xbases (.dbf), dejándonos más tiempo para elaborar un adecuado diseño de la estructura de ficheros del sistema.

DOCUMENTACIÓN DE LAS FUNCIONES CAPTA Y EDITA

FUNCTION CAPTA

DESARROLLADOR: NELIDO O. SANCHEZ ALVAREZ, INFORMATICO SANTA CLARA-CUBA

OBJETIVO: ESTA FUNCION PERMITE RELACIONAR LAS DIFERENTES TABLAS XBASES (.dbf)
QUE INTERVIENEN EN EL PROCESO DE CAPTACION Y VALIDACION DE DATOS
DE CUALQUIER APLICACION, FACILITANDO EL USO DEL MOUSE PARA EL
DESPLAZAMIENTO EN LA PANTALLA Y LA EXPORTACION EN FORMATO EXCEL
DE LA INFORMACION CAPTADA.

EL PROGRAMADOR SOLO NECESITA DISEÑAR LA TABLA XBASE PRINCIPAL Y LAS
AUXILIARES. EL PROCESO DE CAPTACION DE DATOS SE LOGRA DE FORMA
AUTOMATICA HACIENDO UNA LLAMADA DESDE SU APLICACION A ESTA FUNCION
PASANDOLE LOS PARAMETROS SEGUN SEAN LAS TABLAS XBASES QUE SE
CREARON PARA CADA OPCION DEL MENU DE ENTRADA DE DATOS DEL SISTEMA.

EL PROGRAMADOR TAMBIEN PUEDE DEFINIR FUNCIONES Y PROCEDIMIENTOS
PARA LA VALIDACION ESPECIFICA DE LOS DATOS DE SU APLICACION
PASANDOLOS COMO PARAMETROS A LA FUNCION CAPTA.

LA FUNCION REALIZA UNA COMPROBACION DE COMPATIBILIDAD DE TIPOS
ENTRE LOS CAMPOS DE LA TABLA XBASE PRINCIPAL Y LAS AUXILIARES.

- Ver ejemplo del uso de esta función en la aplicación Metros.prg

- Ver el Metrosc.bat que compila y enlaza la aplicación Metros.prg con
Captura.o (.obj) que contiene dichas funciones.


LLAMADA:

CAPTA (<ExpN1>,<ExpB1>,<ExpC1>[,<Arr1>[,<Arr2>[,<ExpC2>[,<ExpN2>[,<ExpN3>
[,<ExpC3>[,<ExpN4>[,<ExpC4>[,<Arr3>[,<Arr4>[,<ExpB2>]]]]]]]]]]]]])

DONDE:

<ExpN1> CANTIDAD DE CAMPOS INDICES (MAXIMO 10).
<ExpB1> EXPRESION BOOLEANA PARA FIJAR O NO ULTIMO CAMPO INDICE.
<ExpC1> NOMBRE (SIN EXTENSION) DE LA TABLA XBASE (.dbf) PRINCIPAL A CAPTAR.
<Arr1> ARREGLO CON LOS TITULOS DESEADOS PARA CADA CAMPO DE LA TABLA XBASE
PRINCIPAL A CAPTAR.
<Arr2> ARREGLO CON LOS NOMBRES DE LAS TABLAS XBASES AUXILARES PARA CADA
CAMPO INDICE DE LA TABLA XBASE PRINCIPAL A CAPTAR.
<ExpC2> CADENA CON EL NOMBRE DE UNA FUNCION DEFINIDA POR EL USUARIO (SIN
ESPECIFICAR PARENTESIS O ARGUMENTOS). ESTA FUNCION SERA EMPLEADA
POR CAPTA PARA VALIDAR CUALQUIER CAMPO DE LA TABLA XBASE PRINCIPAL
DE LA ENTRADA DE DATOS.
<ExpN2> FILA DE PANTALLA DONDE APARECERA <ExpC3>.
<ExpN3> COLUMNA DE PANTALLA DONDE APARECERA <ExpC3>.
<ExpC3> CADENA CON EL TITULO DE LA ENTRADA DE DATOS.
<ExpN4> NUMERO DEL ULTIMO CAMPO DE LA TABLA XBASE PRINCIPAL QUE SE DESEA
CAPTAR, SI SE OMITE SE ASUME EL ULTIMO CAMPO DE LA TABLA XBASE.
<ExpC4> CADENA CON EL NOMBRE DE UN PROCEDIMIENTO DEFINIDO POR EL USUARIO
QUE SERA EMPLEADO POR CAPTA PARA VALIDAR Y MOSTRAR VENTANAS DE AYUDA A LOS
CAMPOS QUE NO SON INDICES.
<Arr3> ARREGLO CON LAS LINEAS DE ENCABEZAMIENTOS PARA LOS LISTADOS
PANTALLA-IMPRESORA-FICHERO.
<Arr4> ARREGLO CON LOS NOMBRES DE TABLAS XBASES AUXILIARES, PARA CAPTAR
Y VALIDAR LOS CAMPOS NO INDICES. EL SUBINDICE DEL ARREGLO CORRESPONDE
A LA POSICION DE LA COLUMNA EN LA PANTALLA DE CAPTACION
DESDE EL 1 HASTA EL ULTIMO CAMPO.
<ExpB2> EXPRESION BOOLEANA PARA HABILITAR O NO LA TECLA F2 - ELIMINAR EN LA
OPCION F3-VER/EDITAR.

- CAPTA retorna .T. (Verdadero) si el usuario realizó cambios en la tabla
xbase principal, de lo contrario .F. (Falso).

- EL símbolo [] en la llamada significa que el parámetro es opcional.

RESTRICCIONES:

1) LA APLICACION NO DEBE USAR TABLAS XBASES LLAMADAS: CLTMP.DBF,
CLTMP.DBT, LETMP.DBF NI VARIABLES: VCT, VCE, VCS, VCN.

2) LOS CAMPOS LLAVES DE LA TABLA XBASE PRINCIPAL DEBEN SER LOS
PRIMEROS Y EL NOMBRE DE LOS CAMPOS LLAVES NO DEBE TENER MAS DE 9
CARACTERES PORQUE LA FUNCION ADICIONA 1 CARACTER.


 
FUNCTION EDITA

DESARROLLADOR: NELIDO O. SANCHEZ ALVAREZ, INFORMATICO SANTA CLARA-CUBA

OBJETIVO: ESTA FUNCION PERMITE EDITAR POR PANTALLA, IMPRESORA Y FICHERO
CUALQUIER INFORME CREADO EN UNA TABLA XBASE (.dbf)
OFRECIENDO LA POSIBILIDAD DE PONERLE TITULOS A CADA COLUMNA Y
ENCABEZADOS Y PIE A LOS INFORMES. LOS INFORMES PUEDEN SER
EXPORTADOS AL FORMATO EXCEL.

- Ver ejemplo de uso de esta función en la aplicación Metros.prg


LLAMADA:

EDITA (<ExpC1>[,<Arr1>[,<Arr2>[,<ExpN1>[,<ExpN2>[,<ExpN3>[,<ExpC2>[,<Arr3>]]]]]]])

DONDE:

<ExpC1> NOMBRE (SIN EXTENSION) DE LA TABLA XBASE A EDITAR.
<Arr1> ARREGLO CON LOS TITULOS DESEADOS PARA CADA CAMPO DE LA TABLA XBASE
<Arr2> ARREGLO CON LAS LINEAS DE ENCABEZAMIENTOS DE LOS INFORMES.
<ExpN1> NUMERO DEL ULTIMO CAMPO QUE SE DESEA EDITAR, SI SE OMITE SE
SE ASUME EL ULTIMO CAMPO DE LA TABLA XBASE.
<ExpN2> FILA DE PANTALLA DONDE APARECERA LA <ExpC2>.
<ExpN3> COLUMNA DE PANTALLA DONDE APARECERA LA <ExpC2>.
<ExpC2> CADENA CON EL TITULO DEL INFORME.
<Arr3> ARREGLO CON LA LINEAS DE PIE DE LOS INFORMES.

- EL símbolo [] en la llamada significa que el parámetro es opcional.

https://drive.google.com/file/d/1dHKOKF ... drive_link