2011/02/05

Fin de Archivo lectura secuencial en VB.NET

Cuando se lee secuencialmente un archivo en VB.NET, el apuntador se pone en fin de archivo cuando el el último regitro, contratio a Cobol que lo pone hasta que llega al fin de archivo

Cobol VB.NET

XXXXXX XXXXXX
YYYYYY YYYYYY <-- Apuntador
<-- Apuntador

Para resolver el punto cuando la lectura se hace hacia el final del proceso (al principio del proceso no tiene problema porque se lee el registro, se procesa y despues se pregunta) se debe manejar el fin de archivo de la siguiente manera

While Lineatexto1 is not Nothing

Proceso....

If not eof(1)
lineatexto = lineinput(1)
else
lineatexto = Nothing
endif

Formato FBM en un archivo Cobol en Host

Un problema que se presenta y que no es claro el porque, es al generar un archivo de una determinada longitud, 70 por ejemplo, al generarse y querer ser leido por el siguiente proceso, resulta que la longitud es de 71 y deja un caracter al principio del archivo. Esto sucede porque el archivo fue generado con caracteres de maquina, debido a que se dio write con con instrucciones para la impresora, como after advancing, before advancing. Lo que hay que hacer es eliminar estas instrucciones del write del archivo y quedara como un archivo plano.

2007/01/09

Migracion MYSQL

Para migrar tablas de ambientes WEB como Yahoo a ambientes locales como Navicat la manera ideal de hacer la migración de los datos es generar desde el ambiente WEB un archivo Excel, abrir el archivo en la PC y COPIAR directamente los registros a NAVICAT. Esto elimina los problemas de los acentos y los campos que utilizan comillas internas

2006/10/10

Modificar el tamaño de las columnas en un DataTable

Alguna vez tuve el problema de que no podía ampliar el tamaño de las columnas en un DataTable, hay dos aspectos importantes a considerar:

1) Establecer el tamaño en puntos:
columna.width = Unit.Point(70) ' el indice debe ser un entero
2) Establecer el wrap en falso
columna.wrap = false

Ojala les evite los problemas que yo pase, saludos

2006/10/05

Eliminar una columna de un datatable

Para eliminar una columna de un datatable se debe usar hacer lo siguiente:

- Identificar el nombre de la columna que se desea borrar
- Si no se conoce el nombre pero si su posición, primero se deberá obtener el nombre con el comando siguiente:
dim nomcol as String
nomcol = DataTable.Columns(indice).Caption

-Eliminar la columna
DataTable.Columns.Remove(nomcol)

y listo, ojala les sirva