cFile = '../Visualfac/script/visualfac.sql'

cFile = FILETOSTR(cFile)

cFile = STRTRAN(upper(cFile), upper("ID VARCHAR(6) default ''"), 			"id INTEGER UNSIGNED NOT NULL AUTO_INCREMENT")
cFile = STRTRAN(upper(cFile), upper("ID VARCHAR(7) default ''"), 			"id INTEGER UNSIGNED NOT NULL AUTO_INCREMENT")
cFile = STRTRAN(upper(cFile), upper("ID VARCHAR(8) default ''"), 			"id INTEGER UNSIGNED NOT NULL AUTO_INCREMENT")
cFile = STRTRAN(upper(cFile), upper("ID VARCHAR(9) default ''"), 			"id INTEGER UNSIGNED NOT NULL AUTO_INCREMENT")
cFile = STRTRAN(upper(cFile), upper("ID VARCHAR(10) default ''"),			"id INTEGER UNSIGNED NOT NULL AUTO_INCREMENT")
cFile = STRTRAN(upper(cFile), upper("ID VARCHAR(11) default ''"),			"id INTEGER UNSIGNED NOT NULL AUTO_INCREMENT")
cFile = STRTRAN(upper(cFile), upper("ID VARCHAR(12) default ''"),			"id INTEGER UNSIGNED NOT NULL AUTO_INCREMENT")
cFile = STRTRAN(upper(cFile), upper("ID VARCHAR(14) default ''"),			"id BIGINT UNSIGNED NOT NULL AUTO_INCREMENT")
cFile = STRTRAN(upper(cFile), upper("ID VARCHAR(16) default ''"),			"id BIGINT UNSIGNED NOT NULL AUTO_INCREMENT")


cFile = STRTRAN(upper(cFile), upper("ID   VARCHAR(6) default ''"), 			"id INTEGER UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("ID   VARCHAR(7) default ''"), 			"id INTEGER UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("ID   VARCHAR(8) default ''"), 			"id INTEGER UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("ID   VARCHAR(9) default ''"), 			"id INTEGER UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("ID   VARCHAR(10) default ''"),			"id INTEGER UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("ID   VARCHAR(11) default ''"),			"id INTEGER UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("ID   VARCHAR(12) default ''"),			"id INTEGER UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("ID   VARCHAR(14) default ''"),			"id BIGINT UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("ID   VARCHAR(16) default ''"),			"id BIGINT UNSIGNED DEFAULT 0")

cFile = STRTRAN(upper(cFile), upper("idCombo VARCHAR(12) default ''"),  	"idCombo INTEGER UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("idItem VARCHAR(12) default ''"),  		"idItem INTEGER UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDITEM VARCHAR(12) default ''"),  		"idItem INTEGER UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDBRAND VARCHAR(8) default ''"),		"idBrand INTEGER UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IdProm VARCHAR(10) default ''"),		"idProm INTEGER UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDCATEGORIA VARCHAR(8) default ''"),	"idCategoria INTEGER UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDGRUPO VARCHAR(9) default ''"),		"idGrupo INTEGER UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDSUBGRUPO VARCHAR(8) default ''"),	"idSubgrupo INTEGER UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDPARTIDA VARCHAR(9) default ''"),		"idPartida INTEGER UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDPLAN VARCHAR(10) default ''"),		"idPlan INTEGER UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDMEDIDA VARCHAR(10) default ''"),		"idMedida INTEGER UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDCOLOR VARCHAR(10) default ''"),		"idColor INTEGER UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDTIPO VARCHAR(10) default ''"),		"idTipo INTEGER UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDSUPPLIER VARCHAR(12) default ''"),	"idSupplier INTEGER UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDUBICACION VARCHAR(8) default ''"),	"idUbicacion INTEGER UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDBODEGA VARCHAR(8) default ''"),		"idBodega INTEGER UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDGENERICO VARCHAR(12) default ''"),	"idGenerico INTEGER UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDUNIDADITEM VARCHAR(8) default ''"),	"idUnidadItem INTEGER UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("idlaboratorio VARCHAR(10) default ''"),"idLaboratorio INTEGER UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("idCustomer VARCHAR(10) default ''"),	"idCustomer INTEGER UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("idCustomer VARCHAR(12) default ''"),	"idCustomer INTEGER UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDCC VARCHAR(10) DEFAULT '0000000000'"),"idCC INTEGER DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("idcp VARCHAR(10) DEFAULT '0000000000'"),"idCP INTEGER DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("idsp varchar(12) default ''"),			"idSP INTEGER DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDSALESMAN VARCHAR(8) default ''"),	"idSalesman INTEGER DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDWAREHOUSE VARCHAR(12) default ''"),	"idWarehouse INTEGER DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDEQUIPMENT VARCHAR(14) default ''"),	"idEquipment INTEGER DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDUSER VARCHAR(8) default ''"),		"idUser INTEGER DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDUSERF VARCHAR(8) default ''"),		"idUserF INTEGER DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDUSERINVOICE VARCHAR(8) default ''"),	"idUserInvoice INTEGER DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDADDRESS VARCHAR(12) default ''"),	"idAddress INTEGER DEFAULT 0")

cFile = STRTRAN(upper(cFile), upper("IDZONA VARCHAR(9) DEFAULT ''"),		"idZona INTEGER DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDCOMPANY VARCHAR(9) DEFAULT ''"),		"idCompany INTEGER DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDCLASE VARCHAR(9) DEFAULT ''"),		"idClase INTEGER DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDINSTITUCION VARCHAR(12) DEFAULT ''"),"idInstitucion INTEGER DEFAULT 0")

cFile = STRTRAN(upper(cFile), upper("IDBANK VARCHAR(8) DEFAULT ''"),		"idBank INTEGER DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDBANK VARCHAR(8) DEFAULT ''"),		"idBank INTEGER DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDBANK VARCHAR(8) DEFAULT ''"),		"idBank INTEGER DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDBANK VARCHAR(8) DEFAULT ''"),		"idBank INTEGER DEFAULT 0")

cFile = STRTRAN(upper(cFile), upper("IDBANK VARCHAR(8) DEFAULT ''"),		"idBank INTEGER DEFAULT 0")

cFile = STRTRAN(upper(cFile), upper("IDINVOICE VARCHAR(14) DEFAULT ''"),	"idInvoice BIGINT UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("ID0 VARCHAR(14) DEFAULT ''"),			"id0 BIGINT UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDBOOKBANK VARCHAR(16) DEFAULT ''"),	"idBookBank BIGINT UNSIGNED DEFAULT 0")

cFile = STRTRAN(upper(cFile), upper("IDACCOUNTSUPCUOTA VARCHAR(14) DEFAULT ''"),	"idAccountSupCuota BIGINT UNSIGNED DEFAULT 0")
cFile = STRTRAN(upper(cFile), upper("IDPO VARCHAR(14) DEFAULT ''"),			"idPo BIGINT UNSIGNED DEFAULT 0")

cFile = STRTRAN(upper(cFile), upper("IDACCOUNTCUS VARCHAR(14) DEFAULT ''"),	"idAccountCus BIGINT UNSIGNED DEFAULT 0")




*MESSAGEBOX(upper(cFile))


STRTOFILE(upper(cFile), '\temp\visualfac.sql') 

WAIT WINDOW 'Listo: \temp\visualfac.sql'


