tamaņo,8
variable2=variable2+1
@1,1,variable2
vsql(5,1,CODIG_I,INVENTAR,CLPRO_I=,CLAVE,cadena1)
@5,1,cadena1
si(cadena1<0)
vsql(5,1,CODIG_I,INVENTAR,CLPRO_I=,CLAVE,cadena2)
@5,1,cadena2
////@5,1,cadena2
terminacondicion
@15,1,producto
/////@12,1,producto
saltar(1)
formato(##0.00)
moneda(1,1,cantidad)
formato(#,##0.00)
@10,1,X
moneda(13,1,precio)
moneda(25,1,importe)
saltar(1)
variable1=variable1+[000]