Name

save_cart — save shopping cart to UserDB

ATTRIBUTES

Attribute Pos. Req. Default Description
nickname | name Yes Yes   Cart specification string. The string is colon-separated, and contains three fields: the cart name, time of save, and type. Time of save is measured in seconds since the epoch. Type can be c (cart) or r (recurring).
recurring Yes    
interpolate     0 interpolate output?
hide     0 Hide the tag return value?

DESCRIPTION

This tag saves current cart to UserDB.

Note that the cart name does not have to be unique. If there are more carts with the same nickname, an index will be added.

BEHAVIOR

This tag does not appear to be affected by, or affect, the rest of Interchange.

EXAMPLES

Example: Save cart to UserDB

Place the following on an Interchange page:

[save_cart mycart]

NOTES

AVAILABILITY

save_cart is available in Interchange versions:

4.6.0-5.7.0 (git-head)

SOURCE

Interchange 5.7.0:

Source: code/UserTag/save_cart.tag
Lines: 50


# Copyright 2002-2007 Interchange Development Group and others
# 
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.  See the LICENSE file for details.
# 
# $Id: save_cart.tag,v 1.7 2007-12-16 10:15:09 kwalsh Exp $

UserTag save_cart Order     nickname recurring keep
UserTag save_cart AttrAlias name nickname
UserTag save_cart Version   $Revision: 1.7 $
UserTag save_cart Routine   <<EOR
sub {
my($nickname,$recurring,$keep) = @_;

my $add = 0;
my %names = ();

$nickname =~ s/://g;
$recurring = ($recurring?"r":"c");

foreach(split("\n",$Tag->value('carts'))) {
  my($n,$t,$r) = split(':',$_);
  $names{$n} = $r;
  if($r eq $recurring) {
    if($n eq $nickname) {
      #$Tag->userdb({function => 'delete_cart', nickname => $_});
      $add = 1;
    }
  }
}
if($add) {
  while($names{"$nickname,$add"} eq $recurring) {
    $add++;
  }
  $nickname .= ",$add";
}

my $nn = join(':',$nickname,time(),$recurring);

unless ($Tag->userdb({function => 'set_cart', nickname => $nn})) {
  return '';
}

$Carts->{main} = [] unless is_yes($keep);

return '';
}
EOR

AUTHORS

Interchange Development Group

SEE ALSO

delete_cart(7ic), load_cart(7ic), userdb(7ic), cart(7ic)

DocBook! Interchange!