Mercurial > laserkard

comparison paypal/make.pl @ 42:ef8615de8a9c laserkard

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[svn r43] implemented form memory
author rlm
date Wed, 27 Jan 2010 22:04:43 -0500
parents 1ac1409ea68c
children 1045db9799e3
comparison
equal deleted inserted replaced
41:c4747d955ac8 42:ef8615de8a9c
11 DESC => 'Laser-Etched Clear Acrylic', 11 DESC => 'Laser-Etched Clear Acrylic',
12 12
13 NAME => 'big_acrylic_clear', 13 NAME => 'big_acrylic_clear',
14 14
15 FIELDS => ["Name", "Email"], 15 FIELDS => ["Name", "Email"],
16 DEFAULTS => ['James Bond','jbond@mi6.co.uk'], 16 DEFAULTS => ['PERL::NAME','PERL::EMAIL'],
17 17
18 COSTS_NAMES => ['40 cards — $125', '4 cards — $30'], 18 COSTS_NAMES => ['40 cards — $125', '4 cards — $30'],
19 COSTS_CODE => ['40 cards @125.00', '4 cards @30.00'], 19 COSTS_CODE => ['40 cards @125.00', '4 cards @30.00'],
20 INITIAL_PRICE => '$125.00', 20 INITIAL_PRICE => '$125.00',
21 21
32 SHORT_FORM => 'arrow', 32 SHORT_FORM => 'arrow',
33 33
34 NAME => 'basic_acrylic_clear', 34 NAME => 'basic_acrylic_clear',
35 35
36 FIELDS => ["Name", "Company","Occupation","Email"], 36 FIELDS => ["Name", "Company","Occupation","Email"],
37 DEFAULTS => ['James Bond','MI6','Secret Agent','jbond@mi6.co.uk'], 37 DEFAULTS => ['PERL::NAME','PERL::COMPANY','PERL::OCCUPATION','PERL::EMAIL'],
38 38
39 COSTS_NAMES => ['40 cards — $125', '4 cards — $30'], 39 COSTS_NAMES => ['40 cards — $125', '4 cards — $30'],
40 COSTS_CODE => ['40 cards @125.00', '4 cards @30.00'], 40 COSTS_CODE => ['40 cards @125.00', '4 cards @30.00'],
41 INITIAL_PRICE => '$125.00', 41 INITIAL_PRICE => '$125.00',
42 42
54 SHORT_FORM => 'classic', 54 SHORT_FORM => 'classic',
55 55
56 NAME => 'classic_acrylic_clear', 56 NAME => 'classic_acrylic_clear',
57 57
58 FIELDS => ["Email", "Phone","Name","Company","Occupation","Website"], 58 FIELDS => ["Email", "Phone","Name","Company","Occupation","Website"],
59 DEFAULTS => ['jbond@mi6.co.uk','123.456.7890','James Bond','MI6','Secret Agent','http://www.jamesbond.com'], 59 DEFAULTS => ['PERL::EMAIL','PERL::PHONE','PERL::NAME','PERL::COMPANY','PERL::OCCUPATION','PERL::WEBSITE'],
60 60
61 COSTS_NAMES => ['40 cards — $125', '4 cards — $30'], 61 COSTS_NAMES => ['40 cards — $125', '4 cards — $30'],
62 COSTS_CODE => ['40 cards @125.00', '4 cards @30.00'], 62 COSTS_CODE => ['40 cards @125.00', '4 cards @30.00'],
63 INITIAL_PRICE => '$125.00', 63 INITIAL_PRICE => '$125.00',
64 64
77 SHORT_FORM => 'direct', 77 SHORT_FORM => 'direct',
78 78
79 NAME => 'lines_acrylic_clear', 79 NAME => 'lines_acrylic_clear',
80 80
81 FIELDS => ["Name", "Occupation","Company","Phone","Email","Website"], 81 FIELDS => ["Name", "Occupation","Company","Phone","Email","Website"],
82 DEFAULTS => ['James Bond','Secret Agent','MI6','123.456.7890','jbond@domain.com','www.domain.com'], 82 DEFAULTS => ['PERL::NAME','PERL::OCCUPATION','PERL::COMPANY','PERL::PHONE','PERL::EMAIL','PERL::WEBSITE'],
83 83
84 COSTS_NAMES => ['40 cards — $125', '4 cards — $30'], 84 COSTS_NAMES => ['40 cards — $125', '4 cards — $30'],
85 COSTS_CODE => ['40 cards @125.00', '4 cards @30.00'], 85 COSTS_CODE => ['40 cards @125.00', '4 cards @30.00'],
86 INITIAL_PRICE => '$125.00', 86 INITIAL_PRICE => '$125.00',
87 87
90 } 90 }
91 91
92 92
93 93
94 94
95
96
97
98
99
100
101
102 ##################################################################################################################################
103
104
105
106
107
108
109
110
111
112
113
114
95 {#classic_acrylic_green 115 {#classic_acrylic_green
96 &paylist 116 &paylist
97 ( 117 (
98 TITLE => "Vitality LaserKard Classic Style", 118 TITLE => "Vitality LaserKard Classic Style",
99 NAME => 'classic_acrylic_green', 119 NAME => 'classic_acrylic_green',
100 120
101 FIELDS => ["Line 1", "Line 2","Line 3","Line 4","Line 5","Side"], 121 FIELDS => ["Line 1", "Line 2","Line 3","Line 4","Line 5","Side"],
102 DEFAULTS => ['jbond@mi6.co.uk','123.456.7890','James Bond','MI6','Secret Agent','http://www.jamesbond.com'], 122 DEFAULTS => ['PERL::EMAIL','123.456.7890','James Bond','MI6','Secret Agent','http://www.jamesbond.com'],
103 123
104 COSTS_NAMES => ['40 cards — $135', '4 cards — $30'], 124 COSTS_NAMES => ['40 cards — $135', '4 cards — $30'],
105 COSTS_CODE => ['40 cards @135.00', '4 cards @30.00'], 125 COSTS_CODE => ['40 cards @135.00', '4 cards @30.00'],
106 INITIAL_PRICE => '$135.00', 126 INITIAL_PRICE => '$135.00',
107 127
115 ( 135 (
116 TITLE => "Vitality LaserKard BIG Style", 136 TITLE => "Vitality LaserKard BIG Style",
117 NAME => 'big_acrylic_green', 137 NAME => 'big_acrylic_green',
118 138
119 FIELDS => ["Line 1", "Line 2"], 139 FIELDS => ["Line 1", "Line 2"],
120 DEFAULTS => ['James Bond','jbond@mi6.co.uk'], 140 DEFAULTS => ['James Bond','PERL::EMAIL'],
121 141
122 COSTS_NAMES => ['40 cards — $135', '4 cards — $30'], 142 COSTS_NAMES => ['40 cards — $135', '4 cards — $30'],
123 COSTS_CODE => ['40 cards @135.00', '4 cards @30.00'], 143 COSTS_CODE => ['40 cards @135.00', '4 cards @30.00'],
124 INITIAL_PRICE => '$135.00', 144 INITIAL_PRICE => '$135.00',
125 145