te.ins

Oracle PL/SQL procedure generator (second generator type)

INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (625, 'TE', 'TESPEC.GDR', '1', '[endif]      ');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (624, 'TE', 'TESPEC.GDR', '1', '      {PLG>errmsg} IN OUT VARCHAR2,');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (623, 'TE', 'TESPEC.GDR', '1', '      {PLG>errnum} IN OUT INTEGER,');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (622, 'TE', 'TESPEC.GDR', '1', '[IF][retcd]');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (621, 'TE', 'TESPEC.GDR', '1', '      [ENDFOREACH] ');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (620, 'TE', 'TESPEC.GDR', '1', '      ^{PLG>incol}^ IN {PLG>coltype},');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (619, 'TE', 'TESPEC.GDR', '1', '      [FOREACH]fkycol ');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (618, 'TE', 'TESPEC.GDR', '1', '   PROCEDURE ^{PLG>delbyfkyproc}^ (');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (617, 'TE', 'TESPEC.GDR', '1', '   --// Delete all records for this [fkyname] foreign key. //--');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (616, 'TE', 'TESPEC.GDR', '1', '');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (615, 'TE', 'TESPEC.GDR', '1', '[FOREACH]fky');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (614, 'TE', 'TESPEC.GDR', '1', '[ENDIF]');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (613, 'TE', 'TESPEC.GDR', '1', '      {PLG>outRC} OUT INTEGER);');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (612, 'TE', 'TESPEC.GDR', '1', '[endif]      ');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (611, 'TE', 'TESPEC.GDR', '1', '      {PLG>errmsg} IN OUT VARCHAR2,');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (610, 'TE', 'TESPEC.GDR', '1', '      {PLG>errnum} IN OUT INTEGER,');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (609, 'TE', 'TESPEC.GDR', '1', '[IF][retcd]');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (608, 'TE', 'TESPEC.GDR', '1', '   PROCEDURE ^{PLG>delproc}^ ({PLG>inrec} IN {PLG>>tableRT},');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (607, 'TE', 'TESPEC.GDR', '1', '');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (606, 'TE', 'TESPEC.GDR', '1', '[IF]havenonpkycol');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (605, 'TE', 'TESPEC.GDR', '1', '      {PLG>outRC} OUT INTEGER);');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (604, 'TE', 'TESPEC.GDR', '1', '[endif]      ');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (603, 'TE', 'TESPEC.GDR', '1', '      {PLG>errmsg} IN OUT VARCHAR2,');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (602, 'TE', 'TESPEC.GDR', '1', '      {PLG>errnum} IN OUT INTEGER,');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (601, 'TE', 'TESPEC.GDR', '1', '[IF][retcd]');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (600, 'TE', 'TESPEC.GDR', '1', '   PROCEDURE ^{PLG>delproc}^ ({PLG>inrec} IN ^{PLG>>pkyRT}^,');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (599, 'TE', 'TESPEC.GDR', '1', '   --// Record-based delete //--');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (598, 'TE', 'TESPEC.GDR', '1', '');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (597, 'TE', 'TESPEC.GDR', '1', '      {PLG>outRC} OUT INTEGER);');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (596, 'TE', 'TESPEC.GDR', '1', '[endif]      ');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (595, 'TE', 'TESPEC.GDR', '1', '      {PLG>errmsg} IN OUT VARCHAR2,');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (594, 'TE', 'TESPEC.GDR', '1', '      {PLG>errnum} IN OUT INTEGER,');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (593, 'TE', 'TESPEC.GDR', '1', '[IF][retcd]');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (592, 'TE', 'TESPEC.GDR', '1', '[ENDFOREACH]');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (591, 'TE', 'TESPEC.GDR', '1', '      ^{PLG>incol}^ IN {PLG>coltype},');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (590, 'TE', 'TESPEC.GDR', '1', '[FOREACH]pkycol');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (589, 'TE', 'TESPEC.GDR', '1', '   PROCEDURE ^{PLG>delproc}^ (');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (588, 'TE', 'TESPEC.GDR', '1', '--// Delete Processing //--');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (587, 'TE', 'TESPEC.GDR', '1', '');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (586, 'TE', 'TESPEC.GDR', '1', '[endif]');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (585, 'TE', 'TESPEC.GDR', '1', '      );');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (584, 'TE', 'TESPEC.GDR', '1', '      {PLG>upd_on_dup} IN BOOLEAN := FALSE');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (583, 'TE', 'TESPEC.GDR', '1', '[endif]      ');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (582, 'TE', 'TESPEC.GDR', '1', '      {PLG>errmsg} IN OUT VARCHAR2,');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (581, 'TE', 'TESPEC.GDR', '1', '      {PLG>errnum} IN OUT INTEGER,');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (580, 'TE', 'TESPEC.GDR', '1', '[IF][retcd]');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (579, 'TE', 'TESPEC.GDR', '1', '   PROCEDURE ^{PLG>insproc}^ ({PLG>inrec} IN {PLG>>tableRT},');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (578, 'TE', 'TESPEC.GDR', '1', '   --// Record-based insert //--');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (577, 'TE', 'TESPEC.GDR', '1', '');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (576, 'TE', 'TESPEC.GDR', '1', '      );');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (575, 'TE', 'TESPEC.GDR', '1', '      {PLG>upd_on_dup} IN BOOLEAN := FALSE');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (574, 'TE', 'TESPEC.GDR', '1', '[endif]      ');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (573, 'TE', 'TESPEC.GDR', '1', '      {PLG>errmsg} IN OUT VARCHAR2,');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (572, 'TE', 'TESPEC.GDR', '1', '      {PLG>errnum} IN OUT INTEGER,');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (571, 'TE', 'TESPEC.GDR', '1', '[IF][retcd]');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (570, 'TE', 'TESPEC.GDR', '1', '[ENDFOREACH]');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (569, 'TE', 'TESPEC.GDR', '1', '      ^{PLG>incol}^ IN {PLG>coltype} [parmcoldef],');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (568, 'TE', 'TESPEC.GDR', '1', '[FOREACH]nonpkycol');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (567, 'TE', 'TESPEC.GDR', '1', '[ENDFOREACH]');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (566, 'TE', 'TESPEC.GDR', '1', '      ^{PLG>incol}^ IN {PLG>coltype},');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (565, 'TE', 'TESPEC.GDR', '1', '[FOREACH]pkycol');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (564, 'TE', 'TESPEC.GDR', '1', '   PROCEDURE ^{PLG>insproc}^ (');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (563, 'TE', 'TESPEC.GDR', '1', '[ELSE]');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (562, 'TE', 'TESPEC.GDR', '1', '[IF]genpkyonly[AND]genpky');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (561, 'TE', 'TESPEC.GDR', '1', '[endif]');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (560, 'TE', 'TESPEC.GDR', '1', '      );');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (559, 'TE', 'TESPEC.GDR', '1', '      {PLG>upd_on_dup} IN BOOLEAN := FALSE');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (558, 'TE', 'TESPEC.GDR', '1', '[endif]      ');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (557, 'TE', 'TESPEC.GDR', '1', '      {PLG>errmsg} IN OUT VARCHAR2,');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (556, 'TE', 'TESPEC.GDR', '1', '      {PLG>errnum} IN OUT INTEGER,');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (555, 'TE', 'TESPEC.GDR', '1', '[IF][retcd]');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (554, 'TE', 'TESPEC.GDR', '1', '[ENDFOREACH]');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (553, 'TE', 'TESPEC.GDR', '1', '      {PLG>outcol} IN OUT {PLG>coltype},');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (552, 'TE', 'TESPEC.GDR', '1', '[FOREACH]pkycol');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (551, 'TE', 'TESPEC.GDR', '1', '   PROCEDURE ^{PLG>insproc}^ ({PLG>inrec} IN {PLG>>tableRT},');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (550, 'TE', 'TESPEC.GDR', '1', '');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (549, 'TE', 'TESPEC.GDR', '1', '      );');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (548, 'TE', 'TESPEC.GDR', '1', '      ^{PLG>upd_on_dup}^ IN BOOLEAN := FALSE');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (547, 'TE', 'TESPEC.GDR', '1', '[endif]      ');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (546, 'TE', 'TESPEC.GDR', '1', '      {PLG>errmsg} IN OUT VARCHAR2,');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (545, 'TE', 'TESPEC.GDR', '1', '      {PLG>errnum} IN OUT INTEGER,');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (544, 'TE', 'TESPEC.GDR', '1', '[IF][retcd]');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (543, 'TE', 'TESPEC.GDR', '1', '[ENDFOREACH]');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (542, 'TE', 'TESPEC.GDR', '1', '      ^{PLG>outcol}^ IN OUT {PLG>coltype},');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (541, 'TE', 'TESPEC.GDR', '1', '[FOREACH]pkycol');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (540, 'TE', 'TESPEC.GDR', '1', '[ENDFOREACH]');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (539, 'TE', 'TESPEC.GDR', '1', '      ^{PLG>incol}^ IN {PLG>coltype} [parmcoldef],');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (538, 'TE', 'TESPEC.GDR', '1', '[FOREACH]nonpkycol');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (537, 'TE', 'TESPEC.GDR', '1', '   PROCEDURE ^{PLG>insproc}^ (');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (536, 'TE', 'TESPEC.GDR', '1', '');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (535, 'TE', 'TESPEC.GDR', '1', '[ENDIF]');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (534, 'TE', 'TESPEC.GDR', '1', '   PRAGMA RESTRICT_REFERENCES (^{PLG>nextpkyfunc}^, {PLG>puritylevels});');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (533, 'TE', 'TESPEC.GDR', '1', '[IF]userestrictref');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (532, 'TE', 'TESPEC.GDR', '1', '   FUNCTION ^{PLG>nextpkyfunc}^ RETURN ^{PLG>pkycoltype}^;');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (531, 'TE', 'TESPEC.GDR', '1', '   --// Generate next primary key: for single column PKs only. //--');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (530, 'TE', 'TESPEC.GDR', '1', '');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (529, 'TE', 'TESPEC.GDR', '1', '[if]genpky');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (528, 'TE', 'TESPEC.GDR', '1', '');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (527, 'TE', 'TESPEC.GDR', '1', '      allnull IN BOOLEAN := FALSE);');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (526, 'TE', 'TESPEC.GDR', '1', '      ^{PLG>inoutrec}^ IN OUT {PLG>>tableRT},');
INSERT INTO plg_driver_source (line, driver, name, seq, text) VALUES (525, 'TE', 'TESPEC.GDR', '1', '   PROCEDURE ^{PLG>initrecproc}^ (');