Line # Revision Author
1 198 ahitrov package webshop::Order;
2
3 use base "Contenido::Document";
4 270 ahitrov use Contenido::Globals;
5
6 198 ahitrov sub extra_properties
7 {
8 return (
9 504 ahitrov { 'attr' => 'name', 'type' => 'string', postedit => 1, faciledit => 1 },
10 198 ahitrov { 'attr' => 'status', 'type' => 'status', 'rusname' => 'Статус заказа', facilshow => 1, postshow => 1,
11 'cases' => [
12 [0, 'открыт'],
13 [1, 'обрабатывается'],
14 [2, 'комплектуется'],
15 [3, 'в доставке'],
16 [4, 'доставлен'],
17 [5, 'отклонен'],
18 545 ahitrov [6, 'ожидание оплаты'],
19 [7, 'товар в резерве'],
20 [8, 'не дозвонились'],
21 663 ahitrov [-1, 'удален'],
22 198 ahitrov ],
23 },
24 { 'attr' => 'delivery', 'type' => 'lookup', 'rusname' => 'Тип доставки', facilshow => 1, postshow => 1,
25 719 ahitrov 'allow_null' => 1,
26 198 ahitrov 'lookup_opts' => {
27 'class' => 'webshop::Delivery',
28 },
29 },
30 413 ahitrov { 'attr' => 'pay_by', 'type' => 'lookup', 'rusname' => 'Тип оплаты', facilshow => 1, postshow => 1,
31 719 ahitrov 'allow_null' => 1,
32 413 ahitrov 'lookup_opts' => {
33 'class' => 'webshop::Payment',
34 },
35 },
36 434 ahitrov { 'attr' => 'pay_alias', 'type' => 'string', 'rusname' => 'Название метода оплаты', shortname => 'Оплата',
37 postshow => 1, facilshow => 1 },
38 553 ahitrov { 'attr' => 'pay_amount', 'type' => 'string', 'rusname' => 'Оплаченная сумма',
39 postshow => 1, facilshow => 1 },
40 198 ahitrov { 'attr' => 'btime', 'type' => 'datetime', 'rusname' => 'Заказ отдан на комплектацию',
41 postshow => 1, facilshow => 1 },
42 { 'attr' => 'ftime', 'type' => 'datetime', 'rusname' => 'Заказ передан в доставку',
43 manager_hidden => 1, postshow => 1, faciledit => 1 },
44 { 'attr' => 'etime', 'type' => 'datetime', 'rusname' => 'Заказ доставлен',
45 manager_hidden => 1, postedit => 1, facilshow => 1 },
46 { 'attr' => 'num', 'type' => 'integer', 'rusname' => 'Количество позиций',
47 297 ahitrov manager_hidden => 1, manshow => 1, postshow => 1, facilshow => 1 },
48 422 ahitrov { 'attr' => 'sum', 'type' => 'string', 'rusname' => 'Сумма (gross)', shortname => 'Сумма',
49 297 ahitrov manager_hidden => 1, column => 5, postshow => 1, facilshow => 1 },
50 270 ahitrov { 'attr' => 'sum_discount', 'type' => 'string', 'rusname' => 'Сумма скидки', shortname => 'Скидка',
51 297 ahitrov manager_hidden => 1, column => 6, postshow => 1, facilshow => 1 },
52 198 ahitrov { 'attr' => 'sum_delivery', 'type' => 'string', 'rusname' => 'Стоимость доставки', shortname => 'Доставка',
53 297 ahitrov manager_hidden => 1, column => 7, postshow => 1, facilshow => 1 },
54 270 ahitrov { 'attr' => 'sum_total', 'type' => 'string', 'rusname' => 'Сумма общая', shortname => 'Total',
55 297 ahitrov manager_hidden => 1, column => 8, virtual => 1, postshow => 1, facilshow => 1 },
56 198 ahitrov { 'attr' => 'contact', 'type' => 'string', 'rusname' => 'Контактное лицо', facilshow => 1 },
57 { 'attr' => 'email', 'type' => 'string', 'rusname' => 'E-mail для связи', shortname => 'E-mail',
58 259 ahitrov column => 3, postshow => 1, facilshow => 1, mandatory => 1, },
59 198 ahitrov { 'attr' => 'phone', 'type' => 'string', 'rusname' => 'Телефон для связи', shortname => 'Тел.',
60 259 ahitrov column => 4, postshow => 1, facilshow => 1,
61 mandatory => 1, rel => 'Не указан телефон' },
62 297 ahitrov { 'attr' => 'address', 'type' => 'text', 'rusname' => 'Адрес доставки', rows => 5, postedit => 1, facilshow => 1,
63 298 ahitrov mandatory => 1, rel => 'Не заполнен адрес доставки' },
64 259 ahitrov { 'attr' => 'zipcode', 'type' => 'string', 'rusname' => 'Почтовый индекс', postshow => 1,
65 mandatory => 1, rel => 'Не указан почтовый индекс' },
66 { 'attr' => 'area', 'type' => 'lookup', 'rusname' => 'Регион',
67 lookup_opts => { class => 'webshop::Area', order_by => 'name' },
68 allow_null => 1, mandatory => 1, rel => 'Не выбран регион'
69 },
70 { 'attr' => 'town_id', 'type' => 'lookup', 'rusname' => 'Город',
71 lookup_opts => { class => 'webshop::Town', order_by => 'name' },
72 allow_null => 1, mandatory => 1, rel => 'Не выбран город'
73 },
74 { 'attr' => 'town', 'type' => 'string', 'rusname' => 'Город', postshow => 1, facilshow => 1,
75 mandatory => 1, rel => 'Не указан город' },
76 544 ahitrov { 'attr' => 'carrier', 'type' => 'string', 'rusname' => 'Транспортная компания', postshow => 1 },
77 297 ahitrov { 'attr' => 'metro', 'type' => 'string', 'rusname' => 'Ближайшее метро', manager_hidden => 1, postshow => 1 },
78 663 ahitrov { 'attr' => 'timeline', 'type' => 'string', 'rusname' => 'Предпочтительная дата и время', postshow => 1, },
79 304 ahitrov { 'attr' => 'description', 'type' => 'text', 'rusname' => 'Описание для курьера', rows => 5, postshow => 1, faciledit => 1 },
80 504 ahitrov { 'attr' => 'manager_comment', 'type' => 'text', 'rusname' => 'Комментарий менеджера', rows => 5, postedit => 1, faciledit => 1 },
81 297 ahitrov { 'attr' => 'facility_comment', 'type' => 'text', 'rusname' => 'Описание проблем с комплектацией', rows => 5, manager_hidden => 1, faciledit => 1 },
82 { 'attr' => 'delivery_comment', 'type' => 'text', 'rusname' => 'Описание проблем с доставкой', rows => 5, manager_hidden => 1, postedit => 1 },
83 198 ahitrov )
84 }
85
86 714 ahitrov sub recount {
87 my $self = shift;
88 my $basket = $self->keeper->{webshop}->get_basket( order_id => $self->id );
89 my $store = 0;
90 if ( ref $basket && @$basket ) {
91 my $sum = 0;
92 foreach my $bi ( @$basket ) {
93 $sum += $bi->price * $bi->number;
94 }
95 if ( $sum != $self->sum ) {
96 $self->sum( $sum );
97 $store = 1;
98 }
99 my $coupons = $self->keeper->get_documents(
100 class => 'webshop::Coupon',
101 lclass => 'webshop::OrderCouponLink',
102 );
103 }
104 if ( $store ) {
105 $self->store;
106 }
107 }
108 270 ahitrov
109 sub sum_total {
110 my $self = shift;
111
112 return ($self->sum || 0) - ($self->sum_discount || 0) + ($self->sum_delivery || 0);
113 }
114
115
116 198 ahitrov sub sum_formatted {
117 my $self = shift;
118
119 426 ahitrov my $price = $self->sum;
120 198 ahitrov $price = reverse $price;
121 $price =~ s/(\d{3})/$1\ /g;
122 $price = reverse $price;
123
124 return $price;
125 }
126
127 sub total_formatted {
128 my $self = shift;
129
130 270 ahitrov my $price = $self->sum_total;
131 return $keeper->{webshop}->price_format( $price );
132 198 ahitrov }
133
134
135 sub reject {
136 my $self = shift;
137
138 297 ahitrov # my $query = $self->{keeper}->SQL->prepare("delete from basket where order_id = ? and uid = ?");
139 # $query->execute( $self->id, $self->uid );
140 565 ahitrov
141 297 ahitrov $self->status(5);
142 $self->store;
143 198 ahitrov }
144
145 788 ahitrov sub delete {
146 my $self = shift;
147 my %opts = @_;
148 if ( $opts{mandatory} ) {
149 $self->SUPER::delete;
150 }
151 $self->reject;
152 }
153 198 ahitrov
154 sub class_name
155 {
156 return 'Заказ';
157 }
158
159 sub class_description
160 {
161 return 'Заказ';
162 }
163
164 sub class_table
165 {
166 return 'webshop::SQL::Order';
167 }
168
169 356 ahitrov sub table_links
170 {
171 return [
172 { name => 'Корзина', class => 'webshop::Basket', filter => 'order_id', field => 'order_id' },
173 ];
174 }
175 198 ahitrov
176 572 ahitrov sub post_store
177 565 ahitrov {
178 my $self = shift;
179 356 ahitrov
180 565 ahitrov if ( grep { $_ eq 'payments' } split /\s+/, $state->plugins ) {
181 my $action;
182 my ($lastop) = $keeper->get_documents( class => 'payments::Operation', order_id => $self->id, order_by => 'id desc', limit => 1 );
183 if ( ref $lastop ) {
184 if ( $self->status == 1 || $self->status == 2 || $self->status == 6 ) {
185 if ( $lastop->name eq 'suspend' || $lastop->name eq 'cancel' || $lastop->name eq 'close' ) {
186 $action = 'resume';
187 }
188 } elsif ( $self->status == 7 ) {
189 if ( $lastop->name ne 'suspend' ) {
190 $action = 'suspend';
191 }
192 } elsif ( $self->status == 4 ) {
193 if ( $lastop->name ne 'close' ) {
194 $action = 'close';
195 }
196 } elsif ( $self->status == 5 ) {
197 if ( $lastop->name ne 'cancel' ) {
198 $action = 'cancel';
199 }
200 }
201 } else {
202 if ( $self->status == 1 || $self->status == 2 || $self->status == 6 ) {
203 $action = 'create';
204 } elsif ( $self->status == 7 ) {
205 $action = 'suspend';
206 } elsif ( $self->status == 4 ) {
207 $action = 'close';
208 } elsif ( $self->status == 5 ) {
209 $action = 'cancel';
210 }
211 }
212 714 ahitrov if ( $action && exists $keeper->{payments} ) {
213 my $op = $keeper->{payments}->add( order => $self, type => $action, ref $user ? (uuid => $user->id) : () );
214 565 ahitrov }
215 }
216 return 1;
217 }
218
219
220 198 ahitrov sub post_delete
221 {
222 my $self = shift;
223 my @items = $self->keeper->get_documents(
224 class => 'webshop::Basket',
225 order_id => $self->id,
226 );
227 foreach my $item ( @items ) {
228 $item->delete( attachments => 1 );
229 }
230 270 ahitrov my $sql = $self->keeper->SQL->prepare('DELETE FROM webshop_order_coupons where source_id = ?');
231 $sql->execute( $self->id );
232
233 198 ahitrov 1;
234 }
235
236 1;