Akopia Akopia Services

[Date Prev][Date Next][Thread Prev][Thread Next][Interchange by date ][Interchange by thread ]

Re: [mv] How To Extract Item Codes At Checkout Question: AGAIN



Hello,

I figured it out, I forgot to declare my ($item)

However, how do I get the value of each item in @{$Vend::Items} instead
of the hash reference?

Thanks,
Murrah Boswell

OTR Comm wrote:
> 
> Hello again,
> 
> Another question:
> 
> cfm@maine.com wrote:
> >
> > On Sat, Jan 20, 2001 at 10:25:47AM -0700, OTR Comm wrote:
> 
> >
> >   for (@{$Vend::Items}) {
> >     stuff orders, order_items # whatever schema
> >     $MERCHANTS_IN_THIS_ORDER{$item->{merchant}}; # unique list
> >   }
> >   for (keys $MERCHANTS_IN_THIS_ORDER) {
> >     %o=SELECT * FROM orders WHERE order_number=$this_order_number;
> >     %v=SELECT * FROM order_items WHERE order_number=$this_order_number
> >       AND merchant_id=$this_merchant_id;
> >     &post_advice($this_merchant,\%o,%v); # might be email, db, whatever
> >   }
> >
> 
> I have realperl defined as a UserTag in minivend.cfg and added the
> following code to checkout.html just for some debugging:
> 
> [realperl]
> {
> 
>         open (MV,"+>>pages/mvchk");
> 
>         print MV "In checkout:\n";
> 
> 
>         foreach $item (@{$Vend::Items}) {
> 
>                 print MV "item = $item\n";
> 
>         }
> 
>         close(MV);
> 
> }
> [/realperl]
> 
> The snippet works fine if I comment out the foreach loop (I get output
> to pages/mvchk), but dies if I try to evaluate it.
> 
> Do you think that this is a problem with hos I have realperl defined, or
> is it a problem with how I address @{$Vend::Items} on the foreach loop?
> 
> Thanks,
> Murrah Boswell
> 
> > &do_my_behind_the_scene_stuff # can be entirely separate outside mv
> >
> > cfm
> >
> 
> >
> > --
> >
> > Christopher F. Miller, Publisher                             cfm@maine.com
> > MaineStreet Communications, Inc         208 Portland Road, Gray, ME  04039
> > 1.207.657.5078                                       http://www.maine.com/
> > Content management, electronic commerce, internet integration, Debian linux
> >
> > _______________________________________________
> > Minivend-users mailing list
> > Minivend-users@minivend.com
> > http://lists.akopia.com/mailman/listinfo/minivend-users
> 
> _______________________________________________
> Minivend-users mailing list
> Minivend-users@minivend.com
> http://lists.akopia.com/mailman/listinfo/minivend-users


_______________________________________________
Minivend-users mailing list
Minivend-users@minivend.com
http://lists.akopia.com/mailman/listinfo/minivend-users


Search for: Match: Format: Sort by: