1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
|
/*PGR-GNU*****************************************************************
File: _pgr_vrpOneDepot.sql
Generated with Template by:
Copyright (c) 2017 pgRouting developers
Mail: project@pgrouting.org
Function's developer:
Copyright (c) 2017 Celia Virginia Vergara Castillo
Mail:
------
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.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
********************************************************************PGR-GNU*/
--------------------
-- _pgr_vrpOneDepot
--------------------
--v3.0
CREATE FUNCTION _pgr_vrpOneDepot(
TEXT, -- customers_sql
TEXT, -- vehicles_sql
TEXT, -- matrix_sql
INTEGER, -- depot_id
OUT seq INTEGER,
OUT vehicle_seq INTEGER,
OUT vehicle_id BIGINT,
OUT stop_seq INTEGER,
OUT stop_type INTEGER,
OUT stop_id BIGINT,
OUT order_id BIGINT,
OUT cargo FLOAT,
OUT travel_time FLOAT,
OUT arrival_time FLOAT,
OUT wait_time FLOAT,
OUT service_time FLOAT,
OUT departure_time FLOAT
)
RETURNS SETOF RECORD AS
$BODY$
DECLARE
orders_sql TEXT;
trucks_sql TEXT;
matrix_sql TEXT;
final_sql TEXT;
BEGIN
orders_sql = $$WITH
vrp_orders AS ($$ || $1 || $$ ),
pickups AS (
SELECT id, x AS p_x, y AS p_y, open_time AS p_open, close_time AS p_close, service_time AS p_service
FROM vrp_orders
WHERE id = $$ || $4 || $$
)
SELECT vrp_orders.id AS id, order_unit AS demand, pickups.id AS p_node_id, p_x, p_y, p_open, p_close, p_service,
vrp_orders.id AS d_node_id, x AS d_x, y AS d_y, open_time AS d_open, close_time AS d_close, service_time AS d_service
FROM vrp_orders, pickups
WHERE vrp_orders.id != $$ || $4;
trucks_sql = $$ WITH
vrp_orders AS ($$ || $1 || $$ ),
vrp_vehicles AS ($$ || $2 || $$ ),
starts AS (
SELECT id AS start_node_id, x AS start_x, y AS start_y, open_time AS start_open, close_time AS start_close, service_time AS start_service
FROM vrp_orders
WHERE id = $$ || $4 || $$
)
SELECT vehicle_id AS id, capacity, starts.* FROM vrp_vehicles, starts;
$$;
final_sql = '
SELECT seq, vehicle_seq, vehicle_id, stop_seq, stop_type, stop_id, order_id, cargo, travel_time, arrival_time,
wait_time, service_time, departure_time
FROM _pgr_pickDeliver(
$$' || orders_sql || '$$,
$$' || trucks_sql || '$$,
$$' || $3 || '$$,
max_cycles := 3,
initial_sol := 7 ); ';
RAISE DEBUG '%', orders_sql;
RAISE DEBUG '%', trucks_sql;
RAISE DEBUG '%', $3;
RAISE DEBUG '%', final_sql;
RETURN QUERY EXECUTE final_sql;
END;
$BODY$
LANGUAGE plpgsql VOLATILE STRICT;
COMMENT ON FUNCTION _pgr_vrpOneDepot(TEXT, TEXT, TEXT, INTEGER)
IS 'pgRouting internal function';
|
