[ic] interchange error
Jack Gates
jlgates at morningstarwebservices.net
Fri Oct 24 09:32:32 EDT 2003
> > UserTag batch Routine <<EOR
> > sub {
> > foreach my $index (0 .. $#$Vend::Items) {
> > my $code = $Vend::Items->[$index]{code};
> > my $oqty = $Vend::Items->[$index]{quantity};
> > my $base = $Vend::Items->[$index]{mv_ib};
> > my $nqty = $oqty;
> > my $batches = undef;
> How about the foreach loop running once too often? I think it will
> run $#$Vend::Items + 1 times, as you're starting at zero and counting
> to $#$Vend::Items?
Are you saying;
foreach my $index (0 .. $#Vend::Items + 1)
Thanks for the help,
Jack
More information about the interchange-users
mailing list