HOLA A TODOS:
TENGO ESTE PROBLEMA, UN ARRAY PARA OBTENER EL CODIGO DE CLIENTE, YA TENGO ESO....LO QUE NO PUEDO LOGRAR, ES CONTAR CUENTOS REGISTROS TIENE EL ARREGLO....
POR FAVOR ALGUIN ME PUEDE AYUDAR...
AQUI LE DEJO MI CODIGO...
WhilePrintingRecords;
numbervar array x;
numbervar Cont;
if onfirstrecord or ({DVVentasTotales.artcodigo} <> previous({DVVentasTotales.artcodigo})) then
(redim x[1];
Cont := 0);
if DateValue (Year ({DVVentasTotales.fechapedido}),Month ({DVVentasTotales.fechapedido}),
Day ({DVVentasTotales.fechapedido})) >= DateTime (Year ({?FECHAINI}) + 1,Month ({?FECHAINI}),Day ({?FECHAINI})) then
if not({DVVentasTotales.codigo} in x) then
(Cont := Cont + 1;
if Cont <= 1000 then
(Redim Preserve x[Cont];
x[Cont] := {DVVentasTotales.codigo}));
DE ANTEMANO GRACIAS...
