FiveTech Software tech support forums

OK

oRs := oAdoCon:Execute( "SHOW CREATE TABLE <yourtablename>" )
FW_MEMOEDIT( oRs:Fields( 1 ):Value )

CREATE TABLE `polizas` (
`LLAVE` varchar(20) NOT NULL default '',
`PERIODO` varchar(6) default ' ',
`POLIZA` varchar(13) default ' ',
`CONCEPTO` varchar(100) default ' ',
`CARGOS` decimal(14 ...

Hola Ramon,

Encontraste alguna solucion al tu requerimiento, hace tiempo yo desarrolle un proyecto para el almacenamiento y control de polizas de pronto la logica te pudiera servir.

... los datos desde dbfs,ya que nunca casi le entendi como cargar datos a un arrays a txbrowse desde dbfs si realizo alguna consulta o modificacion de polizas y asi como grabar datos desde arrays,ya que segun es mas facil insertar registros con la funcion ains() pero nunca lo realice y me quede con ese ...

otro ejemplo

oApp:ConnectionString := "Driver={SQL Server};Server=192.168.1.100;" + ;
"Trusted_Connection=no;Database=polizas" + ;
";Uid=contab;Pwd=Polizas123;"

... objetivo es al dar enter dentro del browse es que no se salte a la siguiente columna, que se quede fijo, es como la pantallla de la captura de de polizas el que le pase , si se acuerda ing. Francisco,supongo que si, bueno hare pruebas y le comento .

Gracias Ing. Francisco.

Saludos.

Atte: Adrian C ...

Saludos.

Tengo un problemon que no logro identificar:

En un archivo de detalle de polizas con el archivo DPO0515.dbf, en el pc que tengo como servidor me muestra este archivo y logico no contiene toda la informacion que en otra pc si puedo ver.
desde la otra pc veo dos archivos con el mismo nombre ...

... espacios en blancos en la variable o campo que contiene el nombre del archivo
usualmente

FIELD->NOMBRE // 100 espacios
?FIELD->NOMBRE //"c:\polizas\tmp\poliza_102030.pdf .............." aca los puntos son espacios en blanco ya que el foro elimina los espacios en blanco

?file( FIELD->NOMBRE ...

Hola Buen dia.

Si alguien no ha tenido tiempo de hacer un sistema de contabilidad (catalogo de cuentas, polizas, balanza, estado de resultados, etc). Y quiere tener uno para complementar los sistemas administrativos que ya tiene, tengo un Sistema Contable con codigo fuente disponible echo en FWH ...

... la carpeta contabil y pegarla en c:\.

El sistema viene cargado con informacion de una empresa de 1997, cuando impriman reportes o den de alta polizas, haganlo para este año.

El sistema es multiempresa y puede funcionar en red. Maneja periodos habiertos (No hay que hacer cierre de periodos ...

Hola Buen dia.

Si alguien no ha tenido tiempo de hacer un sistema de contabilidad (catalogo de cuentas, polizas, balanza, estado de resultados, etc). Y quiere tener uno para complementar los sistemas administrativos que ya tiene, tengo un Sistema Contable con codigo fuente echo en FWH.

Tambien ...

Hola

a si lo manejo yop


oBrwX01:cTooltip :={ "POLIZAS DE AUTOS (C)Copyright 2010 - Por Aida Sistemas S.A.", "POLIZARIUM",1,CLR_WHITE,CLR_HBLUE }


puedes usar el 1 , 2 y 3

Saluditos

... AUTOS->poliza,oGetInc:Refresh(),ramo:="AUTOS",oRamos:Refresh(),rFicha:=AUTOS->ficha,oFicha:Refresh(),cFichero:=AUTOS->PDF)
oBrwX:cTooltip :={ "POLIZAS DE AUTOS (C)Copyright 2010 - Por AIDA.", "POLIZARIUM",1,CLR_WHITE,CLR_HBLUE }

oBrwX:l2007 := (.F.)

oBrwX:bClrFooter := { || {CLR_BLUE,CLR ...

Tengo dos tablas relacionadas mediante SET RELATION

USE Polizas NEW
SET INDEX TO I1Poliza
USE Facturas NEW
Set index to I2Factur
USE Siniestr NEW
INDEX ON Siniestr->NumControl TO I1Sini DESCENDING
SET INDEX TO I1Sini
GO TOP
SET RELATION TO NumPoliza INTO Polizas, NumControl INTO Facturas ...

... puedes intentar con esto style nOr( WS_OVERLAPPED + WS_CAPTION + WS_THICKFRAME + WS_CLIPCHILDREN )

DEFINE WINDOW oWndD TITLE "Aida Control de Polizas V 1.00 2008" from oTop,oLeft to oBottom,oRight MDI Color nRgb(230, 230, 250 ),nRgb( 132, 112, 255) ;
MENU BuildMenu() style nOr( WS_OVERLAPPED ...

... PRG\TEST2003.PRG(371) Warning W0001 Ambiguous reference: 'MDI'

A SI DEFINO EL WINDOWS

DEFINE WINDOW oWndD NOZOOM TITLE "Aida Control de Polizas V 1.00 2008" from oTop,oLeft to oBottom,oRight MDI Color nRgb(230, 230, 250 ),nRgb( 132, 112, 255) ;
MENU BuildMenu() STYLE ( WS_CAPTION, WS ...