[set page_title]Shipping Preferences - UPS[/set] [set ui_checklist]1[/set] [set help_name]wizard.ups[/set] @_UI_STD_HEAD_@ [perl] # use company ZIP for default if it's a standard US ZIP code $defaultshipzip = ($Values->{zip} =~ /^(\d{5})/) ? $1 : ""; return; [/perl]
Select the UPS shipping options you want to offer.
[seti ups_modes][available-www-shipping ups][/seti] [calc] my @modes = split /\n/, $Scratch->{ups_modes}; my @out; for (@modes) { s/^\w+://; s/\t\w+:/=/; } $Scratch->{ups_modes} = join ",\n", @modes; return; [/calc] [table-editor left_width=120 table_width=500 wizard=1 defaults=1 bottom_buttons=1 no_top=1 no_bottom=1 row_template="[scratch row_template]" mv_nextpage="[either][cgi ui_nextpage][or]__UI_BASE__/wizard/step_ship_country[/either]" mv_prevpage="[either][cgi ui_prevpage][or]__UI_BASE__/wizard/step_ship[/either]" hidden.ui_return_to="__UI_BASE__/wizard/index" ui_wizard_fields="shipzip upsmodes upsadder" label.shipzip="Warehouse ZIP code" check.shipzip=zip help.shipzip="From what ZIP code will your shipments be sent? (Leave blank if not in U.S.)" widget.shipzip=text_5 default.shipzip=`$defaultshipzip` label.upsmodes="UPS Options" check.upsmodes=mandatory help.upsmodes="The UPS delivery options you will allow?" widget.upsmodes=checkbox_left_2 default.upsmodes="GNDCOM 2DA 1DA XPD XPR" passed.upsmodes=`$Scratch->{ups_modes}` filter.upsmodes="checkbox null_to_space" label.upsadder="Handling charge" filter.upsadder="digits_dot" check.upsadder="regex ^\\d+(?:\\.\\d+)?\$" help.upsadder="Handling/packaging cost to be added to raw UPS cost" widget.upsadder=text_8 default.upsadder="3.00" ] [set ui_override_next] [perl] if($Values->{shipmethod} =~ /\bflat\b/i) { $CGI->{mv_nextpage} = '__UI_BASE__/wizard/step_ship_default'; } delete $Scratch->{ui_override_next}; return; [/perl] [/set] @_UI_STD_FOOTER_@