Open-ILS/src/sql/Pg/t/lpad_number_substrings.pg

   1 -- Start transaction and plan the tests.
   2 BEGIN;
   3 SELECT plan(11);
   4
   5 -- Run the tests.
   6 SELECT is(evergreen.lpad_number_substrings(
   7         'Appendix','0',5), 'Appendix','Non-numeric string');
   8
   9 SELECT is(evergreen.lpad_number_substrings(
  10         'DISC 11','0',5), 'DISC 00011','Prefix, 1 number');
  11
  12 SELECT is(evergreen.lpad_number_substrings(
  13         'DISC 14.1','0',5), 'DISC 00014.00001','Prefix, 2 numbers');
  14
  15 SELECT is(evergreen.lpad_number_substrings(
  16         'DISC 12.12.13','0',5), 'DISC 00012.00012.00013','Prefix, 3 numbers');
  17
  18 SELECT is(evergreen.lpad_number_substrings(
  19         'Vol 5a-15','0',5), 'Vol 00005a-00015','Mixed format');
  20
  21 SELECT isnt(evergreen.lpad_number_substrings(
  22         '2015 01 Jan','0',5),'02000015 00001 Jan','Matching Substring Error 1');
  23
  24 SELECT isnt(evergreen.lpad_number_substrings(
  25         '2015 02 Feb','0',5),'00002015 00002 Feb','Matching Substring Error 2');
  26
  27 SELECT is(evergreen.lpad_number_substrings(
  28         '2015 01 Jan','0',5),'02015 00001 Jan','Matching Substrings 1');
  29
  30 SELECT is(evergreen.lpad_number_substrings(
  31         '2015 02 Feb','0',5),'02015 00002 Feb','Matching Substrings 2');
  32
  33 SELECT is(evergreen.lpad_number_substrings(
  34         '0001 001 1 01','0',5),'00001 00001 00001 00001','Matching Substrings 3');
  35
  36 SELECT is(evergreen.lpad_number_substrings(
  37         '123456','0',5),'123456','Longer than Padding Length');
  38
  39 -- Finish the tests and clean up.
  40 SELECT * FROM finish();
  41 ROLLBACK;
  42