corrade-nucleus-nucleons – Blame information for rev 20
?pathlinks?
| Rev | Author | Line No. | Line |
|---|---|---|---|
| 20 | office | 1 | |
| 2 | BEGIN; |
||
| 3 | |||
| 4 | /** |
||
| 5 | * Samples from PostgreSQL src/tutorial/basics.source |
||
| 6 | */ |
||
| 7 | CREATE TABLE weather ( |
||
| 8 | city varchar(80), |
||
| 9 | temp_lo int, -- low temperature |
||
| 10 | temp_hi int, -- high temperature |
||
| 11 | prcp real, -- precipitation |
||
| 12 | "date" date |
||
| 13 | ); |
||
| 14 | |||
| 15 | CREATE TABLE cities ( |
||
| 16 | name varchar(80), |
||
| 17 | location point |
||
| 18 | ); |
||
| 19 | |||
| 20 | |||
| 21 | INSERT INTO weather |
||
| 22 | VALUES ('San Francisco', 46, 50, 0.25, '1994-11-27'); |
||
| 23 | |||
| 24 | INSERT INTO cities |
||
| 25 | VALUES ('San Francisco', '(-194.0, 53.0)'); |
||
| 26 | |||
| 27 | INSERT INTO weather (city, temp_lo, temp_hi, prcp, "date") |
||
| 28 | VALUES ('San Francisco', 43, 57, 0.0, '1994-11-29'); |
||
| 29 | |||
| 30 | INSERT INTO weather (date, city, temp_hi, temp_lo) |
||
| 31 | VALUES ('1994-11-29', 'Hayward', 54, 37); |
||
| 32 | |||
| 33 | |||
| 34 | SELECT city, (temp_hi+temp_lo)/2 AS temp_avg, "date" FROM weather; |
||
| 35 | |||
| 36 | SELECT city, temp_lo, temp_hi, prcp, "date", location |
||
| 37 | FROM weather, cities |
||
| 38 | WHERE city = name; |
||
| 39 | |||
| 40 | |||
| 41 | |||
| 42 | /** |
||
| 43 | * Dollar quotes starting at the end of the line are colored as SQL unless |
||
| 44 | * a special language tag is used. Dollar quote syntax coloring is implemented |
||
| 45 | * for Perl, Python, JavaScript, and Json. |
||
| 46 | */ |
||
| 47 | create or replace function blob_content_chunked( |
||
| 48 | in p_data bytea, |
||
| 49 | in p_chunk integer) |
||
| 50 | returns setof bytea as $$ |
||
| 51 | -- Still SQL comments |
||
| 52 | declare |
||
| 53 | v_size integer = octet_length(p_data); |
||
| 54 | begin |
||
| 55 | for i in 1..v_size by p_chunk loop |
||
| 56 | return next substring(p_data from i for p_chunk); |
||
| 57 | end loop; |
||
| 58 | end; |
||
| 59 | $$ language plpgsql stable; |
||
| 60 | |||
| 61 | |||
| 62 | -- pl/perl |
||
| 63 | CREATE FUNCTION perl_max (integer, integer) RETURNS integer AS $perl$ |
||
| 64 | # perl comment... |
||
| 65 | my ($x,$y) = @_; |
||
| 66 | if (! defined $x) { |
||
| 67 | if (! defined $y) { return undef; } |
||
| 68 | return $y; |
||
| 69 | } |
||
| 70 | if (! defined $y) { return $x; } |
||
| 71 | if ($x > $y) { return $x; } |
||
| 72 | return $y; |
||
| 73 | $perl$ LANGUAGE plperl; |
||
| 74 | |||
| 75 | -- pl/python |
||
| 76 | CREATE FUNCTION usesavedplan() RETURNS trigger AS $python$ |
||
| 77 | # python comment... |
||
| 78 | if SD.has_key("plan"): |
||
| 79 | plan = SD["plan"] |
||
| 80 | else: |
||
| 81 | plan = plpy.prepare("SELECT 1") |
||
| 82 | SD["plan"] = plan |
||
| 83 | $python$ LANGUAGE plpythonu; |
||
| 84 | |||
| 85 | -- pl/v8 (javascript) |
||
| 86 | CREATE FUNCTION plv8_test(keys text[], vals text[]) RETURNS text AS $javascript$ |
||
| 87 | var o = {}; |
||
| 88 | for(var i=0; i<keys.length; i++){ |
||
| 89 | o[keys[i]] = vals[i]; |
||
| 90 | } |
||
| 91 | return JSON.stringify(o); |
||
| 92 | $javascript$ LANGUAGE plv8 IMMUTABLE STRICT; |
||
| 93 | |||
| 94 | -- json |
||
| 95 | select * from json_object_keys($json$ |
||
| 96 | { |
||
| 97 | "f1": 5, |
||
| 98 | "f2": "test", |
||
| 99 | "f3": {} |
||
| 100 | } |
||
| 101 | $json$); |
||
| 102 | |||
| 103 | |||
| 104 | -- psql commands |
||
| 105 | \df cash* |
||
| 106 | |||
| 107 | |||
| 108 | -- Some string samples. |
||
| 109 | select 'don''t do it now;' || 'maybe later'; |
||
| 110 | select E'dont\'t do it'; |
||
| 111 | select length('some other''s stuff' || $$cat in hat's stuff $$); |
||
| 112 | |||
| 113 | select $$ strings |
||
| 114 | over multiple |
||
| 115 | lines - use dollar quotes |
||
| 116 | $$; |
||
| 117 | |||
| 118 | END; |