impresora,1
variable6=0
$
si(variable6=0)
@10,0, DUCLA   S.A   DE  C.V.
@12,1, DULCERĶA CLAUDIA 
@2,2,RFC DUC 010530 5Z5 TEL 58-25-15-46
@8,3, LOPEZ MATEOS #9 LOCAL A-4
@0,4, EX HDA DEL PEDREGAL ATIZAPAN DE Z
@0,5, FOLIO INTERNO: +CLDOC_F
@0,6,FECHA +FEDOC_F
@20,6,HORAX_F
@0,7, CAJA No : +CLVEN_F
usuario,12,7
*sql(12,7,NOMBR_V,VENDEDOR,CLVEN_V=,CLVEN_F)
variable6=1+1
terminacondicion
$
saltar(8)
variable1=0
variable2=0
variable3=0
&INICIADETALLE
formato(##0)
variable1=variable1+cantidad
*@1,1,Clave
@1,1,Producto
*@15,1,Descuento
formato(##,##0.00)
saltar(1)
moneda(0,1,Cantidad,)
@10,1,X
moneda(14,1,Precio,$)
moneda(25,1,Importe,$)
si(IMPUESTO>0)
variable2=variable2+IMPORTE
terminacondicion
saltar(1)
&TERMINADETALLE
saltar(1)
@10,1,GRABADO
moneda(25,1,variable2,$)
saltar(1)
@10,1,EXENTO
variable2=IMTOD_F-variable2
moneda(25,1,variable2,$)
saltar(1)
@10,1,DESC.   +DESFI_F
@18,1,%
moneda(25,1,DECOT_F,$)
saltar(1)
@10,1,TOTAL
moneda(25,1,IMTOD_F,$)
saltar(1)
estilo,normal
traduce(1,1,IMTOD_F)
saltar(1)
@10,1,EFECTIVO
moneda(25,1,CAMBI_F,$)
variable3=CAMBI_F-IMTOD_F
si(variable3>0)
saltar(1)
@10,1,CAMBIO
moneda(25,1,variable3,$)
terminacondicion
saltar(1)
@1,1,----------------------------------------
saltar(1)
@1,1,TOTAL DE ARTICULOS 
@20,1,variable1
saltar(1)
@1,1, VUELVA PRONTO.....   
saltar(1)
si(tregi_f=I)
@1,1,TICKET R E I M P R ES O
saltar(1)
terminacondicion
@1,1,   
saltar(1)
@1,1,   
saltar(1)
@1,1,   
saltar(4)
@1,1,  .