[set page_title]Button builder[/set] [set ui_class]Design[/set] [set help_name]button.builder[/set] [set icon_name]admin/icon_pages.gif[/set] [set mv_no_session_id][/set] [set empty_basket] [calc] @{$Carts->{main}} = (); return; [/calc] [/set] @_UI_STD_HEAD_@ [if scratch ui_failure] Failed: [scratch ui_failure][set ui_failure][/set]
[/if]

Empty basket

[scratch test_button]

[comment]Below profile found in MV_ROOT/profiles[/comment] [scratch item_result] [calc] my $ary = $Config->{ProductFiles}; return unless scalar @$ary > 1; my $out = <<'EOF'; EOF [/calc] [loop prefix=macro list=`join "\n", @{$Config->{UseModifier}};`] [if config OnFly] [/if] [comment] [calc] my $out = ''; for(@{$Config->{UseModifier}}) { $out .= < EOF } return $out; [/calc] [/comment]
Build an order button or link
Type
Item code [perl] my $table = $Config->{ProductFiles}[0]; $Scratch->{keypos} = $Config->{Database}{$table}{KEYINDEX} || '0'; $Scratch->{flex_description} = $Config->{DescriptionField}; return; [/perl] [loop more=1 search=" st=db ra=yes md=1 tf=[scratch flex_description] rf=[scratch keypos],[scratch flex_description] " ] [more-list]
Too big for one page: [more][/more-list] [/loop]
Or enter SKU:
Specific Quantity (Separate multiple quantities by commas)
A specific database
Separate line?
Group items? (all items removed when first one is)
[macro-code] (if any) [/loop]
Affiliate code
Description
(on-the-fly only)
Price
(on-the-fly only)
$_ (if any) (Separate multiple values by commas)
Action

@_UI_STD_FOOTER_@