SET DATE TO dmy


IF !DIRECTORY("\temp")
	MKDIR \temp
ENDIF


*** TEST.TXT must exist ***
cFile = GETFILE('txt')

CREATE CURSOR  cupos (codigo c(20), nombre c(60), cedula c(30), cupo double, dfecha d ,;
hfecha d, consumo double, lcupo L, fconsumo d, idinst int, idbene int, penalidad int)

APPEND FROM &cFile TYPE DELIMITED WITH TAB 
COPY TO \temp\empleado